fattura accompagnatoria standard

MESSAGE _PAGENO 33.DATADOC 33.NDOC 34.CODMAG MESSAGE _CLIENTE,COFI IF(33.CODVAL='','EURO',33.CODVAL) 33.CODCF MESSAGE _CLIENTE,PAIV 201@.S0 208@.S0 71 204@.S0 MESSAGE _CLIENTE,!RAGSOC MESSAGE _CLIENTE,!INDNUM MESSAGE _CLIENTE,LOCALITACF MESSAGE _CLIENTE,!CAP MESSAGE _TABLEREAD,%STA,#27,S0 210@.S0 MESSAGE _CLIENTE,STATOPAIV IF(33-E;CODVAL="";"LIRE";209@-E;S0) 210@.S0 11 11 16.LOCALITA 16.CAP 70 213@.S3 70 71 33.CODCABA 71 33.CODABIA 71 33.IBAN[16,]+' CIN:'+33.IBAN[5,5] 71 71 71 11 16.RAGSOC 70 MESSAGE TABLEREAD,%BAN,#119,S0

(34.TIPORIGA!='08') 34.CODART MESSAGE _DESCRIGA 34.UMQTA MESSAGE _ALIGN,#52,BOTTOM 34.QTA MESSAGE _ALIGN,#52,BOTTOM 34.PREZZO MESSAGE _ALIGN,#52,BOTTOM 34.SCONTO MESSAGE _ALIGN,#52,BOTTOM 34.IMPNS MESSAGE _ALIGN,#52,BOTTOM 34.CODIVA MESSAGE _ALIGN,#52,BOTTOM

207@.S0 CODSPMEZZO

TOTLORDO TOTMER 33.SCONTOPERC SPESTRA SPESIMB 33.IMPPAGATO MESSAGE _RIEPILOGOIVA,1,COD,0 MESSAGE _RIEPILOGOIVA,1,IMP,0 MESSAGE _RIEPILOGOIVA,1,ALI,0 MESSAGE _RIEPILOGOIVA,1,IVA,1 MESSAGE _RIEPILOGOIVA,1,COD,0 MESSAGE _RIEPILOGOIVA,1,IMP,0 MESSAGE _RIEPILOGOIVA,1,ALI,0 MESSAGE _RIEPILOGOIVA,1,IVA,1 MESSAGE _RIEPILOGOIVA,1,COD,0 MESSAGE _RIEPILOGOIVA,1,IMP,0 ORAPART MESSAGE _RIEPILOGOIVA,1,ALI,0 DATAPART MESSAGE _RIEPILOGOIVA,1,IVA,1 MESSAGE _RIEPILOGOIVA,30,IMP,0 206@.S0 MESSAGE _RIEPILOGOIVA,30,COD,0 IF(33.PNETTO=0,TOTPESO,33.PNETTO) MESSAGE _RIEPILOGOIVA,30,DES,1 IF(33.NCOLLI=0,TOTCOLLI,33.NCOLLI) MESSAGE _RIEPILOGOIVA,30,IMP,0 MESSAGE _RIEPILOGOIVA,30,COD,0 33.STPAL

MESSAGE SHOW,132

MESSAGE HIDE,132

MESSAGE _RIEPILOGOIVA,30,DES,1 IMPONIBILI IMPOSTE TOTDOC IF(33.NBANC=0,TOTBANC,33.NBANC) 33.IMPPAGATO MESSAGE SUB,138 MESSAGE _SCADENZE,DATA,0 MESSAGE _SCADENZE,IMPORTO,1 MESSAGE _SCADENZE,DATA,0 MESSAGE _SCADENZE,IMPORTO,1 MESSAGE _SCADENZE,DATA,0 MESSAGE _SCADENZE,IMPORTO,1 MESSAGE _SCADENZE,DATA,0 MESSAGE _SCADENZE,IMPORTO,1 MESSAGE _SCADENZE,DATA,0 MESSAGE _SCADENZE,IMPORTO,1 33.NOTE 203@.S0

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 %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1 JOIN %ABE TO 33 ALIAS 206 INTO CODTAB==ASPBENI1 JOIN %CTR TO 33 ALIAS 207 INTO CODTAB==CAUSTRASP 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 JOIN BNP TO 33 ALIAS 213 INTO CODTAB==CODABIP+CODCABP+PROGBNP