Rotina de importação do fluxo orçamentário por natureza do PCO, realiza a Amarração de Natureza X Conta Orcamentaria.
Será necessário criar uma nova tabela pois a FJ7 utilizada no projeto CNI foi sobreposta para a tabela Custo Transação Captação, e realizar a troca do apontamento da tabela FJ7 para a nova tabela que será criada.
Também será necessário realizar a migração para o padrão MVC.
Adicionar a Rotina ao Menu:
Atualizações > Cadastro
Substituir a função CNI270HEAD que realiza a criação do HEAD, pois a mesma utiliza o X3 diretamente do banco, devera ser utilizada dbStruct() na FJ7.
Realiza a Amarração Cadastro de Natureza X Contas Orçamentarias
Alteração da Amarração Cadastro de Natureza X Contas Orçamentarias
Exclusão da Amarração Cadastro de Natureza X Contas Orçamentarias
Visualiza a Amarração Cadastro de Natureza X Contas Orçamentarias
Importa o fluxo orçamentário por natureza do PCO.
Será necessário realizar a troca de nome de funções.
CNIA270 = FINA272
CNI270INC = F272INC
CNI270MNT = F272MNT
CNI270HEAD = F272HEAD
CNI270COLS = F272COLS
CNI270GGRV = F272GGRV
CNI270VLD = F272VLD
CNI270LOK = F272LOK
CNI270TOK = F272TOK
CNI270VLG = F272VLG
CNI270IMP = F272IMP
CNI270MARK = F272MARK
CNI270TDMK = F272TDMK
CNI270SE7 = F272SE7
CNI270PERG = F272PERG
CNI270ORD = F272ORD
CNI270GTMP = F272GTMP
CNI270CHAV = F272CHAV
CNI270SLD = F272SLD
CNI270DAT = F272DAT
CNI270TMP = F272TMP
CNI270CAMP = F272CAMP
CNI270MOED = F272MOED
| X3_ARQUIVO | X3_ORDEM | X3_CAMPO | X3_TIPO | X3_TAMANHO | X3_DECIMAL | X3_TITULO | X3_TITSPA | X3_TITENG | X3_DESCRIC | X3_DESCSPA | X3_DESCENG | X3_PICTURE | X3_VALID | X3_USADO | X3_RELACAO | X3_F3 | X3_NIVEL | X3_RESERV | X3_CHECK | X3_TRIGGER | X3_PROPRI | X3_BROWSE | X3_VISUAL | X3_CONTEXT | X3_OBRIGAT | X3_VLDUSER | X3_CBOX | X3_CBOXSPA | X3_CBOXENG | X3_PICTVAR | X3_WHEN | X3_INIBRW | X3_GRPSXG | X3_FOLDER | X3_PYME | X3_CONDSQL | X3_CHKSQL | X3_IDXSRV | X3_ORTOGRA | X3_IDXFLD | X3_TELA | X3_PICBRV | X3_AGRUP | X3_POSLGT | X3_MODAL |
| FJ7 | 01 | FJ7_FILIAL | C | 8 | Filial | Sucursal | Branch | Filial do Sistema | Sucursal | Branch of the System | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇÇ | 1 | ÇÇ | N | 033 | S | N | 1 | 2 | ||||||||||||||||||||||||||
| FJ7 | 02 | FJ7_NATUR | C | 10 | Natureza | Natureza | Natureza | Codigo da Natureza | Codigo da Natureza | Codigo da Natureza | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | ■└ | S | S | N | A | R | ExistCpo("SED") | ||||||||||||||||||||||||||
| FJ7 | 03 | FJ7_DESNAT | C | 30 | Desc Naturez | Desc Naturez | Desc Naturez | Descricao da Natureza | Descricao da Natureza | Descricao da Natureza | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | IF(!INCLUI,POSICIONE("SED",1,XFILIAL("SED") + FJ7->FJ7_NATUR,"ED_DESCRIC"),"") | ■└ | S | N | V | V | |||||||||||||||||||||||||||
| FJ7 | 04 | FJ7_ITEM | C | 4 | Item | Item | Item | Item Sequencial | Item Sequencial | Item Sequencial | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | ■└ | S | N | V | R | ||||||||||||||||||||||||||||
| FJ7 | 05 | FJ7_COINI | C | 20 | Cta. Orc. De | Cta. Orc. De | Cta. Orc. De | Cod Cta Orcament Inicial | Cod Cta Orcament Inicial | Codigo da Conta Orcamenta | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK5 | ■└ | S | N | A | R | Ç | ExistCpo("AK5") .And. CNI270VLD("FJ7_COINI") | 013 | |||||||||||||||||||||||||
| FJ7 | 06 | FJ7_COFIM | C | 20 | Cta. Orc Ate | Cta. Orc Ate | Cta. Orc Ate | Cod Cta Orcament Final | Cod Cta Orcament Final | Cod Cta Orcament Final | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK5 | ■└ | S | N | A | R | Ç | ExistCpo("AK5") .And. CNI270VLD("FJ7_COFIM") | 013 | |||||||||||||||||||||||||
| FJ7 | 07 | FJ7_CLASSE | C | 6 | Classe | Classe | Classe | Codigo da Classe | Codigo da Classe | Codigo da Classe | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK6 | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("AK6") | ||||||||||||||||||||||||||
| FJ7 | 08 | FJ7_CCINI | C | 20 | UO De | Cent Cust De | Cent Cust De | Cod UO Inicial | Cod Cent Custo Inicial | Cod Cent Custo Inicial | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTT | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCINI") | 004 | |||||||||||||||||||||||||
| FJ7 | 09 | FJ7_CCFIM | C | 20 | UO Ate | CentCust Ate | CentCust Ate | Cod UO Final | Cod Cent Custo Final | Cod Cent Custo Final | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTT | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCFIM") | 004 | |||||||||||||||||||||||||
| FJ7 | 10 | FJ7_ITCTBI | C | 20 | CR. Cont De | It. Cont De | It. Cont De | Cod CR Contabil Inicial | Cod Item Contabil Inicial | Cod Item Contabil Inicial | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTD | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBI") | 005 | |||||||||||||||||||||||||
| FJ7 | 11 | FJ7_ITCTBF | C | 20 | CR. Cont Ate | It. Cont Ate | It. Cont Ate | Cod CR Contabil Final | Cod Item Contabil Final | Cod Item Contabil Final | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTD | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBF") | 005 | |||||||||||||||||||||||||
| FJ7 | 12 | FJ7_CLVRLI | C | 20 | Clas Vlr De | Clas Vlr De | Clas Vlr De | Cod Classe Valor Inicial | Cod Classe Valor Inicial | Cod Classe Valor Inicial | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTH | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLI") | 006 | |||||||||||||||||||||||||
| FJ7 | 13 | FJ7_CLVRLF | C | 20 | Clas Vlr Ate | Clas Vlr De | Clas Vlr De | Cod Classe Valor Final | Cod Classe Valor Inicial | Cod Classe Valor Inicial | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTH | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLF") | 006 | |||||||||||||||||||||||||
| FJ7 | 14 | FJ7_CODCAP | C | 8 | Codigo Cap | Cod.Captac. | Cap Code | Codigo da CapitaþÒo | Codigo de la capitacion | Collection Code | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 | |||||||||||||||||||||||||||
| FJ7 | 15 | FJ7_ITCTRA | C | 5 | Item C Trans | Item C.Trans | Item C Trans | Item Custo TransaþÒo | Item costo transaccion | Item Transaction Cost | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 | |||||||||||||||||||||||||||
| FJ7 | 16 | FJ7_DESC | C | 40 | DescriþÒo | Descripcion | Description | DescriþÒo do Custo Trans | Descripc.Costo Trans. | Description Trans Cost | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 |
| INDICE | ORDEM | CHAVE | DESCRICAO | DESCSPA | DESCENG | PROPRI | F3 | NICKNAME | SHOWPESQ | IX_VIRTUAL | IX_VIRCUST |
| FJ7 | 2 | FJ7_FILIAL+FJ7_CODCAP+FJ7_ITCTRA | Natureza+Item | Natureza+Item | Natureza+Item | U | N | ||||
| FJ7 | 1 | FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM | Natureza+Item | Natureza+Item | Natureza+Item | U | N | 2 | 3 |
| X2_CHAVE | X2_PATH | X2_ARQUIVO | X2_NOME | X2_NOMESPA | X2_NOMEENG | X2_ROTINA | X2_MODO | X2_MODOUN | X2_MODOEMP | X2_DELET | X2_TTS | X2_UNICO | X2_PYME | X2_MODULO | X2_DISPLAY | X2_SYSOBJ | X2_USROBJ | X2_POSLGT | X2_CLOB | X2_AUTREC | X2_TAMFIL | X2_TAMUN | X2_TAMEMP |
| FJ7 | FJ7T10 | Custo TransaþÒo CaptaþÒo | Costo transaccion captacion | Caption Transaction Cost | C | C | C | FJ7_FILIAL+FJ7_CODCAP+FJ7_ITCTRA | S | 6 | 1 | 2 | 2 |
| Campo | NOVATAB_FILIAL |
| Ordem | 01 |
| Tipo | C |
| Tamanho | 8 |
| Reservado | Sim |
| Decimal | |
| Formato | |
| Titulo | Filial |
| Descrição | Filial do Sistema |
| Nivel | 1 |
| Usado | |
| Obrigatorio | |
| Browse | N |
| Visual | |
| Contexto | |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos | 033 - Tamanho da Filial |
| TOTVS PDV | Sim |
| Modal | Não |
| Campo | NOVATAB_NATUR |
| Ordem | 02 |
| Tipo | C |
| Tamanho | 10 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Natureza |
| Descrição | Codigo da Natureza |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | ExistCpo("SED") |
| Consulta Padrão | |
| Grupo de Campos |
| Campo | NOVATAB_DESNAT |
| Ordem | 03 |
| Tipo | C |
| Tamanho | 30 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Desc Naturez |
| Descrição | Descrição da Natureza |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | V |
| Contexto | V |
| When | |
| Relação | IF(!INCLUI,POSICIONE("SED",1,XFILIAL("SED") + FJ7->FJ7_NATUR,"ED_DESCRIC"),"") |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos |
| Campo | NOVATAB_ITEM |
| Ordem | 04 |
| Tipo | C |
| Tamanho | 4 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Item |
| Descrição | Item Sequencial |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | V |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos |
| Campo | NOVATAB_COINI |
| Ordem | 05 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | |
| Titulo | Cta. Orc. De |
| Descrição | Cod Cta Orcament Inicial |
| Nivel | |
| Usado | Sim |
| Obrigatorio | Ç |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | ExistCpo("AK5") .And. CNI270VLD("FJ7_COINI") |
| Consulta Padrão | AK5 |
| Grupo de Campos | 013 - Conta Orçamentaria |
| Campo | NOVATAB_COFIM |
| Ordem | 06 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | |
| Titulo | Cta. Orc Ate |
| Descrição | Cod Cta Orcament Final |
| Nivel | |
| Usado | Sim |
| Obrigatorio | Ç |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | ExistCpo("AK5") .And. CNI270VLD("FJ7_COFIM") |
| Consulta Padrão | AK5 |
| Grupo de Campos | 013 - Conta Orçamentaria |
| Campo | NOVATAB_CLASSE |
| Ordem | 07 |
| Tipo | C |
| Tamanho | 6 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Classe |
| Descrição | Codigo da Classe |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("AK6") |
| Consulta Padrão | AK6 |
| Grupo de Campos |
| Campo | NOVATAB_CCINI |
| Ordem | 08 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | UO De |
| Descrição | Cod UO Inicial |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCINI") |
| Consulta Padrão | CTT |
| Grupo de Campos | 004 - Centro de Custo |
| Campo | NOVATAB_CCFIM |
| Ordem | 09 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | UO Ate |
| Descrição | Cod UO Final |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCFIM") |
| Consulta Padrão | CTT |
| Grupo de Campos | 004 - Centro de Custo |
| Campo | NOVATAB_ITCTBI |
| Ordem | 10 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | CR. Cont De |
| Descrição | Cod CR Contabil Inicial |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBI") |
| Consulta Padrão | CTD |
| Grupo de Campos | 005 - Item Contabil |
| Campo | NOVATAB_ITCTBF |
| Ordem | 11 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | CR. Cont Ate |
| Descrição | Cod CR Contabil Final |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBF") |
| Consulta Padrão | CTD |
| Grupo de Campos | 005 - Item Contabil |
| Campo | NOVATAB_CLVRLI |
| Ordem | 12 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Clas Vlr De |
| Descrição | Cod Classe Valor Inicial |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLI") |
| Consulta Padrão | CTH |
| Grupo de Campos | 006 - Classe de Valor |
| Campo | NOVATAB_CLVRLF |
| Ordem | 13 |
| Tipo | C |
| Tamanho | 20 |
| Reservado | Não |
| Decimal | |
| Formato | @! |
| Titulo | Clas Vlr Ate |
| Descrição | Cod Classe Valor Final |
| Nivel | |
| Usado | Sim |
| Obrigatorio | |
| Browse | N |
| Visual | A |
| Contexto | R |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLF") |
| Consulta Padrão | CTH |
| Grupo de Campos | 006 - Classe de Valor |
| Campo | NOVATAB_CODCAP |
| Ordem | 14 |
| Tipo | C |
| Tamanho | 8 |
| Reservado | Sim |
| Decimal | |
| Formato | |
| Titulo | Codigo Cap |
| Descrição | Codigo da Capitação |
| Nivel | 1 |
| Usado | Sim |
| Obrigatorio | |
| Browse | |
| Visual | |
| Contexto | |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos | |
| TOTVS PDV | Sim |
| Modal | Não |
| Campo | NOVATAB_ITCTRA |
| Ordem | 15 |
| Tipo | C |
| Tamanho | 5 |
| Reservado | Sim |
| Decimal | |
| Formato | |
| Titulo | Item C Trans |
| Descrição | Item Custo Transação |
| Nivel | 1 |
| Usado | Sim |
| Obrigatorio | |
| Browse | |
| Visual | |
| Contexto | |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos | |
| TOTVS PDV | Sim |
| Modal | Não |
| Campo | NOVATAB_DESC |
| Ordem | 16 |
| Tipo | C |
| Tamanho | 40 |
| Reservado | Sim |
| Decimal | |
| Formato | |
| Titulo | Descrição |
| Descrição | Descrição do Custo Trans |
| Nivel | 1 |
| Usado | Sim |
| Obrigatorio | |
| Browse | |
| Visual | |
| Contexto | |
| When | |
| Relação | |
| Valid. | |
| Validação Sis. | |
| Consulta Padrão | |
| Grupo de Campos | |
| TOTVS PDV | Sim |
| Modal | Não |
1 - FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM
2 - FJ7_FILIAL+FJ7_CODCAP+FJ7_ITCTRA
Como a Tabela e FJ7 é utilizada hoje.
Atualmente a tabela FJ7 é denominada como Custo Transação Captação
FJ7_CODCAP
FJ7_DESC
FJ7_FILIAL
FJ7_ITCTRA
FJ7_ITEM
FJ7_NATUR
FJ7_DESNAT
FJ7_FILIAL
FJ7_COINI
FJ7_COFIM
FJ7_CCINI
FJ7_CCFIM
FJ7_ITCTBF
FJ7_ITCTBI
FJ7_CLVRLI
FJ7_CLVRLF
FJ7_CLASSE
1 - FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM
Será necessário aumentar a Grid da tela conforme evidência a Baixo.

| FJ7_FILIAL | FJ7_NATUR | FJ7_ITEM | FJ7_COINI | FJ7_COFIM | FJ7_CLASSE | FJ7_CCINI | FJ7_CCFIM | FJ7_ITCTBI | FJ7_ITCTBF | FJ7_CLVRLI | FJ7_CLVRLF | FJ7_CODCAP | FJ7_ITCTRA | FJ7_DESC | D_E_L_E_T_ | R_E_C_N_O_ | R_E_C_D_E_L_ |
| 001 | 001 | 001 | 001 | 000003 | 001 | 001 | 001 | 001 | 001 | 001 | 001 | 001 | Padrao | 1 | 0 |
