Aggiunte la maschera di stampa ed il report della tabella

cambi giornalieri.


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

ba/bastcam.uml

@@ -0,0 +1,68 @@
+#include "ba3200.h"
+
+PAGE "Stampa Tabella Cambi Giornalieri" -1 -1 58 8
+
+STRING F_INIZIO1 3
+BEGIN
+  PROMPT 2 1 "Da valuta  "
+  HELP "Inserire la valuta iniziale "
+  FIELD LF_TABCOM->CODTAB[1,3]
+  USE CAM 
+  JOIN %VAL ALIAS 200 INTO CODTAB=CODTAB[1,3] 
+  INPUT CODTAB[1,3] F_INIZIO1
+  INPUT CODTAB[4,11] F_INIZIO2
+  DISPLAY "Valuta" CODTAB[1,3]
+  DISPLAY "Data valuta" D0
+  DISPLAY "Descrizione@50" -200->S0
+  OUTPUT F_INIZIO1 CODTAB[1,3]
+  OUTPUT F_INIZIO2 CODTAB[4,11]
+  GROUP 1
+END
+
+DATE F_INIZIO2
+BEGIN
+	PROMPT 28 1 "A data   "
+	HELP "Inserire la data iniziale"
+	FIELD LF_TABCOM->CODTAB[4,11]
+	COPY ALL F_INIZIO1
+	GROUP 1
+END
+
+STRING F_FINE1 3
+BEGIN
+  PROMPT 2 3 "A valuta   "
+  HELP "Inserire la valuta finale  "
+  FIELD LF_TABCOM->CODTAB[1,3]
+  COPY USE F_INIZIO1
+  INPUT CODTAB[1,3] F_FINE1
+  INPUT CODTAB[4,11] F_FINE2
+  DISPLAY "Valuta" CODTAB[1,3]
+  DISPLAY "Data valuta" D0
+  DISPLAY "Descrizione@50" -200->S0
+  OUTPUT F_FINE1 CODTAB[1,3]
+  OUTPUT F_FINE2 CODTAB[4,11]
+  GROUP 2
+END
+
+
+DATE F_FINE2 
+BEGIN
+	PROMPT 28 3 "A data   "
+	HELP "Inserire la data finale  "
+	FIELD LF_TABCOM->CODTAB[4,11]
+	COPY ALL F_FINE1
+	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/batbcam.rpt

@@ -0,0 +1,16 @@
+[Relations]
+%VAL;CODTAB=CODTAB[1,3];1;0;200
+
+[Headers]
+132
+Tabella Cambi Giornalieri
+1|@2g%s|Cod. Valuta 
+1|@16g%s|Data
+1|@30g%s|Descrizione
+1|@80g%s|Cambio
+
+[Rows]
+1|CODTAB[1,3]|@2g@3s
+1|D0|@15g@ld 
+1|-200->S0|@30g@50,ls 
+1|R10|@82g@15,rpn|##########,@@@@@