Effetti per Clienti - Fornitori
MESSAGE RESET,F1
TIPOCF
MESSAGE COPY,F1.101
TIPOCF+CODCF
MESSAGE RESET,F2
CODCF
MESSAGE ISAMREAD,20,TIPOCF=#H1.101!CODCF=#102,RAGSOC
MESSAGE COPY,F2.103
CUP+CIG
MESSAGE RESET,F3
CUP
MESSAGE COPY,F3.103
CIG
MESSAGE COPY,F3.104
NPROGTR
DATASCAD
TIPOPAG
NUMEMISS
DATAEMISS
NDIST
DATADIST
NRIGADIST
IMPORTO
MESSAGE ADD,F3.106
USE EFFETTI KEY 2
SELECT ((CUP!="")(BETWEEN(CUP,#CUP,#CUP)))((CIG!="")(BETWEEN(CIG,#CIG,#CIG)))(BETWEEN(DATASCAD,#DADATA,#ADATA))
BY CODCF CUP CIG DATASCAD
FROM TIPOCF=#TIPOCF CODCF=#CODCF
TO TIPOCF=#TIPOCF CODCF=#CODCF