Function AusgabeAgtNr(_self, _cAgtNr)
//-DEFAULTSCRIPT-//
// ---------------------------
// Kd-Adressnderung
// ---------------------------
IF _SELF:lAgtNr == .T.
  IF ! Empty(_cAgtNr)
    _SELF:waehle_stift( _self:_stift_durchgezogen(), 1 )
    _SELF:waehle_farbe( _self:_farbe_schwarz() )
    _SELF:waehle_schrift( "ARIAL", 30, _self:_schrift_roman(), _self:_attr_normal() )
		
    ExecuteScript(AusgabeText, _self, _SELF:nY_Pos_AgtNr, _self:_TXT_RECHTS(), "Agentur-Nr: "+AllTrim(_cAgtNr), 30)
  ENDIF
ENDIF
RETURN	