FUNCTION runscript(_self, _cScriptName)
//-DEFAULTSCRIPT-//
// -----------------------------------------
// 'MakMahnListe'
// -----------------------------------------
// benötigte Script's
global Kopfzeile := _cScriptName + "01.txt"

LOCAL m
LOCAL n
LOCAL aMahnPos

aMahnPos := _self:aMahnPos

_self:seite_neue_seite()
_self:seite_waehle_papierformat( _self:_papier_A4(), _self:_format_querformat() )
_self:seite_setze_raender( 250, 250, 250, 250 )
_self:wYTemp := 0

ExecuteScript(Kopfzeile, _self)	

IF ( n := Len(aMahnPos)) > 0

 FOR m := 1 TO n
  // Umbruch ?
  IF _self:wYTemp + 100 > 1700
  // Umbruch
   _self:seite_neue_seite()
   _self:seite_waehle_papierformat( _self:_papier_A4(), _self:_format_querformat() )
   _self:seite_setze_raender( 250, 250, 250, 250 )
   _self:wYTemp := 0
   ExecuteScript(Kopfzeile, _self)	
  ENDIF
  _self:waehle_farbe( _self:_farbe_schwarz() )
  _self:waehle_schrift( "ARIAL", 25, _self:_schrift_roman(), _self:_attr_normal() )

  _self:tab_initTab(0,_self:wYTemp,10,1)
  _self:tab_setze_spaltenbreite(1,830)
  _self:tab_setze_spaltenbreite(2,120)
  _self:tab_setze_spaltenbreite(3,150)
  _self:tab_setze_spaltenbreite(4,550)
  _self:tab_setze_spaltenbreite(5,520)
  _self:tab_setze_spaltenbreite(6,150)
  _self:tab_setze_spaltenbreite(7,150) 

  _self:tab_zeilenhoehe(90)

  _self:tab_rahmen(1,1,7,1,_self:_stift_durchgezogen(),_self:_stift_durchgezogen(),1,_self:_tab_umrandung())	

  _self:tab_setze_zelleEx(1,1,10,10,_self:_tcx_umbruch()+_self:_tcx_links(),aMahnPos[m][8]+_self:pdf_CRLF()+_self:pdfGetKdName2(aMahnPos[m][8]))
  _self:tab_setze_zelleEx(2,1,10,10,_self:_tcx_umbruch()+_self:_tcx_rechts(),AllTrim(Str(aMahnPos[m][4])))
  _self:tab_setze_zelleEx(3,1,10,10,_self:_tcx_umbruch()+_self:_tcx_links(),DToC(aMahnPos[m][5]))
  _self:tab_setze_zelleEx(4,1,10,10,_self:_tcx_umbruch()+_self:_tcx_links(),aMahnPos[m][1]+_self:pdf_CRLF()+_self:pdf_Art2Text2(aMahnPos[m][2]))
  _self:tab_setze_zelleEx(5,1,10,10,_self:_tcx_umbruch()+_self:_tcx_links(),_self:pdf_VU2Text(aMahnPos[m][3]))
  _self:tab_setze_zelleEx(6,1,10,10,_self:_tcx_umbruch()+_self:_tcx_rechts(),AllTrim(Str(aMahnPos[m][6],10,2)) + _self:pdf_CRLF() + aMahnPos[m][9])
  _self:tab_setze_zelleEx(7,1,10,10,_self:_tcx_umbruch()+_self:_tcx_rechts(),AllTrim(Str(aMahnPos[m][7],10,2)) + _self:pdf_CRLF() + aMahnPos[m][9])

  _self:wYTemp := _self:wYTemp + 90
 NEXT m

ENDIF

RETURN
