Aggiunto invio contabilita'

git-svn-id: svn://10.65.10.50/trunk@1268 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/batbind.h

@@ -0,0 +1,17 @@
+// Campi maschera tabella ditte per invio
+
+#define F_DITTAINV    101
+#define F_CAUSALI     102
+#define F_CLIFO       103
+#define F_PCON        104
+#define F_MOV         105
+#define F_IVA         106
+#define F_FATT        107
+#define F_NUMULINV    108
+#define F_DATAULIN    109
+#define F_STATO       110
+#define F_RAGSOC      111
+#define F_USELAB      112
+#define F_CHIAVE      113
+#define F_NOMEID      114  
+#define F_GHOST_FIELD 115

ba/batbind.uml

@@ -0,0 +1,118 @@
+#include "batbind.h"
+
+TOOLBAR "" 0 18 0 3
+
+#include <toolbar.h>
+
+ENDPAGE
+
+PAGE "Tabella ditte per invio" -1 -1 78 18
+
+NUMBER F_DITTAINV 5
+BEGIN
+  PROMPT 2 1 "Codice ditta inviante "
+  FIELD %IND->CODTAB
+  FLAGS "Z"
+  KEY 1     
+  USE %IND
+  INPUT CODTAB[1,5] F_DITTAINV
+  DISPLAY "Codice ditta inviante" CODTAB
+  DISPLAY "Ultimo numero invio" I0
+  DISPLAY "Ultima data invio" D0
+  DISPLAY "Stato ultimo tras." S6 
+  OUTPUT F_DITTAINV CODTAB
+  OUTPUT F_NUMULINV I0
+  OUTPUT F_DATAULIN D0
+  OUTPUT F_STATO S6
+  CHECKTYPE REQUIRED
+END
+
+STRING F_RAGSOC 50
+BEGIN
+  PROMPT 2 2 "Ragione sociale       "
+  FLAGS "D"
+END
+
+GROUPBOX DLG_NULL 76 8
+BEGIN
+  PROMPT 1 4 "Archivi da inviare"
+END
+
+BOOLEAN F_CAUSALI
+BEGIN
+  PROMPT 2 5 "Tabella causali"
+  FIELD %IND->B0
+END
+
+BOOLEAN F_CLIFO
+BEGIN
+  PROMPT 2 6 "Anagrafico Clienti/Fornitori"
+  FIELD %IND->B1
+END
+
+BOOLEAN F_PCON
+BEGIN
+  PROMPT 2 7 "Anagrafico Piano dei Conti"
+  FIELD %IND->B2
+END
+
+BOOLEAN F_MOV
+BEGIN
+  PROMPT 2 8 "Movimenti Prima Nota"
+  FIELD %IND->B3
+END
+
+BOOLEAN F_IVA
+BEGIN
+  PROMPT 2 9 "Movimenti Iva"
+  FIELD %IND->B4
+END
+
+BOOLEAN F_FATT
+BEGIN
+  PROMPT 2 10 "Scadenze Fattura / Pagamento Rate"
+  FIELD %IND->B5
+//  FLAGS "D"
+END
+
+NUMBER F_NUMULINV 3
+BEGIN
+  PROMPT 2 13 "Numero ultimo invio  "
+  FIELD %IND->I0
+  FLAGS "RG"
+END
+
+DATE F_DATAULIN 
+BEGIN
+  PROMPT 44 13 "Data ultimo invio   "
+  FIELD %IND->D0
+  FLAGS "G"
+END
+            
+STRING F_STATO 1
+BEGIN
+  PROMPT 2 14 "Stato ultimo invio   "
+  FIELD %IND->S6
+  FLAGS "G"
+END             
+
+STRING F_USELAB 1
+BEGIN
+  PROMPT 26 14 ""
+  FLAGS "G"
+END
+
+STRING F_CHIAVE 15
+BEGIN
+  PROMPT 29 14 ""
+  FLAGS "G"
+END
+
+STRING F_GHOST_FIELD 1
+BEGIN
+  PROMPT -1 -30 ""
+END
+                  
+ENDPAGE
+
+ENDMASK