<!-- wbcprint:header1 -->
<!-- wbc:begin table="config" where="id>0" maxrows="1" -->
<!-- wbcif:begin query="data" var="logo" -->
Image('{app.projects_dir}/{app.project}/{logo}',130,10,40)
<!-- wbcif:end -->
SetFont('Arial','',8)
SetXY(130,30)
Cell(40,4,'{firma:raw}',0,'L')
SetXY(130,34)
MultiCell(50,4,'{anschrift}',0,'L')
SetXY(130,$this->GetY())
MultiCell(50,4,"Telefon: {telefon}\nTelefax: {telefax}\nE-Mail: {email}",0,'L')
<!-- wbc:end -->

<!-- wbc:begin table="contacts" select="uid as userid" where="id={getnum.cid}" -->
<!-- wbc:begin table="users" where="uid={userid}" maxrows="1" -->
SetXY(130,10)
Ln()
Write(4,'{firma}')
<!-- wbcif:begin query="data" var="name" -->
Ln()
Write(4,'<!-- wbc:begin table="properties" where="typ='an' and id='{user.anrede}'" -->{keyname}<!-- wbc:end --> {vorname} {name}')
<!-- wbcif:end -->
Ln()
Write(4,'{strasse}')
Ln()
Write(4,'{plz} {ort}')
<!-- wbc:begin table="properties" where="typ='co' and id='{land}'" -->
Ln()
SetFont('Arial','',6)
Write(4,'{kurzbez}')
SetFont('Arial','',8)
<!-- wbc:end -->
Ln()
Write(4,'{telefon}')
Ln()
Write(4,'{email}')


SetDrawColor(128,128,128)
SetFillColor(204,204,204)
SetXY(130,68)
Cell(20,4,'Kunden-Nr',1,0,'L',1)
Cell(40,4,'{knr}',1)
<!-- wbc:end -->

Ln()

<!-- wbc:end -->
<!-- wbc:begin table="contacts" where="id={getnum.cid}" -->
SetY(75)
SetFont('Arial','',12)
Write(0,'KONTAKT {changed:timestamp}')
SetFont('Arial','',8)
SetY(80)
SetXY(130,60)
SetDrawColor(128,128,128)
SetFillColor(204,204,204)
Cell(20,4,'Datum',1,0,'L',1)
Cell(40,4,'{app.datum}',1)
SetXY(130,64)
Cell(20,4,'Seite',1,0,'L',1)
Cell(40,4,$this->PageNo(),1)
Ln()
SetY(95)
SetDrawColor(128,128,128)
Rect($this->GetX(),100,180,160)
SetDrawColor(128,128,128)
SetFillColor(204,204,204)
Cell(180,5,'Nachricht',1,0,'L',1)
<!-- wbc:end -->
Ln()
SetY(100)


<!-- wbcprint:header2 -->
<!-- wbc:begin table="config" where="id>0" maxrows="1" -->
Image('{app.projects_dir}/{app.project}/{logo}',130,10,40)
SetFont('Arial','',8)
Ln()
SetY(35)
<!-- wbc:end -->
<!-- wbc:begin table="contacts" where="id={getnum.cid}" -->
SetFont('Arial','',12)
Write(0,'KONTAKT {changed:timestamp}')
SetFont('Arial','',8)
SetXY(130,30)
SetDrawColor(128,128,128)
SetFillColor(204,204,204)
Cell(20,4,'Datum',1,0,'L',1)
Cell(20,4,'{app.datum}',1)
SetXY(130,34)
Cell(20,4,'Seite',1,0,'L',1)
Cell(20,4,$this->PageNo(),1)

Ln()
SetY(45)
SetDrawColor(128,128,128)
Rect($this->GetX(),50,180,210)
SetDrawColor(0,0,0)
SetFillColor(204,204,204)
Cell(180,5,'Nachricht',1,0,'L',1)
<!-- wbc:end -->
Ln()
SetY(55)


<!-- wbcprint:footer1 -->
<!-- wbc:begin table="config" where="id>0" maxrows="1" -->
Ln()
SetY(265)
SetFont('Arial','',6)
Write(3,'{firma}')
Ln()
MultiCell(40,3,'{anschrift}',0,'L')
SetXY(50,265)
MultiCell(40,3,"Telefon: {telefon}\nTelefax: {telefax}\nE-Mail: {email}\nInternet: {www}",0,'L')
SetXY(100,265)
MultiCell(40,3,"UStID: {ustid}\nSteuer-Nr: {steuernr}\nHRB: {hrb}",0,'L')
SetXY(150,265)
MultiCell(40,3,"Bankverbindung:\n{bank1}\nBLZ: {blz1}\nKonto: {kontonr1}\nIBAN: {iban1}\nBIC: {bic1}",0,'L')
<!-- wbc:end -->

<!-- wbcprint:footer2 -->
Ln()
SetY(255)


<!-- wbcprint:footer3 -->
Ln()
SetY(250)



<!-- wbcprint:body -->

<!-- wbc:begin table="contacts" where="id={getnum.cid}" -->
Ln()
SetX($this->GetX()+8)
MultiCell(180,4,'{beschreibung:raw}',0,'L')
<!-- wbc:end -->