Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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

O Este ponto de entrada é chamado dentro da função de Separa(), no final da rotina de Separação dos Produtos, possibilita gravações em tabelas customizadas ao final do processo.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 Volumevolume
cLoteNew - Novo código do Lotelote
cSLoteNew - Novo código Subsub-Lotelote
cArmazem - Armazém

Tabelas Posicionadas:

CB7 - Cabeçalho da ordem de separação

03. PARÂMETROS

NomeTipoDescrição
ORDSEPParamIXB[1]CaracterOrdem Código da ordem de Separaçãoseparação

04. RETORNO

...

Não possui.

05. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagevb
themeMidnight
firstline1
titleACD170SEP
linenumberstrue
/*/{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

...