report fatturato per anno con confronto
#SYSTEM.RAGSOC
#SYSTEM.DATE
#PAGE
#BOOKPAGES
#DAANNO
#ADANNO
33.CODCF
MESSAGE RESET,F2.1|RESET,F2.2|RESET,F2.3
MESSAGE RESET,F2.4|RESET,F2.5|RESET,F2.6
MESSAGE RESET,F2.7|RESET,F2.8|RESET,F2.9
MESSAGE RESET,F2.10|RESET,F2.11|RESET,F2.12|RESET,F2.13
20.COMCF
20.CAPCF
33.CODCF
MESSAGE ISAMREAD,20,TIPOCF='C'!CODCF=#10,RAGSOC
ANNO
MESSAGE RESET,F3.1|RESET,F3.2|RESET,F3.3
MESSAGE RESET,F3.4|RESET,F3.5|RESET,F3.6
MESSAGE RESET,F3.7|RESET,F3.8|RESET,F3.9
MESSAGE RESET,F3.10|RESET,F3.11|RESET,F3.12|RESET,F3.13
33.ANNO[3,4]
33.DATADOC
TIPODOC
IF(TIPODOC[1,1]='N',-1,1)
ROUND(IF(33.DATADOC[4,5]='01',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.1
ROUND(IF(33.DATADOC[4,5]='02',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.2
ROUND(IF(33.DATADOC[4,5]='03',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.3
ROUND(IF(33.DATADOC[4,5]='04',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.4
ROUND(IF(33.DATADOC[4,5]='05',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.5
ROUND(IF(33.DATADOC[4,5]='06',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.6
ROUND(IF(33.DATADOC[4,5]='07',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.7
ROUND(IF(33.DATADOC[4,5]='08',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.8
ROUND(IF(33.DATADOC[4,5]='09',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.9
ROUND(IF(33.DATADOC[4,5]='10',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.10
ROUND(IF(33.DATADOC[4,5]='11',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.11
ROUND(IF(33.DATADOC[4,5]='12',G1:IMPONIBILI,0)*#1,2)
MESSAGE ADD,F3.12
#ADANNO-#DAANNO
#THIS @
0 = IF
"F1" SHOW
ELSE
"F1" HIDE
THEN
"TOTALE GENERALE"
#1 @
#2 @
+
#3 @
+
#4 @
+
#5 @
+
#6 @
+
#7 @
+
#8 @
+
#9 @
+
#10 @
+
#11 @
+
#12 @
+
#THIS !
#H2.20
#1 @
#2 @
+
#3 @
+
#4 @
+
#5 @
+
#6 @
+
#7 @
+
#8 @
+
#9 @
+
#10 @
+
#11 @
+
#12 @
+
#THIS !
#H3.10
MESSAGE ADD,F2.1
MESSAGE ADD,F1.1
MESSAGE ADD,F2.2
MESSAGE ADD,F1.2
MESSAGE ADD,F2.3
MESSAGE ADD,F1.3
MESSAGE ADD,F2.4
MESSAGE ADD,F1.4
MESSAGE ADD,F2.5
MESSAGE ADD,F1.5
MESSAGE ADD,F2.6
MESSAGE ADD,F1.6
MESSAGE ADD,F2.7
MESSAGE ADD,F1.7
MESSAGE ADD,F2.8
MESSAGE ADD,F1.8
MESSAGE ADD,F2.9
MESSAGE ADD,F1.9
MESSAGE ADD,F2.10
MESSAGE ADD,F1.10
MESSAGE ADD,F2.11
MESSAGE ADD,F1.11
MESSAGE ADD,F2.12
MESSAGE ADD,F1.12
#1 @
#2 @
+
#3 @
+
#4 @
+
#5 @
+
#6 @
+
#7 @
+
#8 @
+
#9 @
+
#10 @
+
#11 @
+
#12 @
+
#THIS !
USE DOC KEY 3 SELECT ((CODNUM='F01')||(CODNUM='F02'))(ANNOE;=#DAANNO)(ANNOC;=#ADANNO)((CODCF=#CLISEL)||(#CLISEL=''))(BETWEEN(DATADOC,#DADATA,#ADATA))
BY CODCF ANNO DATADOC
JOIN 20 INTO TIPOCF==TIPOCF CODCF==CODCF