Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | - |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
Este Ponto de Entrada permite trocar o código e a observação do motivo do bloqueio de saldo.
Localizado antes da gravação do bloqueio de saldo.
Nome | Tipo | Descrição |
---|---|---|
cIdDCF | Caractere | Código do ID Tabela DCF. |
cMotivo | Caractere | Código do motivo. |
cObserv | Caractere | Descrição do motivo |
Um Array contendo duas posições, no qual a primeira é o código do motivo e a segunda é a descrição do motivo.
Protheus 12.1.23 ou superiores.
Não se aplica.
------
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"
User Function WMSBLSD()
Local cIdDcf := paramixb[1]
Local cMotivo := paramixb[2]
Local cObserv := paramixb[3]
Local cAliasQry := ""
Local cAliasSx5 := ""
Local aRetPe := {}
cAliasQry := GetNextAlias()
BeginSql Alias cAliasQry
SELECT DISTINCT 1
FROM %Table:DCF% DCF
INNER JOIN %Table:DC5% DC5
ON DC5.DC5_FILIAL = %xFilial:DC5%
AND DC5.DC5_SERVIC = DCF.DCF_SERVIC
AND DC5.DC5_BLQLOT = '1'
AND DC5.%NotDel%
WHERE DCF.DCF_FILIAL = %xFilial:DCF%
AND DCF.DCF_ID = %Exp:cIdDcf%
AND DCF.%NotDel%
EndSql
If (cAliasQry)->(!Eof())
cAliasSx5 := GetNextAlias()
BeginSql Alias cAliasSx5
SELECT X5_DESCRI
FROM %Table:SX5% SX5
WHERE X5_tabela = 'E1'
AND X5_CHAVE = 'ND'
EndSql
If (cAliasSx5)->(!Eof())
Aadd(aRetPe,'ND')
Aadd(aRetPe,(cAliasSx5)→X5_DESCRI)
Else
Aadd(aRetPe,cMotivo)
Aadd(aRetPe,cObserv)
EndIf
(cAliasSx5)→(dbCloseArea())
EndIf
(cAliasQry)→(dbCloseArea())
Return aRetPe
------
<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> |