Stampa Sintetica per CommessaF;Cantiere
#SYSTEM.DATE #REPORT.PAGE #S_CMSFROM #S_CMSTO #S_DATEFROM #S_DATETO
MESSAGE RESET,F1.330
DOC.CODCMS MESSAGE RESET,F2.230 DOC.CODCMS
DOC.TIPODOC MESSAGE RESET,F3.110|RESET,F3.130
RDOC.CODART MESSAGE RESET,F4.10|RESET,F4.20|RESET,F4.30
RDOC.CODART!=''  RDOC.CODART!=' '
RDOC.DESCR RDOC.UMQTA RDOC.QTA
DOC.CODCMS
DOC.TIPODOC
RDOC.CODART RDOC.DESCR RDOC.UMQTA #30F;IF(#10E;0,#10,1)
USE DOC KEY 3 BY CODCMS TIPODOC JOIN RDOC INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC FROM DATADOC=#S_DATEFROM TO DATADOC=#S_DATETO