Stampa Analitica Risorse per Cliente
#SYSTEM.DATE #REPORT.PAGE MESSAGE _ISAMREAD,147,CODCMS=#10,DESCRIZ #S_DATEFROM #S_DATETO #S_CMS
MESSAGE RESET,F1.330
DOC.CODCF MESSAGE RESET,F2.230 IF(CLIFO.RAGSOC="","(Cod. "+DOC.CODCF+")",DOC.CODCF+' - '+CLIFO.RAGSOC) MESSAGE COPY,F2.521
DOC.NDOC MESSAGE RESET,F3.110|RESET,F3.130
RDOC.CODART!=''  RDOC.CODART!=' ' DOC.NDOC DOC.DATADOC MESSAGE RDOC.CODART MESSAGE SHOW,10|HIDE,20 MESSAGE EMPTY SHOW,20|HIDE,10 RDOC.UMQTA RDOC.QTA MESSAGE RESET,2 RDOC.PREZZO #50*#80 MESSAGE ADD,F3.130|ADD,F2.230|ADD,F1.330
MESSAGE _TABLEREAD,%TIP,#511,S0
USE RDOC KEY 2 BY 20.RAGSOC 33.NDOC 33.DATADOC NRIGA JOIN DOC INTO CODNUM=CODNUM ANNO=ANNO PROVV=PROVV NDOC=NDOC JOIN CLIFO TO DOC INTO CODCF=CODCF TIPOCF=TIPOCF