Aufruf: Gesperrte Artikel freigeben

NUMBER = Freigabe(_lv_48v_IDB01 AS STRING , _lv_48v_IDK10 AS STRING , _lv_48v_IDC66 AS STRING , _lv_48v_MENGE AS STRING , _lv_48v_RES AS BOOLEAN)

Rückgabe: Gesperrte Artikel freigeben

Rückgabe der Funktion: NUMBER

Code: Gesperrte Artikel freigeben

PROCEDURE Freigabe (_lv_48v_IDB01 AS STRING,_lv_48v_IDK10 AS STRING,_lv_48v_IDC66 AS STRING,_lv_48v_MENGE AS STRING,_lv_48v_RES AS Boolean) AS NUMBER
	*/ MAWI, Setzt VOG in I01
	*/ Rückgabe = 0 | <>0. 0=Korrekt!
	=My.DATA.Tabellen.UnlockTables("I01",SET("Datasession"))
	RETURN My.Bussines.MaWi.MaWi.I01UnLock(m._lv_48v_IDB01,m._lv_48v_IDK10,m._lv_48v_IDC66,m._lv_48v_MENGE,m._lv_48v_RES)
ENDPROC