BL.Prod.OptiBox 1 %RegisteredObject 1 Refs,Type,ID,Status,CallBack,SnijSimulatie 1 ObjRef,ObjType 1 QueueID,NewStatus %SQLQuery Type,ID Select %ID as ID from Prod.Optibox_Queue where Type=:Type and ID=:ID Bijhouden dat de request is verstuurd naar de optimizer 1 Type,ID,Status DS.Prod.OptiBox.Queue ---------------------------------------------------- Eenvoudige QUERY voor het verkrijgen van queue items %SQLQuery paType:%String,paObjType:%String SELECT %ID,CreatieTijdStip,ID,ObjRef,ObjType,Status,Type,UpdateTijdStip FROM Prod.OptiBox_Queue WHERE (Type = :paType AND ObjType = :paObjType) CrazyQuery %Query paType:%String,paObjType:%String,paViewOptions:%String d ##class(%ResultSet).RunQuery("BL.Prod.OptiBox.Queue","QGetQueue","O","L",2) 1 qHandle:%Binary,paType:%String,paObjType:%String,paViewOptions:%String="" 0 %Status 1 QGetQueueExecute 0 %Status 1 qHandle:%Binary QGetQueueExecute 0 %Status