bolla lavanderia16.COMMESSAGE EMPTY DISABLE,69
MESSAGE ENABLE,6933.NOTEMESSAGE _PAGENO33.DATADOC33.NDOC34.CODMAGMESSAGE _CLIENTE,COFIIF(33.CODVAL='','EURO',33.CODVAL)33.CODCFMESSAGE _CLIENTE,PAIVMESSAGE _CLIENTE,!RAGSOCMESSAGE _CLIENTE,!INDNUMMESSAGE _CLIENTE,LOCALITACFMESSAGE _CLIENTE,!CAPMESSAGE _CLIENTE,!COM-E;DENCOM
MESSAGE COPY,26MESSAGE _CLIENTE,!COM-E;PROVCOM
MESSAGE APPEND,26MESSAGE _TABLEREAD,%STA,#27,S0
MESSAGE APPEND,26210@.S0MESSAGE _CLIENTE,STATOPAIV20.TEL16.STATO#THIS @
STRLEN
DUP
1 =
IF
"00" #THIS @ + #THIS !
THEN
2 =
IF
"0" #THIS @ + #THIS !
THEN
16.INDIRMESSAGE COPY,6316.CIVMESSAGE APPEND,63111116.LOCALITA16.CAP13.DENCOMMESSAGE COPY,6913.PROVCOMMESSAGE APPEND,69MESSAGE _TABLEREAD,%STA,#40,S0
MESSAGE APPEND,691116.RAGSOCCODINDSPMESSAGE EMPTY ENABLE,130|DISABLE,11@
MESSAGE DISABLE,130|ENABLE,11@IF(168.STPRZBOL=='X';'Prezzo';'')IF(168.STPRZBOL=='X';33.G1:IMPONIBILI;0)MESSAGE COPY,1001IF(168.STPRZBOL=='X';'Totale Imponibili ';'')IF(168.STPRZBOL=='X';33.G1:IMPOSTE;0)MESSAGE COPY,2001IF(168.STPRZBOL=='X';'Totale Imposte ';'')IF(168.STPRZBOL=='X';'Totale ';'')IF(168.STPRZBOL=='X';33.G1:TOTALE;0)MESSAGE COPY,3001!((34.TIPORIGA='08'))34.CODAGG1MESSAGE _ISAMREAD,163,MOD='LV'!COD='CAU'!CODTAB=#THIS,S334.QTAGG134.RG1:DOTOD34.CODARTMAGMESSAGE EMPTY DISABLE,51
MESSAGE ENABLE,5134.CODARTMESSAGE _DESCRIGA34.UMQTAMESSAGE _ALIGN,#52,TOP3034.QTAMESSAGE _ALIGN,#52,TOPIF(168.STPRZBOL=='X';34.PREZZO;0)MESSAGE COPY,1001207@.S0CODSPMEZZOTRIM(205@.S0)MESSAGE COPY,107TRIM(205@.S1[1,35])MESSAGE APPEND,107TRIM(205@.S1[36,45])MESSAGE APPEND,107TRIM(205@.S7)MESSAGE APPEND,107TRIM(205@.S1[46,70])MESSAGE APPEND,107205@.S9MESSAGE _ISAMREAD,13,COM=#112,DENCOM
MESSAGE APPEND,107MESSAGE _ISAMREAD,13,COM=#112,PROVCOM
MESSAGE APPEND,107ORAPARTDATAPART206@.S0IF(33.PNETTO=0,TOTPESO,33.PNETTO)IF(33.NCOLLI=0,TOTCOLLI,33.NCOLLI)IF(33.NBANC=0,TOTBANC,33.NBANC)33.NOTE203@.S0USE 33
JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC
JOIN 168 INTO CODCF==CODCF CODCONT==CODCONT
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]