Stampa Riepilogativa Risorse
#SYSTEM.DATE
#REPORT.PAGE
#S_CMSFROM
#S_CMSTO
#S_DATEFROM
#S_DATETO
CODCMS
MESSAGE RESET,F2.230
DOC.CODCMS
MESSAGE COPY,F2.521
COMMESSE.DESCRIZ
MESSAGE COPY,F2.521
iF(#901!="",#901+" - "+#902,"Non Specificato")
MESSAGE COPY,F2.521
DOC.TIPODOC
MESSAGE RESET,F3.110|RESET,F3.130
DOC.TIPODOC
MESSAGE COPY,F3.511
RDOC.CODART!='' RDOC.CODART!=' '
RDOC.QTA
MESSAGE ADD,F4.10|ADD,F3.110
RDOC.PREZZO
#1*#2
MESSAGE ADD,F3.130|ADD,F2.230|ADD,F1.330
MESSAGE _TABLEREAD,%TIP,#511,S0
USE RDOC KEY 2
BY CODCMS 33.TIPODOC[2,4]
JOIN DOC INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC
JOIN COMMESSE INTO CODCMS=CODCMS