Histórico da Página
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. |
2. Pasta "Exportação" no contrato de venda:
- No Gestão Agroindústria (SIGAAGR), acesse Atualizações / Originação / Controle de Venda / Contrato de Venda (OGA290).
a. Na nova pasta "Exportação" será possível informar os dados da Modalidade de Pagamento do Processo de Exportação(Cond Pagto), Via de Transporte do Contrato para Mercado Externo(Via Transp.), Incoterm e os portos de origem e destino da viagem.
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