01. DADOS GERAIS
Produto: | TOTVS Logística WMS
|
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Logística |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | WMSV001 (Coletor) |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
02. DESCRIÇÃO
Este Ponto de Entrada permite realizar os processamentos/ações, após ocorrer uma troca de produtos na convocação.
03. LOCALIZAÇÃO
Localizado na rotina WMSV001 (Coletor), após realizar a troca da movimentação (D12) que está sendo convocada.
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
nRecnoAnt | Numérico | Recno (D12) posicionado antes da troca. |
nRecnoAtu | Numérico | Recno (D12) posicionado após a troca. |
05. RETORNO
Não se aplica.
06. VERSÕES
Protheus 12.1.27.
07. OBSERVAÇÃO
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.
08. EXEMPLO
------
#INCLUDE "PROTHEUS.CH"
User Function WMSTRD12()
Local aAreaD12 := D12->(GetArea())
Local nRecnoAnt := PARAMIXB[1] // Recno (D12) posicionado antes da troca
Local nRecnoAtu := PARAMIXB[2] // Recno (D12) posicionado após a troca
If nRecnoAnt <> nRecnoAtu
D12->(DbGoTo(nRecnoAnt))
RecLock("D12",.F.)
D12->D12_XCPO := "TESTE"
D12→ (MsUnlock())
EndIf
RestArea(aAreaD12)
Return
------