diff --git a/ba/batbind.h b/ba/batbind.h index 24b98d5b0..4794c0ca8 100755 --- a/ba/batbind.h +++ b/ba/batbind.h @@ -16,4 +16,11 @@ #define F_NOMEID 114 #define F_GHOST_FIELD 115 #define F_BOLLATO 116 -#define F_CODICE 117 \ No newline at end of file +#define F_CODICE 117 +#define F_CAU_FATT 118 +#define F_CAU_NC 119 +#define F_CAU_INC 120 +#define F_CAU_ABB 121 +#define F_CAU_INS 122 +#define F_CAU_PAGINS 123 + diff --git a/ba/batbind.uml b/ba/batbind.uml index 77f849492..828104d45 100755 --- a/ba/batbind.uml +++ b/ba/batbind.uml @@ -1,12 +1,12 @@ #include "batbind.h" -TOOLBAR "" 0 18 0 2 +TOOLBAR "" 0 20 0 2 #include ENDPAGE -PAGE "Tabella ditte per invio" -1 -1 78 18 +PAGE "Tabella ditte per invio" -1 -1 78 20 NUMBER F_DITTAINV 5 BEGIN @@ -35,87 +35,178 @@ END GROUPBOX DLG_NULL 76 8 BEGIN - PROMPT 1 4 "Archivi da inviare" + PROMPT 1 3 "Archivi da inviare" END BOOLEAN F_CAUSALI BEGIN - PROMPT 2 5 "Tabella causali" + PROMPT 2 4 "Tabella causali" FIELD %IND->B0 END BOOLEAN F_CLIFO BEGIN - PROMPT 2 6 "Anagrafica Clienti/Fornitori" + PROMPT 2 5 "Anagrafica Clienti/Fornitori" FIELD %IND->B1 END BOOLEAN F_PCON BEGIN - PROMPT 2 7 "Anagrafica Piano dei Conti" + PROMPT 2 6 "Anagrafica Piano dei Conti" FIELD %IND->B2 END BOOLEAN F_MOV BEGIN - PROMPT 2 8 "Movimenti Prima Nota" + PROMPT 2 7 "Movimenti Prima Nota" FIELD %IND->B3 END BOOLEAN F_IVA BEGIN - PROMPT 2 9 "Movimenti Iva" + PROMPT 2 8 "Movimenti Iva" FIELD %IND->B4 END BOOLEAN F_FATT BEGIN - PROMPT 2 10 "Scadenze Fattura / Pagamento Rate" + PROMPT 2 9 "Scadenze Fattura / Pagamento Rate" FIELD %IND->B5 + MESSAGE TRUE ENABLE,1@ + MESSAGE FALSE CLEAR,1@ // FLAGS "D" END +GROUPBOX DLG_NULL 76 5 +BEGIN + PROMPT 1 11 "Causali di corrispondenza movimenti extracontabili" +END + +STRING F_CAU_FATT 3 +BEGIN + FLAGS "UZ" + PROMPT 2 12 "Fattura " + FIELD S5[1,3] + USE LF_CAUSALI SELECT TIPOMOV==1 + INPUT CODCAUS F_CAU_FATT + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_FATT CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + +STRING F_CAU_NC 3 +BEGIN + FLAGS "UZ" + PROMPT 2 13 "Nota di credito " + FIELD S5[4,6] + USE LF_CAUSALI SELECT TIPOMOV==2 + INPUT CODCAUS F_CAU_NC + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_NC CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + +STRING F_CAU_INC 3 +BEGIN + FLAGS "UZ" + PROMPT 2 14 "Incasso/Pagamento " + FIELD S5[7,9] + USE LF_CAUSALI SELECT TIPOMOV==3 + INPUT CODCAUS F_CAU_INC + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_INC CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + +STRING F_CAU_ABB 3 +BEGIN + FLAGS "UZ" + PROMPT 40 12 "Abbuono " + FIELD S5[10,12] + USE LF_CAUSALI SELECT TIPOMOV==4 + INPUT CODCAUS F_CAU_ABB + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_ABB CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + +STRING F_CAU_INS 3 +BEGIN + FLAGS "UZ" + PROMPT 40 13 "Insoluto " + FIELD S5[13,15] + USE LF_CAUSALI SELECT TIPOMOV==5 + INPUT CODCAUS F_CAU_INS + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_INS CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + +STRING F_CAU_PAGINS 3 +BEGIN + FLAGS "UZ" + PROMPT 40 14 "Pagamento insoluto " + FIELD S5[16,18] + USE LF_CAUSALI SELECT TIPOMOV==6 + INPUT CODCAUS F_CAU_PAGINS + DISPLAY "Codice causale" CODCAUS + DISPLAY "Descrizione@50" DESCR + OUTPUT F_CAU_PAGINS CODCAUS + CHECKTYPE NORMAL + GROUP 1 +END + BOOLEAN F_BOLLATO BEGIN - PROMPT 1 12 "Imposta il flag di bollato" + PROMPT 1 16 "Imposta il flag di bollato" FIELD %IND->B7 END NUMBER F_NUMULINV 3 BEGIN - PROMPT 1 13 "N.ro ult.invio " + PROMPT 1 17 "N.ro ult.invio " FIELD %IND->I0 FLAGS "RG" END DATE F_DATAULIN BEGIN - PROMPT 46 13 "Data ultimo invio " + PROMPT 46 17 "Data ultimo invio " FIELD %IND->D0 FLAGS "G" END STRING F_STATO 1 BEGIN - PROMPT 1 14 "Stato ultimo " + PROMPT 1 18 "Stato ultimo " FIELD %IND->S6 FLAGS "GU" END STRING F_USELAB 1 BEGIN - PROMPT 20 14 "" + PROMPT 20 18 "" FLAGS "GU" END TEXT DLG_NULL BEGIN - PROMPT 1 15 "invio " + PROMPT 1 19 "invio " END STRING F_CHIAVE 60 BEGIN - PROMPT 16 15 "" + PROMPT 16 19 "" FLAGS "GU" END @@ -124,7 +215,7 @@ BEGIN PROMPT -1 -30 "" FLAGS "DG" END - + ENDPAGE ENDMASK