TECH.RegisteredObject,BL.PPS.TBX.enu.PalletEtiketType.Verwerker,APPS.Halux.PPS.PalletIDBepaler %String 1 APPS.Halux.PPS.impl.PalletIDBepaler.PalletIDBepalerHelper 1 PalletIDBepalerHelper:APPS.Halux.PPS.impl.PalletIDBepaler.PalletIDBepalerHelper="" 1 1 %Status Type:BL.PPS.TBX.enu.PalletEtiketType,ToeleveringId:%String,ProductNummer:%String="" %String Type:BL.PPS.TBX.enu.PalletEtiketType,ToeleveringId:%String,LengteBarcode:%Integer 1 %String PalletCode:%String 1 %Boolean 1 %Integer 99999 Set PalletID=1,^RES("EWPAL","CNT","TBX") = PalletID Lock -^RES("EWPAL","CNT","TBX") quit PalletID ]]> 1 1 1 1