Aufruf: under construction

STRING = GetFAStatus(tcIdi24 AS STRING)

Rückgabe: under construction

Rückgabe der Funktion: STRING

Code: under construction

PROCEDURE GetFAStatus (tcIdi24 AS STRING) AS STRING
	LOCAL loI24 AS OBJECT
	DO CASE
		CASE EMPTY(m.tcIdi24)
			RETURN ""
		OTHERWISE
			*/ FA ermitteln
			loI24 = My.oMisc.oI24[m.tcIdi24]
			*/ Status des FA
			IF EMPTY(loI24.idi24)
				RETURN ""
			ELSE
				RETURN My.oMisc.oY01["cGruppe='I24.ST' AND cGrp2='"+STR(loI24.status,1)+"'"].Bezei
			ENDIF
	ENDCASE
ENDPROC