DTCONS+CODITI 167.GGCONS

167.CODITI 300@.S0 167.CODAUT 301@.S0 DTCONS 302@.S0 167.CODMEZ

CODITI

167.ORDFER 167.CODCF IF(#F_CHECK_MNEM='X';303@.RICALT;303@.RAGSOC) 167.MODPASS

167.CODNUM #NEXTCONS IF(304@.CODINDSP= "0";303@.CIVCF+','+303@.INDCF;305@.CIV+','+305@.INDIR) 167.NDOC IF(304@.CODINDSP= "0" ;303@.COMCF;305@.COM) MESSAGE _ISAMREAD,COMUNI,COM=#1000,DENCOM IF(304@.CODINDSP= "0" ;303@.LOCALITACF;305@.LOCALITA) IF(#1001="";#1002;#1001)

USE 167 KEY 2 SELECT (BETWEEN(CODITI,#FROM_CODITI,#TO_CODITI))(BETWEEN(CODAUT,#FROM_CODAUT,#TO_CODAUT))(BETWEEN(CODCF,#FROM_CODCF,#TO_CODCF)) JOIN ITI ALIAS 300 INTO CODTAB==CODITI JOIN AUT TO 167 ALIAS 301 INTO CODTAB==CODAUT JOIN MEZ TO 167 ALIAS 302 INTO CODTAB==CODMEZ JOIN 20 TO 167 ALIAS 303 INTO TIPOCF=="C" CODCF==CODCF JOIN 168 TO 167 ALIAS 304 INTO CODCONT==CODCONT CODCF==CODCF JOIN 16 TO 168 ALIAS 305 INTO TIPOCF=="C" CODCF==CODCF CODIND==CODINDSP FROM DTCONS=#FROM_DATA TO DTCONS=#TO_DATA