Aufruf: Ein Script ausführen

BOOLEAN = DoMenSc(tcIniFile AS STRING , tcMenuTree AS STRING , ;tp1 AS VARIANT @ , tp2 AS VARIANT @ , tp3 AS VARIANT @ , tp4 AS VARIANT @ , ;tp5 AS VARIANT @ , tp6 AS VARIANT @ , tp7 AS VARIANT @ , tp8 AS VARIANT @ , ;tp9 AS VARIANT @)

Rückgabe: Ein Script ausführen

Rückgabe der Funktion: BOOLEAN
Rückgabe per Reverenz:
	;tp1 AS VARIANT
	tp2 AS VARIANT
	tp3 AS VARIANT
	tp4 AS VARIANT
	;tp5 AS VARIANT
	tp6 AS VARIANT
	tp7 AS VARIANT
	tp8 AS VARIANT
	;tp9 AS VARIANT

Code: Ein Script ausführen

PROCEDURE DoMenSc (tcIniFile AS STRING, tcMenuTree AS STRING,;
		tp1 AS Variant @,tp2 AS Variant @,tp3 AS Variant @,tp4 AS Variant @,;
		tp5 AS Variant @,tp6 AS Variant @,tp7 AS Variant @,tp8 AS Variant @,;
		tp9 AS Variant @) AS Boolean
	*/ Ausführen eines Scripts
	RETURN My.AppForms.Menues.DoMenuScript(m.tcIniFile,m.tcMenuTree,.F.,.F.,SET("Datasession"),;
		@tp1,@tp2,@tp3,@tp4,@tp5,@tp6,@tp7,@tp8,@tp9)
ENDPROC