STAMPA CONFERIMENTI

MESSAGE RESET,F1.101|RESET,F1.102|RESET,F1.103|RESET,F1.104|RESET,F1.105|RESET,F1.106|RESET,F1.107|RESET,F1.108 #DADATA #ADATA #DAMERCATO #AMERCATO #DACODART #DACODART

USE RDOC JOIN 47 INTO CODART==CODARTMAG FROM PROVV=#PARENT.PROVV ANNO=#PARENT.ANNO CODNUM=#PARENT.CODNUM NDOC=#PARENT.NDOC TO PROVV=#PARENT.PROVV ANNO=#PARENT.ANNO CODNUM=#PARENT.CODNUM NDOC=#PARENT.NDOC #PARENT.DATADOC #PARENT.CODCF MESSAGE _ISAMREAD,CLIFO,TIPOCF='C'!CODCF=#PARENT.CODCF,RAGSOC #PARENT.NFASTA RDOC.CODARTMAG ANAMAG.DESCR #PARENT.MERCATO MESSAGE _ISAMREAD,CLIFO,TIPOCF='C'!CODCF=#PARENT.MERCATO,RAGSOC #PARENT.NDOC #PARENT.101@.CODCF RDOC.QTAGG1 MESSAGE ADD,F1.101 RDOC.PREZZONN RDOC.IMPCNN MESSAGE ADD,F1.103 N1 RDOC.NCOLLI N1 #PARENT.101@.CODCF RDOC.QTA MESSAGE ADD,F1.102 RDOC.PREZZONS RDOC.IMPCNS MESSAGE ADD,F1.104 RDOC.IMPCNS MESSAGE ADD,F1.105 RDOC.IMPCNS MESSAGE ADD,F1.106 RDOC.RITENUTA MESSAGE ADD,F1.107

RDOC.IMPCNS RDOC.IMPCNS

USE DOC SELECT (NUM(ANSI(DATADOC))E;=NUM(ANSI(#DADATA)))(NUM(ANSI(DATADOC))C;=NUM(ANSI(#ADATA))) FROM PROVV='D' ANNO=#ANNO CODNUM=#CODNUM TO PROVV='D' ANNO=#ANNO CODNUM=#CODNUM