FUNCTION runscript(_self, _cScriptName)
// ---------------------------
// 'Anfrage LV-Dat'
// ---------------------------
// benötigte Script's
global AusgabeAgtNr := _cScriptName + "01.txt"
global AusgabeFussZeile := _cScriptName + "02.txt"
global AusgabeGeschZeit := _cScriptName + "03.txt"
global AusgabeKopfZeile := _cScriptName + "05.txt"
global AusgabeTelFax := _cScriptName + "06.txt"
global AusgabeText := _cScriptName + "07.txt"

LOCAL nLeftBox := 250
LOCAL nLeftText := 350
LOCAL nBoxSize := 30

// -------------------------------------------------------
// Anschrift
// -------------------------------------------------------
// Beginn Seite erzeugen				
_SELF:seite_neue_seite()
_SELF:seite_waehle_papierformat( _self:_papier_A4(), _self:_format_hochformat() )
_SELF:seite_setze_raender( _self:nRandLinks, _self:nRandOben, _self:nRandRechts, _self:nRandUnten )
_SELF:AusgabeBmp()
ExecuteScript(AusgabeFussZeile, _self)	
ExecuteScript(AusgabeKopfZeile, _self)
ExecuteScript(AusgabeTelFax, _self)
ExecuteScript(AusgabeGeschZeit, _self)
ExecuteScript(AusgabeAgtNr, _self, _self:cAgenturNr)

// ----------------------------------------------
// Anschrift
// -------------------------------------------------------
_SELF:waehle_stift( _SELF:_stift_durchgezogen(), 1 )
_SELF:waehle_farbe( _SELF:_farbe_schwarz() )
_SELF:waehle_schrift( 'ARIAL', 35, _SELF:_schrift_roman(), _SELF:_attr_normal() )
_SELF:wYTemp := _SELF:nY_Pos_Anschr_Text
// VU-name
IF ! Empty(_SELF:vu_name)	
  _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_links(),_SELF:vu_name)
  _SELF:wYTemp := _self:wYTemp + 50
ENDIF
// vu_straße
IF ! Empty(_SELF:vu_strasse)	
  _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_links(),_SELF:vu_strasse)
  _SELF:wYTemp := _self:wYTemp + 80
ENDIF
IF ! Empty(_SELF:vu_plz_ort)	// vu_plz+ort
  _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_links(),_SELF:vu_plz_ort)
  _SELF:wYTemp := _self:wYTemp + 50
ENDIF
IF ! Empty(_SELF:vu_fax)	// vu_fax
  _SELF:wYTemp := _self:wYTemp + 50
  _SELF:txt_gerichtet(_SELF:wYTemp,_self:_txt_links(),"Telefax: "+_SELF:vu_fax)
  _SELF:wYTemp := _self:wYTemp + 50
ENDIF

// -------------------------------------------------------
// Ansprechpartner
// -------------------------------------------------------
_SELF:wYTemp := _self:wYTemp + 130
_SELF:waehle_stift( _SELF:_stift_durchgezogen(), 1 )
_SELF:waehle_farbe( _SELF:_farbe_schwarz() )
_SELF:waehle_schrift( 'ARIAL', 20, _SELF:_schrift_roman(), _SELF:_attr_normal() )
_SELF:txt_absolut(0,_SELF:wYTemp,'Ihr Ansprechpartner')
_SELF:txt_gerichtet(_SELF:wYTemp,_SELF:_txt_rechts(),'Datum')
_SELF:wYTemp := _self:wYTemp + 30
_SELF:waehle_schrift( 'ARIAL', 35, _SELF:_schrift_roman(), _SELF:_attr_normal() )
_SELF:txt_gerichtet(_SELF:wYTemp,_SELF:_txt_rechts(),DToC(Today()))
_SELF:waehle_schrift( 'ARIAL', 30, _SELF:_schrift_roman(), _SELF:_attr_normal() )
_SELF:txt_absolut(0,_SELF:wYTemp,_self:user_name)
_SELF:txt_absolut(0,_SELF:wYTemp+30,'Durchwahl '+ _self:user_durchwahl)
IF ! Empty(_self:user_email)
	_SELF:wYTemp := _self:wYTemp + 30
	_SELF:txt_absolut(0,_SELF:wYTemp+30,'email '+_self:user_email)
ENDIF
_SELF:wYTemp := _self:wYTemp + 150

// -------------------------------------------------------
// Vertragsnummer
// -------------------------------------------------------
_self:waehle_schrift('arial',35,_self:_schrift_roman(),_self:_attr_fett())
_self:txt_absolut(0,_SELF:wYTemp, _SELF:produkt)
_self:wYTemp := _self:wYTemp+40
_self:txt_absolut(0,_SELF:wYTemp, _SELF:vertragsnr)
_self:wYTemp := _self:wYTemp+40
_self:txt_absolut(0,_SELF:wYTemp,'VN: ' + _SELF:vn)
_self:wYTemp := _self:wYTemp+50

// -------------------------------------------------------
// Linie
// -------------------------------------------------------
_SELF:waehle_farb_pinsel()
_SELF:waehle_farbe( _self:_farbe_schwarz() )
_SELF:waehle_stift( _self:_stift_durchgezogen(), 3 )
_SELF:gdi_line( 0, _SELF:wYTemp, _SELF:seite_x_ausdehnung(), _SELF:wYTemp )
_SELF:wYTemp := _self:wYTemp + 50

// -------------------------------------------------------
// Sehr geehrte Damen und Herren
// -------------------------------------------------------
_SELF:waehle_schrift( 'ARIAL', 35, _SELF:_schrift_roman(), _SELF:_attr_normal() )
_SELF:wYTemp := _self:wYTemp + 80
// Umbruch ?
IF _SELF:wYTemp + 500 > _SELF:seite_y_ausdehnung() - _SELF:nFussZeilenHoehe
	_SELF:Umbruch()
ENDIF
_SELF:txt_absolut(0,_SELF:wYTemp,'Sehr geehrte Damen und Herren,')
_SELF:wYTemp := _self:wYTemp + 80
_SELF:txt_absolut(0,_SELF:wYTemp,'bitte teilen Sie uns zu o.g. Vertrag folgendes, am besten per Fax, mit:')
_SELF:wYTemp := _self:wYTemp + 100

_SELF:gdi_frame( nLeftBox, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(nLeftText,_SELF:wYTemp,'voraussichtliche Ablaufleistung')
_SELF:wYTemp := _self:wYTemp + 100

_SELF:gdi_frame( nLeftBox, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(nLeftText,_SELF:wYTemp,'aktuellen Rückkaufswert incl. Gewinnanteile zum')
_SELF:wYTemp := _self:wYTemp + 100

_SELF:gdi_frame( nLeftBox, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(nLeftText,_SELF:wYTemp,'beitragsfreie Versicherungssumme zum')
_SELF:wYTemp := _self:wYTemp + 100

_SELF:gdi_frame( nLeftBox, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(nLeftText,_SELF:wYTemp,'voraussichtliche Ablaufleistung nach Beitragsfreistellung zum')
_SELF:wYTemp := _self:wYTemp + 150

_SELF:gdi_frame( 0, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(100,_SELF:wYTemp,'Unseren Maklerauftrag erhalten Sie nachfolgend.')
_SELF:wYTemp := _self:wYTemp + 50

_SELF:gdi_frame( 0, _SELF:wYTemp+10, nBoxSize, nBoxSize )
_SELF:txt_absolut(100,_SELF:wYTemp,'Unser Maklerauftrag liegt Ihnen bereits vor.')

// -------------------------------------------------------
// Mit freundlichen Grüßen ...
// -------------------------------------------------------
_self:wYTemp := _self:wYTemp + 150
_SELF:waehle_stift( _self:_stift_durchgezogen(), 1 )
_SELF:waehle_farbe( _self:_farbe_schwarz() )
_SELF:waehle_schrift( "ARIAL", 40, _self:_schrift_roman(), _self:_attr_normal() )
_SELF:txt_absolut(0,_SELF:wYTemp,'Mit freundlichen Grüßen')
_self:wYTemp := _self:wYTemp + 150
_SELF:txt_absolut(0,_SELF:wYTemp, "i.A. "+_self:user_name)

RETURN
