Function AusgabeRechnung(_self)
// -----------------------------------------
// 'Rechnung'
// -----------------------------------------
LOCAL cSparte
LOCAL cVersicherer
LOCAL wYStart
LOCAL cBuchungshinweis
LOCAL nWaehrung
LOCAL cWaehrung
Local cText
Local nVal

wYStart := _self:wYTemp

nVal := _Self:_dbfieldget("DBInk87","BRUTTO") 

// cSparte ermitteln
cSparte := _Self:_dbfieldget("DBInk87","ART_WAS")
// cVersicherer ermitteln
cVersicherer := _Self:_dbfieldget("DBInk87","VU_NAME")
// Buchungshinweis ermitteln
cBuchungshinweis := AllTrim(_Self:_dbfieldget("DBInk87","NTEXT"))
// Währung
nWaehrung := _Self:_dbfieldget("DBInk87","WAEHRUNG")
cWaehrung := _SELF:pdfGetWaehrungBezeich(nWaehrung)

// Start Ausdruck
	
// Zeile 1
_SELF:waehle_stift( _self:_stift_durchgezogen(), 1 )
_SELF:waehle_farbe( _self:_farbe_schwarz() )
_SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(10,_self:wYTemp+5,"Policennummer")
_SELF:txt_absolut(770,_self:wYTemp+5,"Versicherer")
_SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
_SELF:txt_absolut(360,_self:wYTemp,_Self:_dbfieldget("DBInk87","VSNR"))
_SELF:txt_absolut(960,_self:wYTemp,cVersicherer)
_SELF:wYTemp := _self:wYTemp +40

// Zeile 2
_SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(10,_self:wYTemp+5,"Sparte")
_SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
_SELF:txt_absolut(360,_self:wYTemp,cSparte)
_SELF:txt_absolut(960,_self:wYTemp,_Self:_dbfieldget("DBInk87","KENN"))
_SELF:wYTemp := _self:wYTemp +40

// Zeile 3	
IF ! Empty(cBuchungshinweis)
 _SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
 _SELF:txt_absolut(10,_self:wYTemp+5,"Buchungshinweis")
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_absolut(360,_self:wYTemp,cBuchungshinweis)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

//Zeile 4
_SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(10,_self:wYTemp+5,"Zahlungsgrund")
_SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
_SELF:txt_absolut(360,_self:wYTemp,_Self:_dbfieldget("DBInk87","RTEXT"))
_SELF:wYTemp := _self:wYTemp +40

// Zeile 5
_SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(10,_self:wYTemp+5,"Fälligkeitszeitraum")
_SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
_SELF:txt_absolut(360,_self:wYTemp,DToC(_Self:_dbfieldget("DBInk87","FAELLIG"))+" - "+DToC(_Self:_dbfieldget("DBInk87","BIS")))
_SELF:wYTemp := _self:wYTemp +40

// Zeile 6
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","VUORT"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 7
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RISK"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 8
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT3"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 9
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT4"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 10
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT5"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 11
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT6"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 12
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT7"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 13
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT8"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 14
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT9"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 15
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","RTEXT10"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 16
IF ! Empty(cText := _Self:_dbfieldget("DBInk87","ZUSATZTEXT"))
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 _SELF:txt_bereich(360,_self:wYTemp,_SELF:seite_x_ausdehnung(),_self:wYTemp+40,_self:_txt_links(),cText)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF
_SELF:wYTemp := _self:wYTemp +20

// Zeile 17
IF _Self:_dbfieldget("DBInk87","GEB") != 0
 _SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
 _SELF:txt_absolut(10,_SELF:wYTemp,"Gebühr des Versicherers:")
 _SELF:txt_absolut(400,_SELF:wYTemp,AllTrim(Str(_Self:_dbfieldget("DBInk87","GEB")))+" "+cWaehrung)
 _SELF:wYTemp := _self:wYTemp +40
ENDIF

// Zeile 18
_SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(10,_SELF:wYTemp,"In der Gesamtprämie sind ";
			+AllTrim(Str(_Self:_dbfieldget("DBInk87","ST_SATZ")))+"% gesetzliche Versicherungssteuer mit ";
			+AllTrim(Str(Abs(_Self:_dbfieldget("DBInk87","VSST"))))+" "+cWaehrung+" enthalten")


IF nWaehrung == 0
 // - DM -------------------------------------------------------------------------
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 // DEM
 _SELF:wYTemp := _self:wYTemp +40
 IF nVal < 0
  _SELF:txt_absolut(10,_SELF:wYTemp,"Rückbeitrag in DEM")
 ELSE
  _SELF:txt_absolut(10,_SELF:wYTemp,"Beitrag in DEM")
 ENDIF
 _SELF:txt_bereich(1400,_SELF:wYTemp,1620,_SELF:wYTemp+40,_self:_txt_rechts(),AllTrim(Str(nVal)))
 _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_rechts(),"DEM")
 _SELF:wYTemp := _self:wYTemp + 40
 // EUR		
 IF nVal < 0
  _SELF:txt_absolut(10,_SELF:wYTemp,"Rückbeitrag")
 ELSE
  _SELF:txt_absolut(10,_SELF:wYTemp,"Beitrag")
 ENDIF
 _SELF:txt_bereich(1400,_SELF:wYTemp,1620,_SELF:wYTemp+40,_self:_txt_rechts(),AllTrim(Str(_self:pdf_nDEM2EUR(nVal))))
 _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_rechts(),"EUR")
ELSE
 // - EURO -------------------------------------------------------------------------
 _SELF:wYTemp := _self:wYTemp +40
 _SELF:waehle_schrift( "ARIAL", 35, _self:_schrift_roman(), _self:_attr_fett() )
 IF nVal < 0
  _SELF:txt_absolut(10,_SELF:wYTemp,"Rückbeitrag")
 ELSE
  _SELF:txt_absolut(10,_SELF:wYTemp,"Beitrag")
 ENDIF
 _SELF:txt_bereich(1400,_SELF:wYTemp,1620,_SELF:wYTemp+40,_self:_txt_rechts(),_self:pdf_setdecpoint(AllTrim(Str(nVal))))
 _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_rechts(),"EUR")
ENDIF

// ---------------------------------------------------------------------------------

_SELF:wYTemp := _self:wYTemp + 50
_SELF:waehle_stift( _self:_stift_durchgezogen(), 2 )
_SELF:gdi_line(0,_SELF:wYTemp,_SELF:seite_x_ausdehnung(),_SELF:wYTemp)
_SELF:waehle_stift( _self:_stift_durchgezogen(), 1 )
	
_SELF:wYTemp := _self:wYTemp + 30

RETURN	
