...
Import routine of the budget flow by nature of the PCO, carries out theBinding the Binding of Nature X Budget Account.
...
Replace the CNI270HEAD function that creates the HEAD, since it uses X3 directly from the base; FJ7 must use dbStruct().
Realiza a Amarração Cadastro de Natureza X Contas OrçamentariasRegister of Nature x Budget Accounts Binding
Edit Registration of Nature x Budget Accounts Binding
Delete Registration of Nature x Budget Accounts Binding
View Registration of Nature x Budget Accounts Binding
Import the budget flow by nature of PCO.
It will be necessary to change the function names.
...
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
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 |
1 - FJ7_FILIAL+FJ7_NATUR+FJ7_ITEM
...
It will be necessary to increase the screen grid as shown below.
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 |
View file name six0101.dtc height 250 View file name sx20101.dtc height 250 View file name sx30101.dtc height 250
...