Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Backoffice

Módulo:

TOTVS Backoffice (Linha Protheus) - Automação e Coleta de Dados (SIGAACD)

Função:ACDV152 e ACDV153
País:Brasil
Ticket:
Issue:DMANMAT01-41864


02. DESCRIÇÃO

Ao utilizar a rotina ACDV152 (Envio Processo) ou o programa ACDV153 (Retorno Processo), no momento de informar o armazém origem (ACDV152) ou destino (ACDV153), a rotina busca o código do armazém do parâmetro MV_CBARMPD.

Existem duas possibilidades para a configuração do parâmetro:

  • Caso o parâmetro esteja em branco, o usuário deve informar o armazém manualmente.
  • Caso o parâmetro esteja preenchido, a rotina utiliza o armazém informado no parâmetro.

O ponto de entrada permite que o armazém utilizado seja sobrescrito, ou seja, caso o ponto de entrada retorne um conteúdo em branco, o usuário deverá informar o armazém e, se retornar um armazém, este será utilizado.

03. PARÂMETROS

O programa não passa parâmetros para o ponto de entrada e a rotina não está posicionada em nenhum registro específico do processo.

04. RETORNO


NomeDescriçãoConteúdo
cArmOriArmazém Origem para envio/retorno do processoInformar o código de um armazém, conforme cadastrado na tabela NNR.

05. EXEMPLO DE UTILIZAÇÃO

Exemplo ACD152ARM
#INCLUDE "TOTVS.CH" 

/*/{Protheus.doc} ACD152ARM
Código do armazém origem no envio/retorno de processo
@type       user function
@author    TOTVS 
/*/
User Function ACD152ARM()
    Local cArmOri := CriaVar("B2_LOCAL") 

    If Time() > '12:00:00'
        cArmOri := "01" //Troca o armazém padrão para 01 após o meio dia
    Else
        cArmOri := "  " //Antes do meio dia, o usuário informa o armazém
    EndIf

    //Importante: Retornar a variável com o mesmo tamanho do campo armazém  
Return cArmOri


IMPORTANTE!

Este processo se aplica para clientes que não fazem uso das etiquetas CB0


06. ASSUNTOS RELACIONADOS