1: PACKAGE BODY cn_payruns_pkg AS
2: -- $Header: cnpruntb.pls 120.3 2005/09/22 13:01:26 rnagired ship $
3:
4: -- ===========================================================================
5: -- Procedure Name : Insert_Record
6: -- Purpose : Main insert procedure
7: -- ===========================================================================
8: PROCEDURE INSERT_RECORD (
9: x_payrun_id IN NUMBER,
10: x_name cn_payruns.NAME%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
7: -- ===========================================================================
8: PROCEDURE INSERT_RECORD (
9: x_payrun_id IN NUMBER,
10: x_name cn_payruns.NAME%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
8: PROCEDURE INSERT_RECORD (
9: x_payrun_id IN NUMBER,
10: x_name cn_payruns.NAME%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
9: x_payrun_id IN NUMBER,
10: x_name cn_payruns.NAME%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
10: x_name cn_payruns.NAME%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
11: x_pay_period_id cn_payruns.pay_period_id%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
12: x_incentive_type_code cn_payruns.incentive_type_code%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
13: x_pay_group_id cn_payruns.pay_group_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
14: x_pay_date cn_payruns.pay_date%TYPE,
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
15: x_accounting_period_id cn_payruns.accounting_period_id%TYPE,
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
23: )
16: x_batch_id cn_payruns.batch_id%TYPE,
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
23: )
24: IS
17: x_status cn_payruns.status%TYPE,
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
23: )
24: IS
25: BEGIN
18: x_created_by cn_payruns.created_by%TYPE,
19: x_creation_date cn_payruns.creation_date%TYPE,
20: x_object_version_number cn_payruns.object_version_number%TYPE,
21: x_org_id cn_payruns.org_id%TYPE,
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
23: )
24: IS
25: BEGIN
26: INSERT INTO cn_payruns
22: x_payrun_mode cn_payruns.payrun_mode%TYPE
23: )
24: IS
25: BEGIN
26: INSERT INTO cn_payruns
27: (payrun_id,
28: NAME,
29: pay_period_id,
30: incentive_type_code,
39: org_id,
40: payrun_mode
41:
42: )
43: VALUES (NVL (x_payrun_id, cn_payruns_s.NEXTVAL),
44: x_name,
45: x_pay_period_id,
46: x_incentive_type_code,
47: x_pay_group_id,
69: IS
70: CURSOR c
71: IS
72: SELECT *
73: FROM cn_payruns
74: WHERE payrun_id = x_payrun_id
75: FOR UPDATE OF payrun_id NOWAIT;
76:
77: recinfo c%ROWTYPE;
104: -- Procedure Name : Update Record
105: -- Purpose : To Update the Payment Plans
106: -- ===========================================================================
107: PROCEDURE UPDATE_RECORD (
108: x_payrun_id cn_payruns.payrun_id%TYPE,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
105: -- Purpose : To Update the Payment Plans
106: -- ===========================================================================
107: PROCEDURE UPDATE_RECORD (
108: x_payrun_id cn_payruns.payrun_id%TYPE,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
106: -- ===========================================================================
107: PROCEDURE UPDATE_RECORD (
108: x_payrun_id cn_payruns.payrun_id%TYPE,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
107: PROCEDURE UPDATE_RECORD (
108: x_payrun_id cn_payruns.payrun_id%TYPE,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
108: x_payrun_id cn_payruns.payrun_id%TYPE,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
109: x_name cn_payruns.NAME%TYPE := fnd_api.g_miss_char,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
110: x_pay_period_id cn_payruns.pay_period_id%TYPE := cn_api.g_miss_id,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
111: x_incentive_type_code cn_payruns.incentive_type_code%TYPE := cn_api.g_miss_char,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
112: x_pay_group_id cn_payruns.pay_group_id%TYPE := cn_api.g_miss_id,
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
113: x_pay_date cn_payruns.pay_date%TYPE := fnd_api.g_miss_date,
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
114: x_accounting_period_id cn_payruns.accounting_period_id%TYPE := cn_api.g_miss_id,
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
122: IS
115: x_batch_id cn_payruns.batch_id%TYPE := cn_api.g_miss_id,
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
122: IS
123: l_name cn_payruns.NAME%TYPE;
116: x_status cn_payruns.status%TYPE := fnd_api.g_miss_char,
117: x_last_updated_by cn_payruns.last_updated_by%TYPE,
118: x_last_update_date cn_payruns.last_update_date%TYPE,
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
122: IS
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
119: x_last_update_login cn_payruns.last_update_login%TYPE,
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
122: IS
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
120: x_object_version_number cn_payruns.object_version_number%TYPE
121: )
122: IS
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
121: )
122: IS
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
122: IS
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
130: l_status cn_payruns.status%TYPE;
123: l_name cn_payruns.NAME%TYPE;
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
130: l_status cn_payruns.status%TYPE;
131:
124: l_pay_period_id cn_payruns.pay_period_id%TYPE;
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
130: l_status cn_payruns.status%TYPE;
131:
132: CURSOR payrun_cur
125: l_incentive_type_code cn_payruns.incentive_type_code%TYPE;
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
130: l_status cn_payruns.status%TYPE;
131:
132: CURSOR payrun_cur
133: IS
126: l_pay_group_id cn_payruns.pay_group_id%TYPE;
127: l_pay_date cn_payruns.pay_date%TYPE;
128: l_accounting_period_id cn_payruns.accounting_period_id%TYPE;
129: l_batch_id cn_payruns.batch_id%TYPE;
130: l_status cn_payruns.status%TYPE;
131:
132: CURSOR payrun_cur
133: IS
134: SELECT *
131:
132: CURSOR payrun_cur
133: IS
134: SELECT *
135: FROM cn_payruns
136: WHERE payrun_id = x_payrun_id;
137:
138: l_payrun_rec payrun_cur%ROWTYPE;
139: BEGIN
161: l_batch_id,
162: l_status
163: FROM DUAL;
164:
165: UPDATE cn_payruns
166: SET NAME = l_name,
167: pay_period_id = l_pay_period_id,
168: incentive_type_code = l_incentive_type_code,
169: pay_group_id = l_pay_group_id,
192: x_payrun_id NUMBER
193: )
194: IS
195: BEGIN
196: DELETE FROM cn_payruns
197: WHERE payrun_id = x_payrun_id;
198: END DELETE_RECORD;
199: END cn_payruns_pkg;
195: BEGIN
196: DELETE FROM cn_payruns
197: WHERE payrun_id = x_payrun_id;
198: END DELETE_RECORD;
199: END cn_payruns_pkg;