DBA Data[Home] [Help]

APPS.PA_EXPENDITURE_GROUPS_PKG dependencies on PA_EXPENDITURE_GROUPS

Line 1: package body pa_expenditure_groups_pkg as

1: package body pa_expenditure_groups_pkg as
2: /* $Header: PAXTGRPB.pls 120.4 2011/05/17 12:43:01 mokukuma ship $ */
3:
4: -- forward declarations
5: procedure check_submit_allowed (x_expenditure_group in VARCHAR2,

Line 36: cursor c is select rowid from pa_expenditure_groups

32: x_period_accrual_flag in VARCHAR2,
33: P_Org_Id in NUMBER) -- 12i MOAC changes
34: is
35:
36: cursor c is select rowid from pa_expenditure_groups
37: where expenditure_group = x_expenditure_group;
38: x_err_code NUMBER;
39: x_return_status VARCHAR2(630);
40:

Line 43: insert into pa_expenditure_groups (

39: x_return_status VARCHAR2(630);
40:
41: BEGIN
42:
43: insert into pa_expenditure_groups (
44: expenditure_group,
45: last_update_date,
46: last_updated_by ,
47: creation_date,

Line 110: cursor c_orig_group is select * from pa_expenditure_groups

106: x_last_update_login in NUMBER,
107: x_transaction_source in VARCHAR2,
108: x_period_accrual_flag in VARCHAR2) is
109:
110: cursor c_orig_group is select * from pa_expenditure_groups
111: where rowid = x_rowid;
112:
113: x_orig_group c_orig_group%rowtype;
114: x_err_code NUMBER;

Line 126: update pa_expenditure_groups

122: -- update all the columns to the new values, except for the
123: -- expenditure_group_status_code column - we call on the appropriate
124: -- submit/rework/release procedures to handle that.
125:
126: update pa_expenditure_groups
127: set expenditure_group = x_expenditure_group,
128: last_update_date = x_last_update_date,
129: last_updated_by = x_last_updated_by,
130: expenditure_ending_date = x_expenditure_ending_date,

Line 202: from pa_expenditure_groups

198:
199: procedure delete_row (x_rowid in VARCHAR2) is
200: cursor get_group is select expenditure_group,
201: expenditure_group_status_code
202: from pa_expenditure_groups
203: where rowid = x_rowid;
204: groups_rec get_group%rowtype;
205:
206: BEGIN

Line 245: delete from pa_expenditure_groups

241: fnd_message.set_name ('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
242: app_exception.raise_exception;
243: END;
244:
245: delete from pa_expenditure_groups
246: where rowid = x_rowid;
247:
248: END delete_row;
249:

Line 258: from pa_expenditure_groups

254: procedure lock_row (x_rowid in VARCHAR2) is
255: dummy NUMBER;
256: BEGIN
257: select 1 into dummy
258: from pa_expenditure_groups
259: where rowid = x_rowid
260: for update of expenditure_group nowait;
261: EXCEPTION
262:

Line 283: cursor c_orig_group is select * from pa_expenditure_groups

279: procedure release (x_expenditure_group in VARCHAR2,
280: x_err_code in out NOCOPY NUMBER,
281: x_return_status in out NOCOPY VARCHAR2) is
282:
283: cursor c_orig_group is select * from pa_expenditure_groups
284: where expenditure_group = x_expenditure_group;
285:
286: cursor lock_exps is select expenditure_id from pa_expenditures
287: where expenditure_group = x_expenditure_group

Line 311: update pa_expenditure_groups

307:
308: -- if it reaches here, the locks succeeded.
309:
310: /* Bug 3754875 : Removed the literals and added bind variables.
311: update pa_expenditure_groups
312: set expenditure_group_status_code = 'RELEASED'
313: where expenditure_group = x_expenditure_group;
314: */
315:

Line 345: cursor c_orig_group is select * from pa_expenditure_groups

341: procedure rework (x_expenditure_group in VARCHAR2,
342: x_err_code in out NOCOPY NUMBER,
343: x_return_status in out NOCOPY VARCHAR2) is
344:
345: cursor c_orig_group is select * from pa_expenditure_groups
346: where expenditure_group = x_expenditure_group
347: for update of expenditure_group_status_code nowait;
348:
349: cursor lock_exps is select expenditure_id from pa_expenditures

Line 376: update pa_expenditure_groups

372: fetch lock_exps into x_exps;
373:
374: -- if it reaches here, the locks succeeded.
375: /* Bug 3754875 : Removed the literals and added bind variables.
376: update pa_expenditure_groups
377: set expenditure_group_status_code = 'WORKING'
378: where expenditure_group = x_expenditure_group;
379: */
380:

Line 426: cursor c_orig_group is select * from pa_expenditure_groups

422: procedure check_submit_allowed (x_expenditure_group in VARCHAR2,
423: x_err_code in out NOCOPY NUMBER,
424: x_return_status in out NOCOPY VARCHAR2) is
425:
426: cursor c_orig_group is select * from pa_expenditure_groups
427: where expenditure_group = x_expenditure_group;
428:
429: x_orig_group c_orig_group%rowtype;
430: BEGIN

Line 558: update pa_expenditure_groups

554: open lock_exps;
555: fetch lock_exps into x_exps;
556:
557: /* Bug 3754875 : Removed the literals and added bind variables.
558: update pa_expenditure_groups
559: set expenditure_group_status_code = 'SUBMITTED'
560: where expenditure_group = x_expenditure_group;
561: */
562:

Line 593: update pa_expenditure_groups

589: Is
590:
591: Begin
592:
593: update pa_expenditure_groups
594: set expenditure_group_status_code = p_exp_grp_status_code
595: where expenditure_group = p_expenditure_group ;
596:
597: update pa_expenditures

Line 608: END pa_expenditure_groups_pkg;

604:
605:
606:
607:
608: END pa_expenditure_groups_pkg;