Lista ritenute per F24

#SYSTEM.RAGSOC #SYSTEM.DATE #DADATA #ADATA

CODCF CODCF MESSAGE _ISAMREAD,CLIFO,TIPOCF='C'!CODCF=CODCF,RAGSOC

USE RDOC SELECT (TIPORIGA=='04')(110@-E;S10!='') JOIN SPP ALIAS 110 INTO CODTAB==CODART 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 NDOC 33.DATADOC IMPNS RITENUTA MESSAGE _TABLEREAD,SPP,CODART,S10

USE DOC KEY 4 SELECT (CODNUM=#NUM)(NUM(ANSI(DATADOC)E;=ANSI(#DADATA)))(NUM(ANSI(DATADOC)C;=ANSI(#ADATA))) FROM TIPOCF='C' TO TIPOCF='C'