ordine sec

20.PTEL+' '+20.TEL 20.PFAX+' '+20.FAX #PAGE+"F;" 33.DATADOC 33.NDOC MESSAGE _CLIENTE,COFI IF(33.CODVAL='','EURO',33.CODVAL) 33.CODCF MESSAGE _CLIENTE,PAIV 201@.S0 MESSAGE _CLIENTE,!RAGSOC MESSAGE _CLIENTE,!INDNUM MESSAGE _CLIENTE,LOCALITACF MESSAGE _CLIENTE,!CAP MESSAGE _TABLEREAD,%STA,#27,S0 #BOOKPAGES 210@.S0 MESSAGE _CLIENTE,STATOPAIV 122.RAGSOC 16.LOCALITA 7 33.CODCABA 16.CAP 7 33.CODABIA 7 20.NUMCC 16.RAGSOC

"LOGO.JPG"

34.TIPORIGA='01' 34.CODART MESSAGE _DESCRIGA 34.UMQTA MESSAGE _ALIGN,#52,TOP 30 34.QTA MESSAGE _ALIGN,#52,TOP 29 34.PREZZO MESSAGE _ALIGN,#52,TOP 34.SCONTO MESSAGE _ALIGN,#52,TOP 29 34.IMPNS MESSAGE _ALIGN,#52,TOP 31 IF(34.QTAE;0,34.DATACONS,'') IF(34.QTAE;0,33.DATACONS,'') MESSAGE _ALIGN,#52,TOP

(34.TIPORIGA!='01')(34.TIPORIGA!='02')(34.TIPORIGA!='03') 34.CODART MESSAGE _DESCRIGA 34.UMQTA MESSAGE _ALIGN,#52,TOP 34.QTA MESSAGE _ALIGN,#52,TOP 34.PREZZO MESSAGE _ALIGN,#52,TOP 34.SCONTO MESSAGE _ALIGN,#52,TOP 34.IMPNS MESSAGE _ALIGN,#52,TOP

33.NOTE 211@.S0 203@.S0 31 TOTMER 33.SCONTOPERC 31 TOTMER-SCONTOT 31 SPESTRA 31 SPESINC 31 IMPONIBILI 31 IMPOSTE 31 TOTDOC

USE 33 JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC JOIN 17 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF JOIN 20 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 16 TO 17 ALIAS 116 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP JOIN 13 TO 16 INTO STATO=STATO COM=COM JOIN 47 TO 34 INTO CODART==CODART JOIN %CPG TO 33 ALIAS 201 INTO CODTAB==CODPAG JOIN 122 TO 33 INTO CODAGE==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO JOIN %BAN TO 33 ALIAS 204 INTO CODTAB==CODABIA+CODCABA JOIN %BAN TO 33 ALIAS 205 INTO CODTAB==CODABIP+CODCABP JOIN %BAN TO 33 ALIAS 206 INTO CODTAB==CODABIP JOIN BNP TO 33 ALIAS 207 INTO CODTAB==CODABIP+CODCABP JOIN %BAN TO 33 ALIAS 208 INTO CODTAB==CODABIA JOIN %VAL TO 33 ALIAS 209 INTO CODTAB==CODVAL JOIN %TIP TO 33 ALIAS 210 INTO CODTAB==TIPODOC JOIN %MSP TO 33 ALIAS 211 INTO CODTAB==CODSPMEZZO