Ajuste na rotina de RE Externa
Visando melhoria de processos no módulo de Drawback (SIGAEDC) foi implementado ajuste na rotina de RE’s Externos (EDCRE400), que permite ao usuário manipular registros de RE`s manualmente de forma mais eficaz.
- SIGAEDC
- nenhum
- todos
- Espanhol
- todos
· Aplicar atualização do(s) programas(s) EDCRE400.PRW, UDREExte.PRW, AVOBJECT.PRW, AvUPDATE01.PRW, AVGERAL.PRW.
· Para que as alterações sejam efetuadas, é necessário executar a função U_UDREEXTE.
Antes de executar o compatibilizador UDREEXTE é imprescindível:
a) Realizar o backup da base de dados do produto que será executado o compatibilizador (\PROTHEUS_DATA\DATA) e dos dicionários de dados SXs (\PROTHEUS_DATA\SYSTEM).
b) Os diretórios acima mencionados correspondem à instalação padrão do Protheus, portanto, devem ser alterados conforme o produto instalado na empresa.
c) Essa rotina deve ser executada em modo exclusivo, ou seja, nenhum usuário deve estar utilizando o sistema.
d) Se os dicionários de dados possuírem índices personalizados (criados pelo usuário), antes de executar o compatibilizador, certifique-se de que estão identificados pelo nickname. Caso o compatibilizador necessite criar índices, irá adicioná-los a partir da ordem original instalada pelo Protheus, o que poderá sobrescrever índices personalizados, caso não estejam identificados pelo nickname.
1. Em Microsiga Protheus TOTVS Smart Client, digite U_UDREEXTE no campo Programa Inicial.
2. Clique em OK para continuar.
3. Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
4. Clique em Sim para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos.
É apresentada uma mensagem explicativa na tela.
5. Em seguida, é exibida a janela Atualização concluída com o histórico (log) de todas as atualizações processadas. Nesse log de atualização são apresentados somente os campos atualizados pelo programa. O compatibilizador cria os campos que ainda não existem no dicionário de dados.
6. Clique em Gravar para salvar o histórico (log) apresentado.
7. Clique em OK para encerrar o processamento.
1. Alteração de Campos no arquivo SX3 – Campos:
· Tabela ED9 – Manut de RE Externa:
Campo | ED9_DESC | ED9_QTD | ED9_FILIAL |
Tamanho | 60 | 15 | 02 |
Decimal | 0 | 5 | 0 |
Formato | @! | @E 999,999,999.99999 |
|
Ini. Browse | E_Field('ED9_PROD','B1_DESC') |
|
|
Relação | E_Field('ED9_PROD','B1_DESC') |
|
|
Val. Sistema |
| Positivo().AND. RE400ValidED9() |
|
Campo | ED9_EXPORT | ED9_LOJA | ED9_NCM |
Tamanho | 14 | 02 | 10 |
Decimal | 0 | 0 | 0 |
Formato | @R 99.999.999/9999-99 |
| @R 9999.99.99 |
Val. Sistema |
|
| CE400VALID('ED9_NCM') |
Campo | ED9_RE | ED9_POSICA | ED9_DTRE |
Tamanho | 12 | 04 | 08 |
Decimal | 0 | 0 | 0 |
Formato | @R 99/9999999-999 | 9999 | @D |
Campo | ED9_DTEMB | ED9_PESO | ED9_UM |
Tamanho | 08 | 17 | 02 |
Decimal | 0 | 7 | 0 |
Formato | @D | @E 999,999,999.9999999 | @! |
Campo | ED9_VL_FOB | ED9_TX_MOE | ED9_VALMOE |
Tamanho | 15 | 15 | 15 |
Decimal | 2 | 8 | 2 |
Formato | @E 999,999,999,999.99 | @E 999,999.99999999 | @E 999,999,999,999.99 |
Campo | ED9_MOEDA | ED9_NF | ED9_SERIE |
Tamanho | 03 | 06 | 03 |
Decimal | 0 | 0 | 0 |
Formato | @! |
|
|
Val. Sistema | CE400VALID('ED9_MOEDA') |
|
|
Campo | ED9_EMISSA | ED9_AC | ED9_QT_AC |
Tamanho | 08 | 13 | 15 |
Decimal | 0 | 0 | 5 |
Formato |
|
| @E 999,999,999.99999 |
When |
| .F. |
|
Campo | ED9_VL_AC |
Tamanho | 15 |
Decimal | 2 |
Formato | @E 999,999,999,999.99 |
2. Criação de Campos no arquivo SX3 – Campos:
· Tabela ED9 – Manut de RE Externa:
Campo | ED9_PROD | ED9_VAL_SE | ED9_VALCOM |
Tipo | C | N | N |
Tamanho | 30 | 15 | 15 |
Decimal | 0 | 2 | 2 |
Formato | @! | @E 999,999,999,999.99 | @E 999,999,999,999.99 |
Título | Prod.Exporta | Val.Sem.Cob | Val.Comis. |
Descrição | Produto Exportado | Valor Sem Combertura | Valor Comissao Agen. |
Val. Sistema | CE400VALID(‘ED9_PROD’) | Positivo() | Positivo() |
Consulta Padrão | SB1 |
|
|
Campo | ED9_VALORI | ED9_UMNCM | ED9_QTDNCM |
Tipo | N | C | N |
Tamanho | 15 | 2 | 15 |
Decimal | 2 | 0 | 5 |
Formato | @E 999,999,999,999.99 |
| @E 999,999,999.99999 |
Título | Val.Cond.Ven | Un.Med.NCM | Qtd.NCM |
Descrição | Valor na Cond.Venda | Unid.Medida NCM | Qtd.Unid.NCM |
Val. Sistema | Positivo() | EXISTCPO('SAH') | Positivo() |
Consulta Padrão |
| SAH |
|
Campo | ED9_TX_USS | ED9_DTAVRB | ED9_ISENTO |
Tipo | N | D | C |
Tamanho | 15 | 8 | 1 |
Decimal | 8 | 0 | 0 |
Formato | @E 999,999.99999999 |
| |
Título | Taxa US$ | Dt.Averb | Isento |
Descrição | Taxa US$ Dt.Emb | Data Averbacao S.D | Insencao Total |
Opções |
|
| 1=Sim;2=Nao |
Val. Sistema | Positivo() |
| Pertence('12') |
Campo | ED9_SALISE | ED9_FASEDR | ED9_DT_INT |
Tipo | N | C | D |
Tamanho | 15 | 1 | 8 |
Decimal | 5 | 0 | 0 |
Formato | @E 999,999,999.99999 |
| |
Título | Saldo Inse. | Drawback | Dt.Int |
Descrição | Saldo Insencao | Fase Drawback | Data da Integracao |
Opções |
| 1=Sim;2=Nao |
|
Val. Sistema | Positivo() | Pertence('12') |
|
Campo | ED9_SEQSIS |
Tipo | C |
Tamanho | 3 |
Decimal | 0 |
Formato | 999 |
Título | Seq.AC. |
Descrição | Seq.AC. |
When | !Empty(M->ED9_PROD) |
Val. Sistema | CE400VALID("ED9_SEQSIS") |
· Tabela SYD – Nomenclatura Comum do Mercosul:
Campo | YD_PER_AC |
Tipo | C |
Tamanho | 1 |
Decimal | 0 |
Formato | @! |
Título | Permite AC |
Descrição | Permite NCM em A.C. |
Opções | 1=Sim;2=Nao |
Val. Sistema | Pertence('12') |
O tamanho dos campos que possuem grupo podem variar conforme ambiente em uso.
3. Criação de Consulta Padrão no arquivo SXB – Consulta Padrão:
Alias | ED3 | ED3 | ED3 |
Tipo | 1 | 2 | 4 |
Sequência | 01 | 01 | 01 |
Coluna | DB | 01 | 01 |
Descrição | Saldo dos Produtos | Numero do contrato | Ato Concessorio |
Contém | ED3 |
| ED3->ED3_AC |
Alias | ED3 | ED3 | ED3 |
Tipo | 4 | 5 | 5 |
Sequência | 01 | 01 | 02 |
Coluna | 02 |
|
|
Descrição | Seq.Siscomex |
|
|
Contém | ED3->ED3_SEQSIS | ED3->ED3_AC | ED3->ED3_SEQSIS |
Alias | E29 | ERE | ERE |
Tipo | 6 | 1 | 2 |
Sequência |
| 01 | 01 |
Coluna |
| DB | 02 |
Descrição |
| Itens | Ato Concessorio |
Contém | ED4->ED4_ITEM $ M->ED8_COD_I .and. ED4->ED4_AC $ M->ED8_AC | ED3 |
|
Alias | ERE | ERE | ERE |
Tipo | 4 | 4 | 4 |
Sequência | 01 | 01 | 01 |
Coluna | 01 | 02 | 03 |
Descrição | Ato Concessorio | Item | Posicao |
Contém | ED3->ED3_AC | ED3->ED3_PROD | ED3->ED3_SEQSI |
Alias | ERE | ERE | ERE |
Tipo | 4 | 4 | 5 |
Sequência | 01 | 01 | 01 |
Coluna | 04 | 05 |
|
Descrição | NCM | U.M. |
|
Contém | ED3->ED3_NCM | ED3->ED3_UMPROD | ED3->ED3_SEQSIS |
Alias | ERE |
Tipo | 6 |
Sequência | 01 |
Coluna |
|
Descrição |
|
Contém | ED3->ED3_PROD $ M->ED9_PROD .and. ED3->ED3_AC $ M->ED0_AC |
4. Criação de Índices no arquivo SIX – Índices:
Índice | ED9 |
Ordem | 4 |
Chave | ED9_FILIAL+ED9_RE+ED9_POSICA |
Descrição | Re + Posicao |
Proprietário | S |
5. Criação de Gatilhos no arquivo SX7 – Gatilhos:
· Tabela ED9 – Manut de RE Externa:
Campo | ED9_PROD |
Sequência | 001 |
Regra | SB1->B1_DESC |
Campo Domínio | ED9_DESC |
Tipo | Primario |
Posiciona? | Sim |
Chave | XFILIAL('SB1')+M->ED9_PROD |
Proprietário | S |
Sequência 001:
1. No Easy Drawback Control (SIGAEDC) acesse Atualizações/Comprovações Exter/RE`s Externos (EDCRE400).
2. Clique em Incluir.
3. Informe os dados necessários e clique em OK.
4. O registro é exibido em tela.
Tabelas Utilizadas | ED9 – Manut de RE Externa SYD – Nomenclatura Comum do Mercosul |