Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Backoffice
Módulo:ACD - Automação Coleta de Dados
Função:

ACDV170 - Movimentação Interna de Produtos

02. DESCRIÇÃO

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

03. PARÂMETROS

NomeTipoDescrição
ParamIXB[1]CaracterCódigo da ordem de separação

04. RETORNO

Não possui.

05. EXEMPLO DE UTILIZAÇÃO

ACD170SEP
/*/{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