:MP_RecordTypGet
   * a99-Flexbibliothek		ModPar
   $ MP_RecordTypGet		 	2014-08-25
   --------------------------------------------------------------------------
   Fkt:		ermittelt Satztypkürzel des geladenen Satzes (A-Schema)
      		und definiert Mindest-Access-Level für Bearbeitung
   IN:		(akt. Satz)
   OUT:		iv enthält Satztypkürzel;Bezeichnung;copy-access;Dateinummer
          oder wenn Typ unbekannt, iv = "ZZZ;(unbekannter Satztyp);9;0"
   VAR:		$fMain, besetzt, wenn GA
   DESC:	verwendet set obj
:MP_RecordTypFn
   Fkt: 	liefert Dateinummer zum Record-Typ
   IN:		iv mit Typkürzel
   OUT:		iv mit Dateinummer oder 0, wenn Typ unbekannt
   DESC:	verwendet set obj
   VAR:		$fNumOnly - Flag, besetzt, wenn nur Nummer geliefert werden soll
:MP_RecordTypName
   Fkt: 	ergänzt Klartext zum Recordtyp-Kürzel
   IN:		iv mit Typkürzel
   OUT:		iv mit {Typkürzel};{Klartext};copy-access;Dateinummer
   		    wenn Typ unbekannt, iv = "ZZZ;(unbekannter Satztyp);9;0"
   DESC:	verwendet set obj
   VAR:		$fNumOnly - Flag, besetzt, wenn nur Nummer geliefert werden soll
   		    $MP_RG_lFlag - Flag zur Verhinderung von Mehrfachdurchläufen
   		    $t - temp.
:MP_IsRelation
   Fkt:		ermittelt, ob Satz GA ist
   IN:		Registercode (|1 ... |;| symb. Register)
   OUT:		iv enthält 
   		"main", wenn GA, 
   		"sub", wenn Band 
   		"dep", wenn unselbständig oder 
   		"" für alles andere
   DESC:	wertet #00 und #09 aus: prüft, ob es im Register 9 weitere 
   		Einträge gibt, die mit "+*" erweitert sind 
   VAR:		#u’t - temp.