|
Np, print niks,<br /><br />Dit is de layout:<br /><br />//header<br />/bmp<br />T0.5 L1.9 W8 H4 S"logo"+amain(3,1)+".jpg"<br />T21 L2.3 W2 H1 S"pin.jpg"<br />/box<br />T5 L1.9 U10.2 R20<br />/say<br />T26 L2 F3 Samain(3,3)<br />T26.4 L2 F3 Samain(3,4)+" "+amain(3,17)<br />T26.8 L2 F3 S"Fax.: "+amain(3,9)<br />T27.3 L2 F2 S"Tel.: "+amain(3,7)<br />T27.9 L2 F2 S"E-mail : "+amain(3,15)<br />T4.5 L2 F3 S" "+amain(3,6)<br />T26 L7 F3 Salltrim(amain(3,12))+" "+amain(3,13)<br />T26.4 L7 F3 Samain(3,16)<br />T26.8 L7 F3 S"BTW NL"+amain(3,5)<br />T8 L2 F3 Samain(3,14)<br />T5.1 L2.5 F2 S"Afleveradres"<br />T6 L2.5 F3 Salltrim(Zoekvar('titel','titel',klant->titel,'omschr'))+" "+levklant->naam<br />T6.5 L2.5 F3 Slevklant->adres<br />T7 L2.5 F3 Slevklant->postnr+" "+levklant->adres2<br />T7.5 L2.5 F3 Szoekvar("landcode","landcode",levklant->land,"land")<br />T8.4 L2.5 S"Telefoon: "+klant->telefoon<br />T8.9 L2.5 S"Mobiel: "+ klant->gsm<br />T9.5 L2.5 S"BTW "+klant->landcode+""+klant->btw_nr<br />T5.1 L12 F2 S"Factuuradres"<br />T6 L12 F3 Salltrim(Zoekvar('titel','titel',klant->titel,'omschr'))+" "+klant->naam<br />T6.5 L12 F3 Sklant->adres<br />T7 L12 F3 Sklant->postnr+" "+klant->adres2<br />T7.5 L12 F3 Szoekvar("landcode","landcode",klant->land,"land")<br />T8.4 L12 S"Telefoon: "+klant->telefoon<br />T8.9 L12 S"Mobiel: "+ klant->gsm<br />T9.5 L12 S"BTW "+klant->landcode+""+klant->btw_nr<br />//grafic<br />/fill<br />T10.7 L1.9 U11.5 R20 BX CB220,220,220<br />T22.4 L1.9 U23.2 R9.8 BX CB220,220,220<br />/box<br />T10.7 L1.9 U25.6 R20<br />/line<br />T11.5 L1.9 U11.5 R20<br />T10.7 L13.8 U20.75 R13.8<br />T10.7 L15.8 U20.75 R15.8<br />T10.7 L17.8 U20.75 R17.8<br />T20.75 L1.9 U20.75 R20<br />T20.8 L1.9 U20.8 R20<br />T22.4 L1.9 U22.4 R20<br />T23.2 L1.9 U23.2 R9.8<br />T24.8 L1.9 U24.8 R20<br />T22.4 L5.4 U24.8 R5.4<br />T22.4 L7.2 U24.8 R7.2<br />T22.4 L9.8 U25.6 R9.8<br />/say<br />T1 L12 F2 S"Bestelling"<br />T1.8 L12 S"Nummer: "<br />T1.8 L15 Sstr(Pbon1->volgnr)<br />T2.2 L12 S"Klantnummer: "<br />T2.2 L15 Sstr(klant->nummer)<br />T2.6 L12 S"Datum: "<br />T2.6 L15 Spadl(day(pbon1->datum),2)+"-"+padl(month(pbon1->datum),2,"0")+"-"+str(year(pbon1->datum),4)<br />T3.0 L12 S"Referentie: "<br />T3.0 L15 Spbon1->ref<br />T3.8 L12 S"U bent geholpen door: "<br />T4.2 L12 F9 Szoekvar(".dos"+amain(3,1)+"pers_"+amain(3,1),".dos"+amain(3,1)+"pers_"+amain(3,1),pbon1->code_vert,"naam")<br />T10.9 L2 F6 FX CF010,010,255,06 S"Artikelnummer / Omschrijving"<br />T10.9 L15.5 J1 F6 FX CF010,010,255,06 S"Aantal"<br />T10.9 L17.5 J1 F6 FX CF010,010,255,06 S"Prijs"<br />T10.9 L19.8 J1 F6 FX CF010,010,255,06 S"Totaal"<br />T22.6 L3.65 J2 F6 FX CF010,010,255,06 S"Belastbaar"<br />T22.6 L6.3 J2 F6 FX CF010,010,255,06 S"BTW%"<br />T22.6 L8.5 J2 F6 FX CF010,010,255,06 S"BTW"<br />T22.7 L10 S"Totaal exclusief BTW"<br />T23.2 L10 S"Totaal BTW"<br />T23.7 L10 S"Totaalbedrag incl. BTW"<br />T24.2 L10 S"Reeds door u betaald"<br />T24.8 L2.5 F2 S"Te leveren op:"<br />T24.9 L10 F3 CF010,010,255,06 S"Totaal te betalen"<br />T26 L2 M180 F4 Samain(3,19)<br />//body4<br />T11.7 U20.5<br />L2 Slower(pbon1->art_nummer)<br />L4.7 Sfaktomschr(Pbon1->art_nummer)<br />L15.3 J1 STRANSFORM(Pbon1->hoev,"999.99")<br />L17.5 J1 STRANSFORM(nettverk,CNUMPICT)<br />L19.8 J1 STRANSFORM(bedrag0,CNUMPICT)<br />BLANKLIJN<br />L4.7 SpBon1->omschr<br />BLANKLIJN<br />L5.5 Sfaktserienr(1)<br />BLANKLIJN<br />L5.5 Sfaktserienr(2)<br />BLANKLIJN<br />L4.7 Sif(empty(recyclage(1)),"","Verwijderingsbijdrage")<br />L15.3 J1 Srecyclage(2)<br />L17.5 J1 Srecyclage(5)<br />L19.8 J1 Srecyclage(6)<br />BLANKLIJN<br />L4.7 M70 SpBon1->doc<br />//subend<br />BLANKLIJN<br />L4.7 M55 Sklant->doc<br />//end<br />T21 L4 S"Wij preferen betaling met PIN bij aflevering."<br />T21.7 L2 Sif(dis_perc>0,"Bij contante betaling mag u " +alltrim(TRANSFORM(dis_conto,CNUMPICT))+" euro aftrekken van het exclusief BTW factuurbedrag.","")<br />T23.5 L4.3 J1 Sif(tt1a>0,TRANSFORM(tt1a,CNUMPICT),"")<br />T23.9 L4.3 J1 Sif(tt2a>0,TRANSFORM(tt2a,CNUMPICT),"")<br />T24.3 L4.3 J1 Sif(tt3a>0,TRANSFORM(tt3a,CNUMPICT),"")<br />T23.5 L6.8 J1 Sif(tt1a>0,TRANSFORM(btw_1,CNUMPICT),"")<br />T23.9 L6.8 J1 Sif(tt2a>0,TRANSFORM(btw_2,CNUMPICT),"")<br />T24.3 L6.8 J1 Sif(tt3a>0,TRANSFORM(btw_3,CNUMPICT),"")<br />T23.5 L9 J1 Sif(tt1a>0,TRANSFORM(totbtw01,CNUMPICT),"")<br />T23.9 L9 J1 Sif(tt2a>0,TRANSFORM(totbtw02,CNUMPICT),"")<br />T24.3 L9 J1 Sif(tt3a>0,TRANSFORM(totbtw03,CNUMPICT),"")<br />T24.8 L9.5 J1 F2 Spadl(day(pbon1->lev_date),2)+"-"+padl(month(pbon1->lev_date),2,"0")+"-"+str(year(pbon1->lev_date),4)<br />T22.7 L19.8 J1 STRANSFORM(Totaalbel,CNUMPICT)<br />T23.2 L19.8 J1 STRANSFORM(Totaalbtw,CNUMPICT)<br />T23.7 L19.8 J1 STRANSFORM(totaalfak,CNUMPICT)<br />T24.2 L19.8 J1 STRANSFORM(voor_schot,CNUMPICT)<br />T24.9 L17 J1 F3 FX CF010,010,255,06 Sklant->munt<br />T24.9 L19.8 J1 F3 CF010,010,255,06 STRANSFORM(Totaalbet,CNUMPICT)<br />//newpage<br />T5 L10 FM,aa,bb M80 Smemoread(".basisdocbestelling_bkw.txt")<br /><br />Voorbeeld is bijgevoegd.<br /><br />Heimen<br />
|