Aufruf: under construction

NUMBER = ZuBuchSt(_lv_6r6_IDI21 AS STRING , _lv_6r6_DAT AS DATE , _lv_6r6_BUART AS STRING , _lv_6r6_MENGE AS NUMBER)

Rückgabe: under construction

Rückgabe der Funktion: NUMBER

Code: under construction

PROCEDURE ZuBuchSt (_lv_6r6_IDI21 AS STRING,_lv_6r6_DAT AS DATE,_lv_6r6_BUART AS STRING,_lv_6r6_MENGE AS NUMBER) AS NUMBER
	*/ MAWI, Strono ZUBUCH
	*/ Rückgabe = 0 | <>0. 0=Korrekt!
	=My.DATA.Tabellen.UnlockTables("I01;I20;I21",SET("Datasession"))
	RETURN My.Bussines.MaWi.MaWi.I01AddStorno(m._lv_6r6_IDI21,m._lv_6r6_DAT,m._lv_6r6_BUART,m._lv_6r6_MENGE)
	* Storniert eine ZUBUCHUNG ohne nochmaliges reservieren
ENDPROC