120: -- raise_partyqry_event
121: -- Purpose
122: -- This procedure is called from a concurrent program.
123: -- The 'oracle.apps.m4u.partyqry.generate' is raised with the supplied event parameters
124: -- The sequence m4u_wlqid_sequence is used to obtain unique event key.
125: -- Arguments
126: -- Notes
127: --
128: PROCEDURE raise_partyqry_event(
221: cln_debug_pub.Add('Final p_org_status value - '||l_org_status,1);
222: END IF;
223:
224: -- obtain a unique event-id
225: SELECT m4u_wlqid_s.NEXTVAL
226: INTO l_event_key
227: FROM dual;
228:
229: l_event_key := 'M4U_QRYPT_' || l_event_key;