Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAOMS - Gestão de Distribuição |
Função: | OMSXCPL6 - Montagem de Carga |
País: | Todos Países |
Ticket: | 14104296 |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-14099 |
Este Ponto de Entrada permite manipular a quantidade do item do pedido, gravado no XML de estorno parcial de pedidos utilizado para integração com TOL.
O conteúdo da quantidade é gravado nas tags ord3:quantity e ord3:quantityInShipmentUnits.
Sintaxe
OMSCPLQAT - Alteração da quantidade do item no estorno parcial de pedidos integrados com TOL ( [ PARAMIXB ] ) → nRet
Localizado no programa de Envio de Pedidos de Venda (OMSXCPL6B), na função de determinação da quantidade do item do pedido a ser estornado.
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB | Array of Record | Onde: 1º item contém a sequência de intergração com TOL (DK3_SEQUEN). |
Nome | Tipo | Descrição |
---|---|---|
nRet | Numérico | Quantidade do item do pedido. |
Todas as versões.
Não se aplica.
User Function OMSCPLQAT() As Numeric
Local cSeqInt As Character
Local cPedido As Character
Local cItem As Character
Local cProduto As Character
Local cQuebraId As Character
Local nQtdAlt As Numeric
Local aAreaCB8 As Array
Local aAreaDK3 As Array
Local oModel As Object
cSeqInt := PARAMIXB[1]
cPedido := SC5->C5_NUM
cItem := PARAMIXB[2]
cProduto := PARAMIXB[3]
cQuebraId := PARAMIXB[4]
nQtdAlt := PARAMIXB[5]
oModel := FWModelActive()
If FwIsInCallStack('U_FAT005') .And. FwIsInCallStack('OMSXADDSC5')
aAreaCB8 := CB8->(GetArea())
aAreaDK3 := DK3->(GetArea())
BeginSQL Alias "TMPDK3"
SELECT DK3.R_E_C_N_O_ AS DK3RECNO
FROM %Table:DK3% DK3
WHERE DK3.%NotDel%
AND DK3.DK3_FILIAL = %xFilial:DK3%
AND DK3.DK3_SEQUEN = %Exp:cSeqInt%
AND DK3.DK3_PEDIDO = %Exp:cPedido%
AND DK3.DK3_ITEMPE = %Exp:cItem%
AND DK3.DK3_PRODUT = %Exp:cProduto%
EndSQL
If !TMPDK3->(Eof())
DK3->(DbGoTo(TMPDK3->DK3RECNO))
If DK3->DK3_STATUS == '1'
nQtdAlt := DK3->Dk3_QTDINT
EndIf
EndIf
TMPDK3->(DbCloseArea())
RestArea(aAreaCB8)
RestArea(aAreaDK3)
EndIf
Return nQtdAlt
<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> |