bolla lavanderia

MESSAGE _PAGENO 33.DATADOC 33.NDOC MESSAGE _CLIENTE,COFI 33.CODCF MESSAGE _CLIENTE,PAIV MESSAGE _CLIENTE,!RAGSOC MESSAGE _CLIENTE,!INDNUM MESSAGE _CLIENTE,LOCALITACF MESSAGE _CLIENTE,!CAP 210@.S0 MESSAGE _CLIENTE,STATOPAIV 20.TEL 11 11 16.LOCALITA 16.CAP 11 16.RAGSOC

!((34.TIPORIGA='08')) 1000@.S3 34.QTAGG1 34.PREZZO 34.CODART MESSAGE _DESCRIGA 30 34.QTA MESSAGE _ALIGN,#52,TOP

207@.S0 CODSPMEZZO

206@.S0 33.NOTE

USE 33 JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC JOIN LVCAU TO 34 ALIAS 1000 INTO CODTAB==CODAGG1 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 122 TO 33 INTO CODAGE==CODAG JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO 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 GCA TO 34 ALIAS 212 INTO CODTAB==3+CODART[7,12] JOIN GCA TO 34 ALIAS 213 INTO CODTAB==5+CODART[17,18]