01. DADOS GERAIS
Produto: | TOTVS OMS
|
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Logística |
Módulo: | TOTVS OMS - Gestão de Distribuição (SIGAOMS) |
Função: | OMSXCPL6 - Montagem de Carga |
País: | Todos Países |
Ticket: | 14104296 |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-14099 |
02. DESCRIÇÃO
Este Ponto de Entrada permite manipular a quantidade do item do Pedido, gravado no XML de estorno de Pedidos utilizado para integração com TOL.
O conteúdo da quantidade é utilizado para determinar se o Pedido será estornado parcialmente ou totalmente.
Sintaxe
OMSCPLQAT - Alteração da quantidade do item no estorno de pedidos integrados com TOL ( [ PARAMIXB ] ) → nRet
03. LOCALIZAÇÃO
Localizado na rotina de Envio de Pedidos de Venda (OMSXCPL6B), na função de determinação da quantidade do item do Pedido a ser estornado.
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
PARAMIXB | Array of Record | Onde: 1º item contém a sequência de integração com TOL (DK3_SEQUEN). |
05. RETORNO
Nome | Tipo | Descrição |
---|---|---|
nRet | Numérico | Quantidade do item do pedido. |
06. VERSÕES
Todas as versões.
07. OBSERVAÇÃO
Não se aplica.
08. EXEMPLO
---
User Function OMSCPLQAT() As Numeric
cSeqInt := PARAMIXB[1]
cItem := PARAMIXB[2]
cProduto := PARAMIXB[3]
cQuebraId := PARAMIXB[4]
nQtdAlt := PARAMIXB[5]
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())
EndIf
Return nQtdAlt
---