Interrogazione Cliente\Articolo
34.CODART
MESSAGE RESET,F3.1000
MESSAGE RESET,F3.2000
MESSAGE _TODAY
MESSAGE _PAGENO
#F_CODCF
#F_RAGSOC
#F_CODART
#F_DESART
#F_CODAGG1
#F_DESCODAGG1
#F_CODNUM
#F_DESCODNUM
#F_TIPODOC
#F_DESTIPODOC
#F_DATADOC_DA
#F_DATADOC_A
IF(#F_TOT=='X';'Si';'No')
166.DOTIN
166.DOTOD
166.DOTTM
IF(#F_TOT=='X';' ';'Num. Tipo Anno')
IF(#F_TOT=='X';' ';'Num.Doc.')
IF(#F_TOT=='X';' ';'Data Doc.')
IF(#F_TOT=='X';' ';'Caus.Lav.')
IF(#F_TOT=='X';' ';'')
IF(#F_TOT=='X';' ';'')
TRIM(34.CODART) + "-" + TRIM(47.DESCR)
#F_TOT!='X'
33.CODNUM
33.TIPODOC
33.ANNO
33.NDOC
33.DATADOC
34.CODAGG1
34.QTAGG1
MESSAGE ADD,F3.1000
34.QTA
MESSAGE ADD,F3.2000
#F_TOT=='X'
33.CODNUM
33.TIPODOC
33.ANNO
33.NDOC
33.DATADOC
34.CODAGG1
34.QTAGG1
MESSAGE ADD,F3.1000
34.QTA
MESSAGE ADD,F3.2000
USE 34 KEY 5
SELECT (BETWEEN(33.TIPODOC,#F_TIPODOC,#F_TIPODOC)(34.CODART!='')(BETWEEN(33.CODCF,#F_CODCF,#F_CODCF))(BETWEEN(34.CODNUM,#F_CODNUM,#F_CODNUM))(BETWEEN(33.DATADOC,#F_DATADOC_DA,#F_DATADOC_A))(BETWEEN(34.CODART,#F_CODART,#F_CODART))(BETWEEN(34.CODAGG1,#F_CODAGG1,#F_CODAGG1)))
JOIN 33 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC
JOIN 20 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF
JOIN 47 TO 34 INTO CODART==CODART
JOIN 166 TO 34 INTO ANNOES==ANNO TIPOCF=="C" CODCF==#F_CODCF CODART==CODART