[Home] [Help]
PACKAGE BODY: APPS.PJI_SYSTEM_SETTINGS_PKG
Source
1 PACKAGE BODY PJI_SYSTEM_SETTINGS_PKG AS
2 /* $Header: PJISYSTB.pls 120.1.12020000.2 2012/07/18 10:57:22 admarath ship $ */
3 PROCEDURE insert_row (
4 p_setting_id IN NUMBER,
5 p_pa_period_flag IN VARCHAR2,
6 p_gl_period_flag IN VARCHAR2,
7 p_planamt_alloc_method IN VARCHAR2,
8 p_prj_curr_flag IN VARCHAR2,
9 p_projfunc_curr_flag IN VARCHAR2,
10 p_curr_rep_pa_period IN VARCHAR2,
11 p_curr_rep_gl_period IN VARCHAR2,
12 p_curr_rep_ent_period IN VARCHAR2,
13 p_plan_amt_conv_date IN VARCHAR2,
14 p_global_curr1_flag IN VARCHAR2, /* Added for Bug 8708651 */
15 p_global_curr2_flag IN VARCHAR2,
16 p_txn_curr_flag IN VARCHAR2, -- Added for bug 4167173
17 p_time_phase_flag IN VARCHAR2, /* Added for Bug 8708651 */
18 p_per_analysis_flag IN VARCHAR2, /* Added for Bug 8708651 */
19 p_up_process_flag IN VARCHAR2, /* Added for Bug 8708651 */
20 p_psi_ppr_flag IN VARCHAR2, /* Added for Bug 13889383 */
21 x_return_status OUT NOCOPY VARCHAR2,
22 x_msg_count OUT NOCOPY NUMBER,
23 x_msg_data OUT NOCOPY VARCHAR2
24 ) IS
25 BEGIN
26
27 INSERT INTO pji_system_settings (
28 SETTING_ID ,
29 PA_PERIOD_FLAG ,
30 GL_PERIOD_FLAG ,
31 PLANAMT_ALLOC_METHOD ,
32 PRJ_CURR_FLAG ,
33 PROJFUNC_CURR_FLAG ,
34 CURR_REP_PA_PERIOD ,
35 CURR_REP_GL_PERIOD ,
36 CURR_REP_ENT_PERIOD ,
37 PLANAMT_CONV_DATE,
38 GLOBAL_CURR1_FLAG, /* Added for Bug 8708651 */
39 GLOBAL_CURR2_FLAG,
40 TXN_CURR_FLAG,
41 TIME_PHASE_FLAG, /* Added for Bug 8708651 */
42 PER_ANALYSIS_FLAG, /* Added for Bug 8708651 */
43 UP_PROCESS_FLAG, /* Added for Bug 8708651 */
44 PSI_PPR_FLAG, /* Added for Bug 13889383 */
45 LAST_UPDATE_DATE,
46 LAST_UPDATED_BY,
47 CREATION_DATE,
48 CREATED_BY,
49 LAST_UPDATE_LOGIN
50 ) VALUES (
51 p_SETTING_ID ,
52 p_PA_PERIOD_FLAG ,
53 p_GL_PERIOD_FLAG ,
54 p_PLANAMT_ALLOC_METHOD ,
55 p_PRJ_CURR_FLAG ,
56 p_PROJFUNC_CURR_FLAG ,
57 p_CURR_REP_PA_PERIOD ,
58 p_CURR_REP_GL_PERIOD ,
59 p_CURR_REP_ENT_PERIOD ,
60 p_PLAN_AMT_CONV_DATE ,
61 p_global_curr1_flag, /* Added for Bug 8708651 */
62 p_global_curr2_flag,
63 p_txn_curr_flag,
64 p_time_phase_flag, /* Added for Bug 8708651 */
65 p_per_analysis_flag, /* Added for Bug 8708651 */
66 p_up_process_flag, /* Added for Bug 8708651 */
67 p_psi_ppr_flag, /* Added for Bug 13889383 */
68 sysdate ,
69 fnd_global.user_id ,
70 sysdate ,
71 fnd_global.user_id ,
72 fnd_global.login_id
73 ) ;
74
75 EXCEPTION
76 WHEN OTHERS THEN -- catch the exceptions here
77 RAISE;
78 END insert_row;
79
80 PROCEDURE update_row (
81 p_setting_id IN NUMBER,
82 p_pa_period_flag IN VARCHAR2,
83 p_gl_period_flag IN VARCHAR2,
84 p_planamt_alloc_method IN VARCHAR2,
85 p_prj_curr_flag IN VARCHAR2,
86 p_projfunc_curr_flag IN VARCHAR2,
87 p_curr_rep_pa_period IN VARCHAR2,
88 p_curr_rep_gl_period IN VARCHAR2,
89 p_curr_rep_ent_period IN VARCHAR2,
90 p_plan_amt_conv_date IN VARCHAR2,
91 p_global_curr1_flag IN VARCHAR2, /* Added for Bug 8708651 */
92 p_global_curr2_flag IN VARCHAR2,
93 p_txn_curr_flag IN VARCHAR2, -- Added for bug 4167173
94 p_time_phase_flag IN VARCHAR2, /* Added for Bug 8708651 */
95 p_per_analysis_flag IN VARCHAR2, /* Added for Bug 8708651 */
96 p_up_process_flag IN VARCHAR2, /* Added for Bug 8708651 */
97 p_psi_ppr_flag IN VARCHAR2, /* Added for Bug 13889383 */
98 x_return_status OUT NOCOPY VARCHAR2,
99 x_msg_count OUT NOCOPY NUMBER,
100 x_msg_data OUT NOCOPY VARCHAR2
101 ) IS
102 l_return_status VARCHAR2(15);
103 l_msg_count NUMBER;
104 l_msg_data VARCHAR2(30);
105 BEGIN
106
107 UPDATE pji_system_settings SET
108 PA_PERIOD_FLAG = p_PA_PERIOD_FLAG,
109 GL_PERIOD_FLAG = p_GL_PERIOD_FLAG,
110 PLANAMT_ALLOC_METHOD = p_PLANAMT_ALLOC_METHOD,
111 PRJ_CURR_FLAG = p_PRJ_CURR_FLAG,
112 PROJFUNC_CURR_FLAG = p_PROJFUNC_CURR_FLAG,
113 CURR_REP_PA_PERIOD = p_CURR_REP_PA_PERIOD,
114 CURR_REP_GL_PERIOD = p_CURR_REP_GL_PERIOD,
115 CURR_REP_ENT_PERIOD = p_CURR_REP_ENT_PERIOD,
116 PLANAMT_CONV_DATE = p_PLAN_AMT_CONV_DATE,
117 GLOBAL_CURR1_FLAG = p_global_curr1_flag, /* Added for Bug 8708651 */
118 GLOBAL_CURR2_FLAG = p_global_curr2_flag,
119 TXN_CURR_FLAG = p_txn_curr_flag,
120 TIME_PHASE_FLAG = p_time_phase_flag, /* Added for Bug 8708651 */
121 PER_ANALYSIS_FLAG = p_per_analysis_flag, /* Added for Bug 8708651 */
122 UP_PROCESS_FLAG = p_up_process_flag, /* Added for Bug 8708651 */
123 PSI_PPR_FLAG = p_psi_ppr_flag, /* Added for Bug 13889383 */
124 LAST_UPDATE_DATE = sysdate,
125 LAST_UPDATED_BY = fnd_global.user_id,
126 LAST_UPDATE_LOGIN = fnd_global.login_id;
127 IF SQL%ROWCOUNT = 0 THEN
128 insert_row(
129 p_SETTING_ID , --setting_id would be coming from page as 1
130 p_PA_PERIOD_FLAG ,
131 p_GL_PERIOD_FLAG ,
132 p_PLANAMT_ALLOC_METHOD ,
133 p_PRJ_CURR_FLAG ,
134 p_PROJFUNC_CURR_FLAG ,
135 p_CURR_REP_PA_PERIOD ,
136 p_CURR_REP_GL_PERIOD ,
137 p_CURR_REP_ENT_PERIOD ,
138 p_PLAN_AMT_CONV_DATE,
139 p_global_curr1_flag, /* Added for Bug 8708651 */
140 p_global_curr2_flag,
141 p_txn_curr_flag,
142 p_time_phase_flag, /* Added for Bug 8708651 */
143 p_per_analysis_flag, /* Added for Bug 8708651 */
144 p_up_process_flag, /* Added for Bug 8708651 */
145 p_psi_ppr_flag, /* Added for Bug 13889383 */
146 l_return_status,
147 l_msg_count,
148 l_msg_data
149 );
150 END IF;
151
152 END update_row;
153
154 PROCEDURE delete_row (
155 p_setting_id IN NUMBER,
156 x_return_status OUT NOCOPY VARCHAR2,
157 x_msg_count OUT NOCOPY NUMBER,
158 x_msg_data OUT NOCOPY VARCHAR2
159 ) IS
160 BEGIN
161
162
163 delete from PJI_SYSTEM_SETTINGS where SETTING_ID = p_SETTING_ID;
164
165 END delete_row;
166
167 END; --end package pji_system_settings