| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | ACD - Automação Coleta de Dados |
| Função: | ACDV170 - Movimentação Interna de Produtos |
Este ponto de entrada é chamado ao final do processo de separação dos produtos e possibilita, por exemplo, a gravação em tabelas customizadas,
Variáveis disponíveis para utilização:
nQtdLida - Quantidade lida do produto
cVolume - Código do volume
cLoteNew - Novo código do lote
cSLoteNew - Novo código sub-lote
cArmazem - Armazém
Tabelas Posicionadas:
CB7 - Cabeçalho da ordem de separação
| Nome | Tipo | Descrição |
|---|---|---|
| ParamIXB[1] | Caracter | Código da ordem de separação |
Não possui.
/*/{Protheus.doc} User Function ACD170SEP
Executado no final da rotina de separação
@type Function
@author TOTVS
/*/
User Function ACD170SEP()
Local aArea := GetArea()
Local cOrdSEP := PARAMIXB[1]
// gravações do cliente
If CB7->( FieldPos( "CB7_XUSER" ) > 0)
CB7->RecLock( "CB7", .F. )
CB7->CB7_XUSER := cUserName
CB7->( MsUnlock() )
Endif
RestArea( aArea )
Return