| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | SIGAWMS - Gestão de Armazenagem |
| Função: | WMSV001 - Identifica as Funções do Operador Logado |
| País: | Todos Países |
| Ticket: | 11231411 |
| Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-12056 |
Este Ponto de Entrada permite que sejam realizadas alterações na tabela D12, como o recurso humano a ser utilizado.
Localizado após a busca de atividades para convocações.
| Nome | Tipo | Descrição |
|---|---|---|
| D12->(Recno()) | Numérico | Número do registro na tabela D12 |
| Nome | Tipo | Descrição | Opcional |
|---|---|---|---|
| lRetPE | Lógico | Indicação se a alteração do recurso humano foi bem sucedida ou não. | Não |
12.1.17 e superiores.
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.
#INCLUDE "PROTHEUS.CH"
User Function WMS001C()
Local nRecnoD12 := PARAMIXB[1]
D12->(dbGoTo(nRecnoD12))
//Exemplo de regra
//D12_STATUS 0=Estornada;1=Executada;2=Interrompida;3=Em Execução;4=A Executar
If (D12->D12_RECHUM != __cUserID) .And. (D12->D12_STATUS = '2' .Or. D12->D12_STATUS = '4')
RecLock("D12",.F.)
D12->D12_RECHUM := __cUserID
D12->(MsUnlock())
EndIf
Return .T. |
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after {
background: #FF9900; !important
}
.menu-item.active-tab {
border-bottom: none !important;
}
</style>
|