01. Summary
Import routine of the budget flow by nature of the PCO, carries out the Binding of Nature X Budget Account.
Creation of a table
It will be necessary to create a table because the FJ7 used in the CNI project was superimposed on the Funding Transaction Cost table, and to change the entry of the FJ7 table to the table that will be created.
MVC
You will also need to migrate to the MVC standard.
Menu
Add Routine to Menu:
Updates > Registration
Remove reading from SX3
Replace the CNI270HEAD function that creates the HEAD, since it uses X3 directly from the base; FJ7 must use dbStruct().
02. Operations
Add
Register of Nature x Budget Accounts Binding
Edit
Edit Registration of Nature x Budget Accounts Binding
Delete
Delete Registration of Nature x Budget Accounts Binding
View
View Registration of Nature x Budget Accounts Binding
Import
Import the budget flow by nature of PCO.
03. Function name change
It will be necessary to change the function names.
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
04. Data Structure
Structure
SX3
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 | System Branch | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇÇ | 1 | ÇÇ | N | 033 | S | N | 1 | 2 | ||||||||||||||||||||||||||
FJ7 | 02 | FJ7_NATUR | C | 10 | Nature | Nature | Nature | Nature Code | Nature Code | Nature Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | ■└ | S | S | N | A | R | ExistCpo("SED") | ||||||||||||||||||||||||||
FJ7 | 03 | FJ7_DESNAT | C | 30 | Nature Desc | Nature Desc | Nature Desc | Class Description | Class Description | Class Description | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 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 | Sequential Item | Sequential Item | Sequential Item | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | ■└ | S | N | V | R | ||||||||||||||||||||||||||||
FJ7 | 05 | FJ7_COINI | C | 20 | From Bud Acc | From Bud Acc | From Bud Acc | Initial Budget Acc Code | Initial Budget Acc Code | Budget Account Code | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK5 | ■└ | S | N | A | R | Ç | ExistCpo("AK5") .And. CNI270VLD("FJ7_COINI") | 013 | |||||||||||||||||||||||||
FJ7 | 06 | FJ7_COFIM | C | 20 | Acc. Bud to | Acc. Bud to | Acc. Bud to | Final Budget Acc Code | Final Budget Acc Code | Final Budget Acc Code | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK5 | ■└ | S | N | A | R | Ç | ExistCpo("AK5") .And. CNI270VLD("FJ7_COFIM") | 013 | |||||||||||||||||||||||||
FJ7 | 07 | FJ7_CLASSE | C | 6 | Class | Class | Class | Class Code | Class Code | Class Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | AK6 | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("AK6") | ||||||||||||||||||||||||||
FJ7 | 08 | FJ7_CCINI | C | 20 | From UO | From Cost Cent | From Cost Cent | Initial UO Code | Initial Cost Cent Code | Initial Cost Cent Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTT | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCINI") | 004 | |||||||||||||||||||||||||
FJ7 | 09 | FJ7_CCFIM | C | 20 | To UO | To Cost Cent | To Cost Cent | Final UO Code | Final Cost Cent Code | Final Cost Cent Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTT | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCFIM") | 004 | |||||||||||||||||||||||||
FJ7 | 10 | FJ7_ITCTBI | C | 20 | CR. From Acc | It From Acc | It From Acc | Initial Accounting RA Code | Initial Accounting Item Code | Initial Accounting Item Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTD | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBI") | 005 | |||||||||||||||||||||||||
FJ7 | 11 | FJ7_ITCTBF | C | 20 | CR. To Acc | It To Acc | It To Acc | Final Accounting RA Code | Final Accounting Item Code | Final Accounting Item Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTD | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBF") | 005 | |||||||||||||||||||||||||
FJ7 | 12 | FJ7_CLVRLI | C | 20 | From Val Class | From Val Class | From Val Class | Initial Value Class Code | Initial Value Class Code | Initial Value Class Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTH | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLI") | 006 | |||||||||||||||||||||||||
FJ7 | 13 | FJ7_CLVRLF | C | 20 | To Val Class | From Val Class | From Val Class | Final Value Class Code | Initial Value Class Code | Initial Value Class Code | @! | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | CTH | ■└ | S | N | A | R | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLF") | 006 | |||||||||||||||||||||||||
FJ7 | 14 | FJ7_CODCAP | C | 8 | Codigo Cap | Cod.Captac. | Coll Code | Código da captação | Codigo de la capitacion | Collection Code | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 | |||||||||||||||||||||||||||
FJ7 | 15 | FJ7_ITCTRA | C | 5 | Item Transac C | Item Transac C | Item Transac C | Item Custo Transação | Item costo transaccion | Item Transaction Cost | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 | |||||||||||||||||||||||||||
FJ7 | 16 | FJ7_DESC | C | 40 | Description | Descripcion | Description | Descrição do Custo Trans | Descripc.Costo Trans. | Description Trans Cost | ÇÇÇÇÇÇÇÇÇÇÇÇÇÇá | 1 | äÇ | S | N | N | 1 | 2 |
SIX
INDEX | ORDER | KEY | DESCRIPTION | DESCSPA | DESCENG | PROP | F3 | NICKNAME | SHOWPESQ | IX_VIRTUAL | IX_VIRCUST |
FJ7 | 2 | FJ7_FILIAL+FJ7_CODCAP+FJ7_ITCTRA | Nature+Item | Nature+Item | Nature+Item | U | N | ||||
FJ7 | 1 | FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM | Nature+Item | Nature+Item | Nature+Item | U | N | 2 | 3 |
SX2
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 |
Fields
BRANCH
Field | NOVATAB_FILIAL |
Order | 01 |
Type | C |
Size | 8 |
Reserved | Yes |
Decimal | |
Format | |
Title | Branch |
Description | System branch |
Level | 1 |
Used | |
Mandatory | |
Browse | N |
Visual | |
Context | |
When | |
Relation | |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group | 033 - Branch Size |
TOTVS POS | Yes |
Modal | No |
NATUR
Field | NOVATAB_NATUR |
Order | 02 |
Type | C |
Size | 10 |
Reserved | No |
Decimal | |
Format | @! |
Title | Nature |
Description | Nature Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | ExistCpo("SED") |
Standard Query | |
Field Group |
DESNAT
Field | NOVATAB_DESNAT |
Order | 03 |
Type | C |
Size | 30 |
Reserved | No |
Decimal | |
Format | @! |
Title | Nature Desc |
Description | Nature Description |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | V |
Context | V |
When | |
Relation | IF(!INCLUI,POSICIONE("SED",1,XFILIAL("SED") + FJ7->FJ7_NATUR,"ED_DESCRIC"),"") |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group |
ITEM
Field | NOVATAB_ITEM |
Order | 04 |
Type | C |
Size | 4 |
Reserved | No |
Decimal | |
Format | @! |
Title | Item |
Description | Sequential Item |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | V |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group |
COINI
Field | NOVATAB_COINI |
Order | 05 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | |
Title | From Bud Acc |
Description | Initial Budget Acc Code |
Level | |
Used | Yes |
Mandatory | Ç |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | ExistCpo("AK5") .And. CNI270VLD("FJ7_COINI") |
Standard Query | AK5 |
Field Group | 013 - Budget Account |
COFIM
Field | NOVATAB_COFIM |
Order | 06 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | |
Title | Acc. Bud to |
Description | Final Budget Acc Code |
Level | |
Used | Yes |
Mandatory | Ç |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | ExistCpo("AK5") .And. CNI270VLD("FJ7_COFIM") |
Standard Query | AK5 |
Field Group | 013 - Budget Account |
CLASS
Field | NOVATAB_CLASSE |
Order | 07 |
Type | C |
Size | 6 |
Reserved | No |
Decimal | |
Format | @! |
Title | Class |
Description | Class Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("AK6") |
Standard Query | AK6 |
Field Group |
CCINI
Field | NOVATAB_CCINI |
Order | 08 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | From UO |
Description | Initial UO Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCINI") |
Standard Query | CTT |
Field Group | 004 - Cost Center |
CCFIM
Field | NOVATAB_CCFIM |
Order | 09 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | To UO |
Description | Final UO Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTT") .And. CNI270VLD("FJ7_CCFIM") |
Standard Query | CTT |
Field Group | 004 - Cost Center |
ITCTBI
Field | NOVATAB_ITCTBI |
Order | 10 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | CR. From Acc |
Description | Initial Accounting RA Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBI") |
Standard Query | CTD |
Field Group | 005 - Accounting Item |
ITCTBF
Field | NOVATAB_ITCTBF |
Order | 11 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | CR. To Acc |
Description | Final Accounting RA Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTD") .And. CNI270VLD("FJ7_ITCTBF") |
Standard Query | CTD |
Field Group | 005 - Accounting Item |
CLVRLI
Field | NOVATAB_CLVRLI |
Order | 12 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | From Val Class |
Description | Initial Value Class Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLI") |
Standard Query | CTH |
Field Group | 006 - Value Class |
CLVRLF
Field | NOVATAB_CLVRLF |
Order | 13 |
Type | C |
Size | 20 |
Reserved | No |
Decimal | |
Format | @! |
Title | To Val Class |
Description | Final Value Class Code |
Level | |
Used | Yes |
Mandatory | |
Browse | N |
Visual | A |
Context | R |
When | |
Relation | |
Valid. | |
Sys. Validation | Vazio() .Or. ExistCpo("CTH") .And. CNI270VLD("FJ7_CLVRLF") |
Standard Query | CTH |
Field Group | 006 - Value Class |
CODCAP
Field | NOVATAB_CODCAP |
Order | 14 |
Type | C |
Size | 8 |
Reserved | Yes |
Decimal | |
Format | |
Title | Coll Code |
Description | Collection Code |
Level | 1 |
Used | Yes |
Mandatory | |
Browse | |
Visual | |
Context | |
When | |
Relation | |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group | |
TOTVS POS | Yes |
Modal | No |
ITCTRA
Field | NOVATAB_ITCTRA |
Order | 15 |
Type | C |
Size | 5 |
Reserved | Yes |
Decimal | |
Format | |
Title | Item Transac C |
Description | Transaction Cost Item |
Level | 1 |
Used | Yes |
Mandatory | |
Browse | |
Visual | |
Context | |
When | |
Relation | |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group | |
TOTVS POS | Yes |
Modal | No |
DESC
Field | NOVATAB_DESC |
Order | 16 |
Type | C |
Size | 40 |
Reserved | Yes |
Decimal | |
Format | |
Title | Description |
Description | Transac Cost Description |
Level | 1 |
Used | Yes |
Mandatory | |
Browse | |
Visual | |
Context | |
When | |
Relation | |
Valid. | |
Sys. Validation | |
Standard Query | |
Field Group | |
TOTVS POS | Yes |
Modal | No |
Index
1 - FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM
2 - FJ7_FILIAL+FJ7_CODCAP+FJ7_ITCTRA
How the Table FJ7 is used today
Currently, table FJ7 is called Transaction Funding Cost
FJ7_CODCAP
FJ7_DESC
FJ7_FILIAL
FJ7_ITCTRA
Fields identified in Source FINA272 (CNI)
Fields:
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
Index
1 - FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM
05. Screen Fix
It will be necessary to increase the screen grid as shown below.
06. Saving to Database
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 | Default | 1 | 0 |
07. Attachments
six0101.dtcsx20101.dtcsx30101.dtc
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas