[Home] [Help]
1: package body WF_EVENT_GROUPS_PKG as
2: /* $Header: WFEVGRPB.pls 120.4 2011/03/04 14:13:36 skandepu ship $ */
3: m_table_name varchar2(255) := 'WF_EVENT_GROUPS';
4: m_package_version varchar2(30) := '1.0';
5: -----------------------------------------------------------------------------
32: close c;
33:
34: exception
35: when others then
36: wf_core.context('Wf_Event_Groups_Pkg', 'Insert_Row', x_group_guid, x_member_guid);
37: raise;
38:
39: end INSERT_ROW;
40: -----------------------------------------------------------------------------
56: end if;
57:
58: exception
59: when others then
60: wf_core.context('Wf_Event_Groups_Pkg', 'Update_Row', x_group_guid,
61: x_member_guid);
62: raise;
63: end UPDATE_ROW;
64: -----------------------------------------------------------------------------
67: X_MEMBER_GUID in raw
68: ) is
69: row_id varchar2(64);
70: begin
71: WF_EVENT_GROUPS_PKG.UPDATE_ROW (
72: X_GROUP_GUID => X_GROUP_GUID,
73: X_MEMBER_GUID => X_MEMBER_GUID
74: );
75:
75:
76: exception
77: when no_data_found then
78: wf_core.clear;
79: WF_EVENT_GROUPS_PKG.INSERT_ROW(
80: X_ROWID => row_id,
81: X_GROUP_GUID => X_GROUP_GUID,
82: X_MEMBER_GUID => X_MEMBER_GUID
83: );
81: X_GROUP_GUID => X_GROUP_GUID,
82: X_MEMBER_GUID => X_MEMBER_GUID
83: );
84: when others then
85: wf_core.context('Wf_Event_Groups_Pkg', 'Load_Row', x_group_guid,
86: x_member_guid);
87: raise;
88: end LOAD_ROW;
89: -----------------------------------------------------------------------------
104: end if;
105:
106: exception
107: when others then
108: wf_core.context('Wf_Event_Groups_Pkg', 'Delete_Row', x_group_guid,
109: x_member_guid);
110: raise;
111:
112: end DELETE_ROW;
145:
146: null;
147: exception
148: when others then
149: wf_core.context('Wf_Event_Groups_Pkg', 'Generate', x_group_guid,
150: x_member_guid);
151: raise;
152: end GENERATE;
153: -----------------------------------------------------------------------------
161: exception
162: when no_data_found then
163: x_error:='NON_EXIST_EVENT:'||X_MEMBER_GUID;
164: when others then
165: wf_core.context('Wf_Event_Groups_Pkg', 'Check_Event', x_member_guid);
166: raise;
167: end CHECK_EVENT;
168: -----------------------------------------------------------------------------
169: procedure RECEIVE2 (
258: Wf_Core.Raise('WFSQL_INTERNAL');
259: end if;
260: end loop;
261:
262: wf_event_groups_pkg.check_event(l_member_guid,x_error);
263:
264: wf_event_groups_pkg.load_row(
265: X_GROUP_GUID => l_group_guid,
266: X_MEMBER_GUID => l_member_guid
260: end loop;
261:
262: wf_event_groups_pkg.check_event(l_member_guid,x_error);
263:
264: wf_event_groups_pkg.load_row(
265: X_GROUP_GUID => l_group_guid,
266: X_MEMBER_GUID => l_member_guid
267: );
268:
267: );
268:
269: exception
270: when others then
271: wf_core.context('Wf_Event_Groups_Pkg', 'Receive', x_message);
272: raise;
273: end RECEIVE2;
274:
275: -----------------------------------------------------------------------------
307:
308: null;
309: exception
310: when others then
311: wf_core.context('Wf_Event_Groups_Pkg', 'Generate2', x_group_name,
312: x_member_name);
313: raise;
314: end GENERATE2;
315:
312: x_member_name);
313: raise;
314: end GENERATE2;
315:
316: end WF_EVENT_GROUPS_PKG;