Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | WMSA320 - Conferência de Recebimento WMSV090 - Conferência de Recebimento Coletor de dados |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
Este Ponto de Entrada permite executar uma nova rotina para que quando for incluso/atualizado a tabela DCY possa ser gravado informações adicionais referentes ao registro do item de conferência de recebimento.
Localizado nos processos de atualização da tabela DCY da rotina de Conferência de Recebimento (WMSA320 e WMSV090)
Nome | Tipo | Descrição |
---|---|---|
cRecno | Inteiro | Número do RECNO do registro da tabela DCY que está sendo processado/atualizado. |
Não se aplica
12.1.23 ou superiores.
Não se aplica.
------
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"
User Function WMA320DT()
Local cRecno := paramixb[1]
cAliasQry := GetNextAlias()
BeginSql Alias cAliasQry
SELECT DCY.DCY_DTCONF,
DCY.DCY_QTCONF
FROM %Table:DCY% DCY
WHERE DCY.DCY_FILIAL = %xFilial:DCY%
AND DCY.R_E_C_N_O_ = %Exp:cRecno%
AND DCY.%NotDel%
EndSql
If (cAliasQry)->(!EoF())
//Se o novo campo DTCONF campo ainda não foi gravado para o registro e ja foi informado
//quantidado conferida , atualizar o campo na tabela DCY.
If Empty((cAliasQry)->DCY_DTCONF) .AND. (cAliasQry)->DCY_QTCONF > 0
DCY->(DbGoTo(cRecno))
RecLock('DCY',.F.)
DCY->DCY_DTCONF := dDataBase
DCY->(MsUnlock())
EndIF
EndIf
Return
------
<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> |