Aufruf: under construction

NUMBER = Sperren(_lv_zm7_IDB01 AS STRING , _lv_zm7_IDK10 AS STRING , _lv_zm7_IDC66 AS STRING , _lv_zm7_MENGE AS NUMBER , _lv_zm7_RES AS BOOLEAN)

Rückgabe: under construction

Rückgabe der Funktion: NUMBER

Code: under construction

PROCEDURE Sperren (_lv_zm7_IDB01 AS STRING,_lv_zm7_IDK10 AS STRING,_lv_zm7_IDC66 AS STRING,_lv_zm7_MENGE AS NUMBER,_lv_zm7_RES AS Boolean) AS NUMBER
	&& MAWI, Setzen von I01.VOG
	*/ Rückgabe = 0 | <>0. 0=Korrekt!
	=My.DATA.Tabellen.UnlockTables("I01",SET("Datasession"))
	RETURN My.Bussines.MaWi.MaWi.I01Lock(m._lv_zm7_IDB01,m._lv_zm7_IDK10,m._lv_zm7_IDC66,m._lv_zm7_MENGE,m._lv_zm7_RES)
ENDPROC