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 na rotina WMSV001.
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 |
Protheus 12.1.17 ou superiores.
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.
------
#INCLUDE "PROTHEUS.CH"
User Function WMSV001C()
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> |