Ponto de Entrada para manipulação de dados da Emissão de Nota Fiscal via Complemento de Fardão/Romaneio de Fardão

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Agroindustria

Módulo:

SIGAAGR

Rotina:

Rotina

Nome Técnico

Funções Genéricas Gestão Agroindústria

AGRXFUN1

Rotina(s) envolvida(s)

Nome Técnico

Romaneio de Fardão

AGRA600

Complemento de Fardão 

AGRA610

Ponto de Entrada:

AGRXEMTNT

Requisito (ISSUE):AGROG01-30

País(es):

Todos

Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

  1. Aplique o patch do chamado e execute uma vez a rotina Informe o nome da rotina.
  2. No módulo informe o nome do módulo acesse informe o caminho e verifique que o parâmetro informe o nome do parâmetro é criado conforme especificações abaixo:

Nome da Variável:

Informe o Nome da Variável

Tipo:

Informe o Tipo

Descrição:

Informe a Descrição

Valor Padrão:

Informe o Valor Padrão

 

 

Procedimento para Configuração

(Estes procedimentos devem ser feitos quando for necessário configurar parâmetros e/ou  rotinas no menu).

 

CONFIGURAÇÃO DE PARÂMETROS

 

  1. No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Crie/configure (mantenha somente a instrução correspondente) o(s) parâmetro(s) a seguir:
    (É necessário criar uma tabela para cada parâmetro descrito no item Parâmetro(s), da tabela Características do Requisito)

Itens/Pastas

Descrição

Nome:

 

Tipo:

Informe o Tipo do parâmetro

Cont. Por.:

Informe o Conteúdo padrão

Descrição:

 

 

CONFIGURAÇÃO DE MENUS

 

2.  No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do informe o nome do módulo, conforme instruções a seguir:

Menu

Informe o Menu em que estará localizada a rotina

Submenu

Informe o Submenu em que estará localizada a rotina

Nome da Rotina

Informe o Título da rotina

Programa

Informe o Fonte da rotina

Módulo

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Tipo

Informe a Função

 

 

Ponto de Entrada

Descrição:

SIGAAGR -> Atualizações -> UBA -> Recebimento

Localização:

Romaneio de Fardão;

Complemento de Fardão

Eventos:

 

Programa Fonte:

Informe o Fonte da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

Retorno:

Nome

Tipo

Descrição

Obrigatório

 

 

 

 

 

 

 

 

 

 

 

 

 

Exemplo:

#Include "Protheus.Ch"

User Function AGRXEMTNT()
Local aRet := {}
Local aPvlNfs := aClone(PARAMIXB[1])
Local cSerie := PARAMIXB[2]
Local cRotina := PARAMIXB[3] //AGRA600 ou AGRA610
Local nX := 0

If cRotina = "AGRA610"

For nX := 1 to Len(aPvlNfs)

aPvlNfs[nX,1] := '000168' //Seta Pedido fixo
Next nX
ElseIf cRotina = "AGRA600"
cSerie := 'A' //Seta série fixa
Endif

aAdd(aRet,aClone(aPvlNfs))
aAdd(aRet,cSerie)

Return aRet