Aufruf: under construction

VARIANT = TypeKonvert(txVal AS VARIANT , tcType AS STRING , tnDec AS INTEGER , tnSize AS INTEGER)

Rückgabe: under construction

Rückgabe der Funktion: VARIANT

Code: under construction

PROCEDURE TypeKonvert (txVal AS Variant,tcType AS STRING,tnDec AS INTEGER,tnSize AS INTEGER) AS Variant;
		HELPSTRING "Typkonvertierung VON --> NACH."
	** PARAMETERS 1:txval			:Wert der konvertiert werden soll, beliebiges Format
	** PARAMETERS 2:tcsourcetype	:Typ, in den konvertiert werden soll, ein Zeichen: "C,M,N,D,L"
	** PARAMETERS 3:tndec			:Anzahl der Dezimalstellen, falls nicht angegeben, wird der Anzahl der Nachkommastellen ermittelt
	** PARAMETERS 4:tnsize			:Anzahl der Stellen, falls nicht angegeben, wird der Anzahl über LEN() ermittelt, nachträglich eingefügt, deshalb ungewohnte Reihenfolge
	** Rückgabe: Typ wie gewünscht
	RETURN My.Functions.Strings.typeconvert(m.txVal,m.tcType,m.tnDec,m.tnSize)
ENDPROC