Stampa Sintetica Risorse
#SYSTEM.DATE #REPORT.PAGE #S_CMSFROM #S_CMSTO #S_DATEFROM #S_DATETO
MESSAGE RESET,F1.330
DOC.CODCMS MESSAGE RESET,F2.230 iF(#901!="",#901+" - "+#902,"Non Specificato") MESSAGE COPY,F2.521
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!=' '
MESSAGE _TABLEREAD,%TIP,#511,S0
#30F;IF(#10E;0,#10,1)
USE RDOC KEY 2 SELECT (((CODNUM=#S_CODNUM)||(CODNUM="MNI"))STR(CODCMSE;=#S_CMSFROM)STR(CODCMSC;=#S_CMSTO)NUM(ANSI(33.DATADOC)E;=ANSI(#S_DATEFROM))NUM(ANSI(33.DATADOC)C;=#S_DATETO)) BY 33.CODCMS 33.TIPODOC CODART JOIN DOC INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC JOIN COMMESSE INTO CODCMS=CODCMS