DADOS DE EXPORTAÇÃO NO CONTRATO
Características do Requisito
Linha de Produto: | Microsiga Protheus® | ||||
Segmento: | Gestão Agroindústria | ||||
Módulo: | SIGAAGR | ||||
Rotina: |
| ||||
Cadastros Iniciais: | Relacione os cadastros necessários que precisam ser preenchidos antes da utilização desse requisito. | ||||
Parâmetro(s): | Informe os parâmetros utilizados. | ||||
Ponto de Entrada: | Informe o ponto de entrada relacionado (link). | ||||
Tickets relacionados | Informe o(s) chamado(s) relacionado(s). | ||||
Requisito/Story/Issue (informe o requisito relacionado): | DAGROGAP-994, DAGROGAP-995, DAGROGAP-996 | ||||
País(es): | Todos. | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas Utilizadas: | NJR, N7R | ||||
Sistema(s) Operacional(is): | Todos |
Descrição
Foi identificado a necessidade de atualizar informações relacionadas a exportação nos processos de negociação, contrato de venda, instrução de embarque externo, para que seja possível gerar os pedidos de Exportação e Embarque de exportação por filial de origem.
Procedimento para Implantação
O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.
- Aplique o patch do chamado e execute uma vez a rotina UPDDISTR.
Logo após a execução desta rotina é alterado o dicionário de dados da base, conforme especificações abaixo:
1. Criação ou Alteração de Perguntas no arquivo SX1 – Cadastro de Perguntes:
Pergunte | (X1_PERGUNT) |
Nome |
|
Grupo | (X1_GRUPO) |
Ordem | (X1_ORDEM) |
Tipo | (X1_TIPO) |
Tamanho | (X1_TAMANHO) |
2. Criação de tabela no arquivo SX2– Tabelas:
Chave | Nome | Modo | PYME |
N7R | Rotas de Exportação | C | N |
3. Criação ou Alteração de Tabelas Genéricas no arquivo SX5 – Tabelas Genéricas:
Chave | Ex.: AR |
Descrição | Ex.: Tabela de IR de Aplicações Financeiras |
4. Criação de Campos no arquivo SX3 – Campos:
- Tabela NJR - Contratos
| Campo | NJR_TIPMER |
| Tipo | C - Caractere |
| Tamanho | 1 |
| Decimal | 0 |
| Ordem | A9 |
| Formato | @! |
| Título | Tipo Mercado |
| Descrição | Tipo de Mercado |
| Usado | Sim |
| Obrigatório | Não |
| Browse | Sim |
| Validação | Pertence('12') |
| Cbox Port | 1=Interno; 2=Externo |
| Pasta | 5 |
| Help | Define o tipo de mercado do contrato: Interno ou Externo |
Campo | NJR_CODEMB |
Tipo | C |
Tamanho | 30 |
Decimal | 0 |
Formato | @! |
Título | Embalagem |
Descrição | Código da Embalagem |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | EE5 |
Opções |
|
When |
|
Relação |
|
Val. Sistema | vazio() .or. ExistCPO("EE5") |
| Pasta | 5 |
Help | Código da Embalagem |
Campo | NJR_DESEMB |
Tipo | C |
Tamanho | 40 |
Decimal | 0 |
Formato | @! |
Título | Desc. Emb. |
Descrição | Descrição da Embalagem |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | |
Opções |
|
When |
|
Inic. Padrao | IF(!inclui,Posicione('EE5',1,xFilial('EE5')+NJR->NJR_CODEMB,'EE5_DESC'),' ') |
Val. Sistema |
|
| Pasta | 5 |
| Inic. Browser | POSICIONE('EE5',1,XFILIAL('EE5')+NJR->NJR_CODEMB,'EE5_DESC') |
Help | Descrição da embalagem do produto. |
Campo | NJR_CONDPA |
Tipo | C |
Tamanho | 3 |
Decimal | 0 |
Formato | @! |
Título | Mod.Pgto.Exp |
Descrição | Modalidade Pagamento |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | EEF |
Opções |
|
When | M->NJR_TIPMER = "2" |
Relação |
|
Val. Sistema | vazio() .or. existCpo("EEF") |
| Pasta | 6 |
Help | Modalidade de Pagamento do Processo de Exportação. |
Campo | NJR_DESCPA |
Tipo | C |
Tamanho | 50 |
Decimal | 0 |
Formato | @! |
Título | Descr. Pagto |
Descrição | Descrição Pagamento |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | |
Opções |
|
When |
|
Inic. Padrão | IF(!INCLUI,POSICIONE('EEF',1,XFILIAL('EEF')+NJR->NJR_CONDPA,'EEF_DESC'),' ') |
Val. Sistema |
|
| Pasta | 6 |
Help | Descrição da Modalidade de Pagamento de Exportação. |
| Inic. Browse | POSICIONE('EEF',1,XFILIAL('EEF')+NJR->NJR_CONDPA,'EEF_DESC') |
Campo | NJR_VIA |
Tipo | C |
Tamanho | 2 |
Decimal | 0 |
Formato | @! |
Título | Via Transp. |
Descrição | Via de Transporte |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | NJRSYQ |
Opções |
|
When | M->NJR_TIPMER = "2" |
Relação |
|
Val. Sistema | vazio() .or. existCPO("SYQ") |
| Pasta | 6 |
Help | Via de Transporte do Contrato para Mercado Externo. |
Campo | NJR_DESVIA |
Tipo | C |
Tamanho | 30 |
Decimal | 0 |
Formato | @! |
Título | Descr. Via |
Descrição | Descrição da Via |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | |
Opções |
|
When |
|
Inic. Padrão | IF(!INCLUI,POSICIONE('SYQ',1,XFILIAL('SQY')+NJR->NJR_VIA,'YQ_DESCR'),' ') |
Val. Sistema |
|
| Pasta | 6 |
Help | Descrição da Via de Transporte. |
| Inic. Browse | POSICIONE('SYQ',1,XFILIAL('SYQ')+NJR->NJR_VIA,'YQ_DESCR') |
Campo | NJR_INCOTE |
Tipo | C |
Tamanho | 3 |
Decimal | 0 |
Formato | @! |
Título | Incoterm |
Descrição | Código INCOTERM |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | SYJ |
Opções |
|
When | M->NJR_TIPMER = "2" |
Relação | vazio() .or. existCPO("SYJ") |
Val. Sistema |
|
| Pasta | 6 |
Help | Código do INCOTERM. |
Campo | NJR_DESINC |
Tipo | C |
Tamanho | 40 |
Decimal | 0 |
Formato | @! |
Título | Des INCOTERM |
Descrição | Descrição do INCOTERM |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Não |
| Cons. Padrão | |
Opções |
|
When |
|
Inic. Padrão | IF(!INCLUI,POSICIONE('SYJ',1,XFILIAL('SYJ')+NJR->NJR_INCOTE,'YJ_DESCR'),' ') |
Val. Sistema |
|
| Pasta | 6 |
Help | Descrição do INCOTERM. |
| Inic. Browse | POSICIONE('SYJ',1,XFILIAL('SYJ')+NJR->NJR_INCOTE,'YJ_DESCR') |
- Tabela N7R - Rotas de Exportação
Campo | N7R_FILIAL |
Tipo | C |
Tamanho | 2 |
Decimal | 0 |
Formato | @! |
Título | Filial |
Descrição | Filial do Sistema |
Nível | 1 |
Usado | Sim |
Obrigatório | Sim |
Browse | Não |
| Cons. Padrão | (X3_F3) |
Opções | (X3_CBOX) |
When | (X3_WHEN) |
Relação | (X3_RELACAO) |
Val. Sistema | (X3_VALID) |
Help | Filial do sistema. |
Campo | N7R_CODCTR |
Tipo | C |
Tamanho | 6 |
Decimal | 0 |
Formato | @! |
Título | Contrato |
Descrição | Código do Contrato |
Nível | 1 |
Usado | Sim |
Obrigatório | Sim |
Browse | Não |
| Cons. Padrão | NJR |
Opções | (X3_CBOX) |
When | (X3_WHEN) |
Relação | (X3_RELACAO) |
Val. Sistema | ExistCPO("NJR") |
Help | Código do Contrato. |
Campo | N7R_TIPO |
Tipo | C |
Tamanho | 1 |
Decimal | 0 |
Formato | @! |
Título | Tipo |
Descrição | Tipo da Rota |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
| Cons. Padrão | (X3_F3) |
Opções | 1=Origem;2=Destino |
When | (X3_WHEN) |
Relação | '1' |
Val. Sistema | Pertence('12') |
Help | Tipo da Rota. |
Campo | N7R_CODROT |
Tipo | C |
Tamanho | 3 |
Decimal | 0 |
Formato | @! |
Título | Código |
Descrição | Código da Rota |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
| Cons. Padrão | SY9 |
Opções | (X3_CBOX) |
When | (X3_WHEN) |
Val. Sistema | ExistCPO("SY9") |
Help | Código da Rota. |
Campo | N7R_DESROT |
Tipo | C |
Tamanho | 25 |
Decimal | 0 |
Formato | @! |
Título | Desc. Rota |
Descrição | Descrição da Rota |
Nível | 1 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
| Cons. Padrão | (X3_F3) |
Opções | (X3_CBOX) |
When | (X3_WHEN) |
Val. Sistema | (X3_RELAÇÃO) |
Help | Descrição da Rota. |
Importante:
O tamanho dos campos que possuem grupo pode variar conforme ambiente em uso.
5. Criação de Consulta Padrão no arquivo SXB – Consulta Padrão:
- Pesquisa B05PLS:
Alias | (XB_ALIAS) |
Tipo | (XB_TIPO) |
Sequência | (XB_SEQ) |
Coluna | (XB_COLUNA) |
Descrição | (XB_DESCRI) |
Contém | (XB_CONTEM) |
6. Criação de Índices no arquivo SIX – Índices:
Índice | N7R |
Ordem | 1 |
Chave | N7R_FILIAL+N7R_CODCTR+N7R_TIPO+N7R_CODROT |
Descrição | Filial+Contrato+Tipo+Código |
Proprietário | S |
7. Criação ou Alteração de Parâmetros no arquivo SX6 – Parâmetros:
Nome da Variável | (X6_VAR) |
Tipo | (X6_TIPO) |
Descrição | (X6_DESCRIC + X6_DESC1 + X6_DESC2) |
Valor Padrão | (X6_CONTEUD) |
8. Criação de Gatilhos no arquivo SX7 – Gatilhos:
- Tabela NJR – Contratos:
Campo | NJR_CODEMB |
Sequência | 001 |
Campo Domínio | NJR_DESEMB |
Tipo | Primário |
Regra | EE5->EE5_DESC |
Posiciona? | NÃO |
Chave | xFilial('EE5")+M->NJR_CODEMB |
Condição |
|
Proprietário |
Campo | NJR_CONDPA |
Sequência | 001 |
Campo Domínio | NJR_DESCPA |
Tipo | Primário |
Regra | EEF->EEF_DESC |
Posiciona? | NÃO |
Chave | xFilial('EEF')+M->NJR_CONDPA |
Condição |
|
Proprietário |
Campo | NJR_VIA |
Sequência | 001 |
Campo Domínio | NJR_DESVIA |
Tipo | Primário |
Regra | SYQ->YQ_DESCR |
Posiciona? | NÃO |
Chave | xFilial('SYQ')+M->NJR_VIA |
Condição |
|
Proprietário |
Campo | NJR_INCOTE |
Sequência | 001 |
Campo Domínio | NJR_DESINC |
Tipo | Primário |
Regra | SYJ->YJ_DESCR |
Posiciona? | NÃO |
Chave | xFilial('SYJ')+M->NJR_INCOTE |
Condição |
|
Proprietário |
- Tabela N7R – Rotas de Exportaçã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
- 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 |
Procedimento para Utilização
1. Campo "Tipo de Mercado" no contrato de venda:
- No Gestão Agroindústria (SIGAAGR), acesse Atualizações / Originação / Controle de Venda / Contrato de Venda (OGA290).
a. Na aba "Logística" será possível informar se o contrato é tipo "Interno" ou "Externo". Caso seja "Externo" será habilitado os campos da aba de "Exportação".
Vídeo
- Vídeo hospedado no youtube e inserido no template por meio da macro Widget Connector.
** Canal do youtube e software de vídeoem definição.
Título do Vídeo: | Disponibilizado pelo Marketing. |
Introdução: | Disponibilizado pelo Marketing. |
Passo a Passo: | Capturar diretamente do sistema. |
Finalização: | Disponibilizado pelo Marketing. |
Ponto de Entrada
Descrição: | Informe o Menu em que estará localizada a rotina | ||||||||||||||||
Localização: | Informe o Submenu em que estará localizada a rotina | ||||||||||||||||
Eventos: | Informe o Título da rotina | ||||||||||||||||
Programa Fonte: | Informe o Fonte da rotina | ||||||||||||||||
Função: | Informe o Nome do(s) produto(s) a ser utilizado ou “Todos” | ||||||||||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function CN120ALT()
Local aCab:= PARAMIXB[1]
Local cTipo:= PARAMIXB[2]
If cTipo == '1'
aCab[4][2]:= 'NF' //Validações do usuário
EndIf
Return aCab