Aggiunta tabella agenti.

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

ba/bastage.uml

@@ -0,0 +1,42 @@
+#include "ba3200.h"
+
+PAGE "Stampa Agenti" -1 -1 50 8
+STRING F_INIZIO1 5
+BEGIN
+PROMPT 2 1 "Da codice "
+FLAGS "U"
+HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
+FIELD LF_TABCOM->CODTAB
+USE %AGE
+INPUT CODTAB F_INIZIO1
+DISPLAY "Codice" CODTAB
+DISPLAY "Descrizione@30" S0
+OUTPUT F_INIZIO1 CODTAB
+GROUP 1
+END
+
+STRING F_FINE1 5
+BEGIN
+PROMPT 2 3 "A codice  "
+FLAGS "U"
+HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
+FIELD LF_TABCOM->CODTAB
+COPY USE F_INIZIO1
+INPUT CODTAB F_FINE1
+COPY DISPLAY F_INIZIO1
+OUTPUT F_FINE1 CODTAB
+GROUP 2
+END
+
+BUTTON DLG_OK 8 2
+BEGIN
+PROMPT -12 -1 ""
+END
+
+BUTTON DLG_QUIT 8 2
+BEGIN
+PROMPT -22 -1 ""
+END
+
+ENDPAGE
+ENDMASK

ba/batbage.h

@@ -0,0 +1,8 @@
+
+//      campi maschera batb%age.msk
+
+#define F_CODICE                            101
+#define F_DESCR                             102
+
+
+

ba/batbage.rpt

@@ -0,0 +1,10 @@
+[Headers]
+80
+Tabella Agenti
+1|@3g%s|Codice
+1|@14g%s|Descrizione
+
+[Rows]
+1|CODTAB|@3g@5,ls
+1|S0|@14g@30,ls
+

ba/batbage.uml

@@ -0,0 +1,44 @@
+#include <batb%age.h>
+
+TOOLBAR "" 0 20 0 2
+
+#include <toolbar.h>
+
+ENDPAGE
+
+PAGE "Tabella Codici Agenti" -1 -1 78 8
+
+STRING F_CODICE 5
+BEGIN
+PROMPT 4 2 "Codice      "
+FIELD CODTAB
+FLAGS "U"
+KEY 1
+USE %AGE
+INPUT CODTAB F_CODICE
+DISPLAY "Codice" CODTAB
+DISPLAY "Descrizione @30" S0
+OUTPUT F_CODICE CODTAB
+OUTPUT F_DESCR S0
+CHECKTYPE REQUIRED
+END
+
+STRING F_DESCR 30
+BEGIN
+PROMPT 4 4 "Descrizione "
+FIELD LF_TABCOM->S0
+KEY 2
+USE %AGE KEY 2
+INPUT CODTAB F_CODICE
+INPUT S0 F_DESCR
+DISPLAY "Descrizione @30" S0
+DISPLAY "Codice" CODTAB
+OUTPUT F_CODICE CODTAB
+OUTPUT F_DESCR S0
+CHECKTYPE REQUIRED
+END
+
+ENDPAGE
+ENDMASK
+
+