45: l_program_id NUMBER(15) := pa_rep_util_glob.G_who_columns.G_program_id;
46: l_program_application_id NUMBER(15) := pa_rep_util_glob.G_who_columns.G_program_application_id;
47: l_creation_date DATE := pa_rep_util_glob.G_who_columns.G_creation_date;
48: l_program_update_date DATE := pa_rep_util_glob.G_who_columns.G_last_update_date;
49: l_debug varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
50:
51: -------------------------------------------------------
52:
53: PROCEDURE insert_act_into_tmp_table
52:
53: PROCEDURE insert_act_into_tmp_table
54: IS
55: BEGIN
56: PA_DEBUG.Set_Curr_Function( p_function => 'insert_act_into_tmp_table');
57:
58: IF l_debug ='Y'THEN -- bug 2674619
59: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
60: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
55: BEGIN
56: PA_DEBUG.Set_Curr_Function( p_function => 'insert_act_into_tmp_table');
57:
58: IF l_debug ='Y'THEN -- bug 2674619
59: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
60: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
61: END IF;
62:
63:
56: PA_DEBUG.Set_Curr_Function( p_function => 'insert_act_into_tmp_table');
57:
58: IF l_debug ='Y'THEN -- bug 2674619
59: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
60: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
61: END IF;
62:
63:
64: --
136: --
137:
138:
139: IF l_debug ='Y'THEN -- bug 2674619
140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
142: END IF;
143: PA_DEBUG.Reset_Curr_Function;
144: EXCEPTION
137:
138:
139: IF l_debug ='Y'THEN -- bug 2674619
140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
142: END IF;
143: PA_DEBUG.Reset_Curr_Function;
144: EXCEPTION
145: WHEN OTHERS THEN
139: IF l_debug ='Y'THEN -- bug 2674619
140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
142: END IF;
143: PA_DEBUG.Reset_Curr_Function;
144: EXCEPTION
145: WHEN OTHERS THEN
146: RAISE;
147: END insert_act_into_tmp_table;
155: l_records_updated PLS_INTEGER;
156: l_capacity_summarized NUMBER :=0;
157: BEGIN
158:
159: PA_DEBUG.Set_Curr_Function( p_function => 'Summarize_Actual_Util');
160:
161: IF (l_pa_period_flag = 'N') AND
162: (l_gl_period_flag = 'N') AND
163: (l_ge_period_flag = 'N') THEN
163: (l_ge_period_flag = 'N') THEN
164: /*
165: * None of the options are selected
166: */
167: PA_DEBUG.Reset_Curr_Function;
168: RETURN;
169: END IF;
170:
171: IF l_debug ='Y'THEN -- bug 2674619
168: RETURN;
169: END IF;
170:
171: IF l_debug ='Y'THEN -- bug 2674619
172: PA_DEBUG.g_err_stage := '10 : L_AC_START_DATE '||l_ac_start_date;
173: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
169: END IF;
170:
171: IF l_debug ='Y'THEN -- bug 2674619
172: PA_DEBUG.g_err_stage := '10 : L_AC_START_DATE '||l_ac_start_date;
173: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
170:
171: IF l_debug ='Y'THEN -- bug 2674619
172: PA_DEBUG.g_err_stage := '10 : L_AC_START_DATE '||l_ac_start_date;
173: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
171: IF l_debug ='Y'THEN -- bug 2674619
172: PA_DEBUG.g_err_stage := '10 : L_AC_START_DATE '||l_ac_start_date;
173: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
173: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
174: PA_DEBUG.g_err_stage := '20 : L_AC_END_DATE '||l_ac_end_date;
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
175: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
176:
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
184: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
177: PA_DEBUG.g_err_stage := '100 : After checking the flags ';
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
184: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
185: END IF;
178: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
184: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
185: END IF;
186:
179: PA_DEBUG.g_err_stage := '110 : L_PA_PERIOD_FLAG '||l_pa_period_flag;
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
184: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
185: END IF;
186:
187: /*
180: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
181: PA_DEBUG.g_err_stage := '120 : L_GL_PERIOD_FLAG '||l_gl_period_flag;
182: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
183: PA_DEBUG.g_err_stage := '130 : L_GE_PERIOD_FLAG '||l_ge_period_flag;
184: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
185: END IF;
186:
187: /*
188: * Calling a procedure for populating the initial temporary workspace
191: IF (l_pa_period_flag = 'Y') THEN
192: IF (l_gl_period_flag = 'Y') THEN
193: IF (l_ge_period_flag = 'Y') THEN
194: IF l_debug ='Y'THEN -- bug 2674619
195: PA_DEBUG.g_err_stage := '140 : Calling PAGLGE';
196: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
197: END IF;
198: insert_act_into_tmp_PAGLGE;
199: ELSE
192: IF (l_gl_period_flag = 'Y') THEN
193: IF (l_ge_period_flag = 'Y') THEN
194: IF l_debug ='Y'THEN -- bug 2674619
195: PA_DEBUG.g_err_stage := '140 : Calling PAGLGE';
196: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
197: END IF;
198: insert_act_into_tmp_PAGLGE;
199: ELSE
200: IF l_debug ='Y'THEN -- bug 2674619
197: END IF;
198: insert_act_into_tmp_PAGLGE;
199: ELSE
200: IF l_debug ='Y'THEN -- bug 2674619
201: PA_DEBUG.g_err_stage := '150 : Calling PAGL';
202: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
203: END IF;
204: insert_act_into_tmp_PAGL;
205: END IF;
198: insert_act_into_tmp_PAGLGE;
199: ELSE
200: IF l_debug ='Y'THEN -- bug 2674619
201: PA_DEBUG.g_err_stage := '150 : Calling PAGL';
202: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
203: END IF;
204: insert_act_into_tmp_PAGL;
205: END IF;
206: ELSIF (l_ge_period_flag = 'Y') THEN
204: insert_act_into_tmp_PAGL;
205: END IF;
206: ELSIF (l_ge_period_flag = 'Y') THEN
207: IF l_debug ='Y'THEN -- bug 2674619
208: PA_DEBUG.g_err_stage := '160 : Calling PAGE';
209: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
210: END IF;
211: insert_act_into_tmp_PAGE;
212: ELSE
205: END IF;
206: ELSIF (l_ge_period_flag = 'Y') THEN
207: IF l_debug ='Y'THEN -- bug 2674619
208: PA_DEBUG.g_err_stage := '160 : Calling PAGE';
209: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
210: END IF;
211: insert_act_into_tmp_PAGE;
212: ELSE
213: insert_act_into_tmp_PA;
211: insert_act_into_tmp_PAGE;
212: ELSE
213: insert_act_into_tmp_PA;
214: IF l_debug ='Y'THEN -- bug 2674619
215: PA_DEBUG.g_err_stage := '170 : Calling PA';
216: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
217: END IF;
218: END IF;
219: ELSIF (l_gl_period_flag = 'Y') THEN
212: ELSE
213: insert_act_into_tmp_PA;
214: IF l_debug ='Y'THEN -- bug 2674619
215: PA_DEBUG.g_err_stage := '170 : Calling PA';
216: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
217: END IF;
218: END IF;
219: ELSIF (l_gl_period_flag = 'Y') THEN
220: IF (l_ge_period_flag = 'Y') THEN
218: END IF;
219: ELSIF (l_gl_period_flag = 'Y') THEN
220: IF (l_ge_period_flag = 'Y') THEN
221: IF l_debug ='Y'THEN -- bug 2674619
222: PA_DEBUG.g_err_stage := '180 : Calling GLGE';
223: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
224: END IF;
225: insert_act_into_tmp_GLGE;
226: ELSE
219: ELSIF (l_gl_period_flag = 'Y') THEN
220: IF (l_ge_period_flag = 'Y') THEN
221: IF l_debug ='Y'THEN -- bug 2674619
222: PA_DEBUG.g_err_stage := '180 : Calling GLGE';
223: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
224: END IF;
225: insert_act_into_tmp_GLGE;
226: ELSE
227: IF l_debug ='Y'THEN -- bug 2674619
224: END IF;
225: insert_act_into_tmp_GLGE;
226: ELSE
227: IF l_debug ='Y'THEN -- bug 2674619
228: PA_DEBUG.g_err_stage := '190 : Calling GL';
229: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
230: END IF;
231: insert_act_into_tmp_GL;
232: END IF;
225: insert_act_into_tmp_GLGE;
226: ELSE
227: IF l_debug ='Y'THEN -- bug 2674619
228: PA_DEBUG.g_err_stage := '190 : Calling GL';
229: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
230: END IF;
231: insert_act_into_tmp_GL;
232: END IF;
233: ELSE
231: insert_act_into_tmp_GL;
232: END IF;
233: ELSE
234: IF l_debug ='Y'THEN -- bug 2674619
235: PA_DEBUG.g_err_stage := '200 : Calling GE';
236: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
237: END IF;
238: insert_act_into_tmp_GE;
239: END IF;
232: END IF;
233: ELSE
234: IF l_debug ='Y'THEN -- bug 2674619
235: PA_DEBUG.g_err_stage := '200 : Calling GE';
236: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
237: END IF;
238: insert_act_into_tmp_GE;
239: END IF;
240: /*
260: * Check if ANY records have been inserted into the temporary table.
261: * If NO records are inserted, getout of the loop.
262: */
263: IF l_debug ='Y'THEN -- bug 2674619
264: PA_DEBUG.g_err_stage := '220 : After Calling the INSERT_PROC_[PA][GL][GE]';
265: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
266: END IF;
267:
268: l_records_inserted := SQL%ROWCOUNT;
261: * If NO records are inserted, getout of the loop.
262: */
263: IF l_debug ='Y'THEN -- bug 2674619
264: PA_DEBUG.g_err_stage := '220 : After Calling the INSERT_PROC_[PA][GL][GE]';
265: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
266: END IF;
267:
268: l_records_inserted := SQL%ROWCOUNT;
269:
267:
268: l_records_inserted := SQL%ROWCOUNT;
269:
270: IF l_debug ='Y'THEN -- bug 2674619
271: PA_DEBUG.g_err_stage := '225 : Records Inserted in Temp tab : '||l_records_inserted;
272: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
273:
274: PA_DEBUG.G_Err_Stage := '753 : l_capacity_summarized: ' || l_capacity_summarized;
275: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
268: l_records_inserted := SQL%ROWCOUNT;
269:
270: IF l_debug ='Y'THEN -- bug 2674619
271: PA_DEBUG.g_err_stage := '225 : Records Inserted in Temp tab : '||l_records_inserted;
272: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
273:
274: PA_DEBUG.G_Err_Stage := '753 : l_capacity_summarized: ' || l_capacity_summarized;
275: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
276: END IF;
270: IF l_debug ='Y'THEN -- bug 2674619
271: PA_DEBUG.g_err_stage := '225 : Records Inserted in Temp tab : '||l_records_inserted;
272: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
273:
274: PA_DEBUG.G_Err_Stage := '753 : l_capacity_summarized: ' || l_capacity_summarized;
275: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
276: END IF;
277:
278: IF (l_records_inserted = 0 AND l_capacity_summarized = 1) THEN
271: PA_DEBUG.g_err_stage := '225 : Records Inserted in Temp tab : '||l_records_inserted;
272: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
273:
274: PA_DEBUG.G_Err_Stage := '753 : l_capacity_summarized: ' || l_capacity_summarized;
275: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
276: END IF;
277:
278: IF (l_records_inserted = 0 AND l_capacity_summarized = 1) THEN
279: IF l_debug ='Y'THEN -- bug 2674619
276: END IF;
277:
278: IF (l_records_inserted = 0 AND l_capacity_summarized = 1) THEN
279: IF l_debug ='Y'THEN -- bug 2674619
280: PA_DEBUG.G_Err_Stage := '757 : EXITING since l_records_inserted = 0 AND l_capacity_summarized = 1';
281: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
282: END IF;
283: EXIT;
284: END IF;
277:
278: IF (l_records_inserted = 0 AND l_capacity_summarized = 1) THEN
279: IF l_debug ='Y'THEN -- bug 2674619
280: PA_DEBUG.G_Err_Stage := '757 : EXITING since l_records_inserted = 0 AND l_capacity_summarized = 1';
281: PA_DEBUG.Log_Message(p_message => pa_debug.G_Err_Stage);
282: END IF;
283: EXIT;
284: END IF;
285:
290: * for which updation went thro' fine.
291: */
292:
293: IF l_debug ='Y'THEN -- bug 2674619
294: PA_DEBUG.g_err_stage := '250 : Before Updating PA_CDL to UTIL_SUMM_FLAG to S';
295: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
296: END IF;
297:
298: UPDATE pa_cost_distribution_lines_all
291: */
292:
293: IF l_debug ='Y'THEN -- bug 2674619
294: PA_DEBUG.g_err_stage := '250 : Before Updating PA_CDL to UTIL_SUMM_FLAG to S';
295: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
296: END IF;
297:
298: UPDATE pa_cost_distribution_lines_all
299: SET util_summarized_flag = 'S'
319: * records SHOULD processed and hence to be considered as
320: * NOT deleted.
321: */
322: IF l_debug ='Y'THEN -- bug 2674619
323: PA_DEBUG.g_err_stage := '300 : After Updating PA_CDL to UTIL_SUMM_FLAG to S';
324: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
325: PA_DEBUG.g_err_stage := '325 : Records Updated in PA_CDL : '||l_records_updated;
326: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
327: END IF;
320: * NOT deleted.
321: */
322: IF l_debug ='Y'THEN -- bug 2674619
323: PA_DEBUG.g_err_stage := '300 : After Updating PA_CDL to UTIL_SUMM_FLAG to S';
324: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
325: PA_DEBUG.g_err_stage := '325 : Records Updated in PA_CDL : '||l_records_updated;
326: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
327: END IF;
328:
321: */
322: IF l_debug ='Y'THEN -- bug 2674619
323: PA_DEBUG.g_err_stage := '300 : After Updating PA_CDL to UTIL_SUMM_FLAG to S';
324: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
325: PA_DEBUG.g_err_stage := '325 : Records Updated in PA_CDL : '||l_records_updated;
326: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
327: END IF;
328:
329: l_process_method := 'A';
322: IF l_debug ='Y'THEN -- bug 2674619
323: PA_DEBUG.g_err_stage := '300 : After Updating PA_CDL to UTIL_SUMM_FLAG to S';
324: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
325: PA_DEBUG.g_err_stage := '325 : Records Updated in PA_CDL : '||l_records_updated;
326: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
327: END IF;
328:
329: l_process_method := 'A';
330: IF (l_records_updated < l_records_inserted AND l_cdl_rowid_tab.COUNT > 0 ) THEN /* Added second condition 2084888 */
339: */
340: l_cdl_rowid_tab.DELETE;
341:
342: IF l_debug ='Y'THEN -- bug 2674619
343: PA_DEBUG.g_err_stage := '350: Process Method : '||l_process_method;
344: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
345: END IF;
346:
347: /*
340: l_cdl_rowid_tab.DELETE;
341:
342: IF l_debug ='Y'THEN -- bug 2674619
343: PA_DEBUG.g_err_stage := '350: Process Method : '||l_process_method;
344: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
345: END IF;
346:
347: /*
348: * Call Package PA_REP_UTILS_SUMM_PKG.populate_summ_entity to Summarize
348: * Call Package PA_REP_UTILS_SUMM_PKG.populate_summ_entity to Summarize
349: Records and Populate the Objects and Balances
350: */
351: IF l_debug ='Y'THEN -- bug 2674619
352: PA_DEBUG.g_err_stage := '400: Before calling PA_REP_UTILS_SUMM_PKG';
353: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
354: END IF;
355:
356: PA_REP_UTILS_SUMM_PKG.populate_summ_entity( P_Balance_Type_Code => l_bal_type_actual
349: Records and Populate the Objects and Balances
350: */
351: IF l_debug ='Y'THEN -- bug 2674619
352: PA_DEBUG.g_err_stage := '400: Before calling PA_REP_UTILS_SUMM_PKG';
353: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
354: END IF;
355:
356: PA_REP_UTILS_SUMM_PKG.populate_summ_entity( P_Balance_Type_Code => l_bal_type_actual
357: ,P_process_method => l_process_method
364: * If process_method is 'A' (All), update all records in cdl with
365: * util_summarized_flag = 'S' to NULL.
366: */
367: IF l_debug ='Y'THEN -- bug 2674619
368: PA_DEBUG.g_err_stage := '450: After calling PA_REP_UTILS_SUMM_PKG';
369: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
370: END IF;
371:
372: IF l_process_method = 'F' THEN
365: * util_summarized_flag = 'S' to NULL.
366: */
367: IF l_debug ='Y'THEN -- bug 2674619
368: PA_DEBUG.g_err_stage := '450: After calling PA_REP_UTILS_SUMM_PKG';
369: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
370: END IF;
371:
372: IF l_process_method = 'F' THEN
373: UPDATE pa_cost_distribution_lines_all
406: WHERE row_id IN (SELECT row_id FROM pa_rep_util_summ0_tmp);
407:
408:
409: IF l_debug ='Y'THEN -- bug 2674619
410: PA_DEBUG.g_err_stage := '500: After updating PA_CDL.UTIL_SUMM_FLAG to Y';
411: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
412: END IF;
413:
414: COMMIT;
407:
408:
409: IF l_debug ='Y'THEN -- bug 2674619
410: PA_DEBUG.g_err_stage := '500: After updating PA_CDL.UTIL_SUMM_FLAG to Y';
411: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
412: END IF;
413:
414: COMMIT;
415: END LOOP;
415: END LOOP;
416: IF pa_rep_util_glob.G_input_parameters.G_org_rollup_method = 'R' THEN
417:
418: IF l_debug ='Y'THEN -- bug 2674619
419: PA_DEBUG.g_err_stage := '510: Before calling Rollup if rollup method is R';
420: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
421: END IF;
422:
423: PA_SUMMARIZE_ORG_ROLLUP_PVT.refresh_org_hierarchy_rollup(l_bal_type_actual);
416: IF pa_rep_util_glob.G_input_parameters.G_org_rollup_method = 'R' THEN
417:
418: IF l_debug ='Y'THEN -- bug 2674619
419: PA_DEBUG.g_err_stage := '510: Before calling Rollup if rollup method is R';
420: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
421: END IF;
422:
423: PA_SUMMARIZE_ORG_ROLLUP_PVT.refresh_org_hierarchy_rollup(l_bal_type_actual);
424:
422:
423: PA_SUMMARIZE_ORG_ROLLUP_PVT.refresh_org_hierarchy_rollup(l_bal_type_actual);
424:
425: IF l_debug ='Y'THEN -- bug 2674619
426: PA_DEBUG.g_err_stage := '520: After calling Org Hierarchy Rollup';
427: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
428: END IF;
429: END IF;
430:
423: PA_SUMMARIZE_ORG_ROLLUP_PVT.refresh_org_hierarchy_rollup(l_bal_type_actual);
424:
425: IF l_debug ='Y'THEN -- bug 2674619
426: PA_DEBUG.g_err_stage := '520: After calling Org Hierarchy Rollup';
427: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
428: END IF;
429: END IF;
430:
431:
429: END IF;
430:
431:
432: IF l_debug ='Y'THEN -- bug 2674619
433: PA_DEBUG.g_err_stage := '550: Before updating PA_UTILIZATION_OPTIONS_ALL';
434: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
435: END IF;
436:
437: /*
430:
431:
432: IF l_debug ='Y'THEN -- bug 2674619
433: PA_DEBUG.g_err_stage := '550: Before updating PA_UTILIZATION_OPTIONS_ALL';
434: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
435: END IF;
436:
437: /*
438: * Update pa_utilization_options with the dates for which
453: , actuals_last_run_date = sysdate
454: WHERE NVL(org_id,-99) = l_org_id;
455:
456: IF l_debug ='Y'THEN -- bug 2674619
457: PA_DEBUG.g_err_stage := '600: After updating PA_UTILIZATION_OPTIONS_ALL';
458: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
459: PA_DEBUG.g_err_stage := '700: Exiting the Package PA_SUMMARIZE_ACTUAL_UTIL_PVT';
460: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
461: END IF;
454: WHERE NVL(org_id,-99) = l_org_id;
455:
456: IF l_debug ='Y'THEN -- bug 2674619
457: PA_DEBUG.g_err_stage := '600: After updating PA_UTILIZATION_OPTIONS_ALL';
458: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
459: PA_DEBUG.g_err_stage := '700: Exiting the Package PA_SUMMARIZE_ACTUAL_UTIL_PVT';
460: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
461: END IF;
462: PA_DEBUG.Reset_Curr_Function;
455:
456: IF l_debug ='Y'THEN -- bug 2674619
457: PA_DEBUG.g_err_stage := '600: After updating PA_UTILIZATION_OPTIONS_ALL';
458: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
459: PA_DEBUG.g_err_stage := '700: Exiting the Package PA_SUMMARIZE_ACTUAL_UTIL_PVT';
460: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
461: END IF;
462: PA_DEBUG.Reset_Curr_Function;
463: COMMIT;
456: IF l_debug ='Y'THEN -- bug 2674619
457: PA_DEBUG.g_err_stage := '600: After updating PA_UTILIZATION_OPTIONS_ALL';
458: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
459: PA_DEBUG.g_err_stage := '700: Exiting the Package PA_SUMMARIZE_ACTUAL_UTIL_PVT';
460: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
461: END IF;
462: PA_DEBUG.Reset_Curr_Function;
463: COMMIT;
464: EXCEPTION
458: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
459: PA_DEBUG.g_err_stage := '700: Exiting the Package PA_SUMMARIZE_ACTUAL_UTIL_PVT';
460: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
461: END IF;
462: PA_DEBUG.Reset_Curr_Function;
463: COMMIT;
464: EXCEPTION
465: WHEN OTHERS THEN
466: IF l_debug ='Y'THEN -- bug 2674619
463: COMMIT;
464: EXCEPTION
465: WHEN OTHERS THEN
466: IF l_debug ='Y'THEN -- bug 2674619
467: PA_DEBUG.Log_Message(PA_DEBUG.g_err_stack);
468: PA_DEBUG.Log_Message( SQLERRM);
469: END IF;
470: RAISE;
471:
464: EXCEPTION
465: WHEN OTHERS THEN
466: IF l_debug ='Y'THEN -- bug 2674619
467: PA_DEBUG.Log_Message(PA_DEBUG.g_err_stack);
468: PA_DEBUG.Log_Message( SQLERRM);
469: END IF;
470: RAISE;
471:
472: END summarize_actual_util;
474: -------------------------------------------------------
475: PROCEDURE insert_act_into_tmp_PA
476: IS
477: BEGIN
478: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PA');
479: IF l_debug ='Y'THEN -- bug 2674619
480: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
481: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
482: END IF;
476: IS
477: BEGIN
478: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PA');
479: IF l_debug ='Y'THEN -- bug 2674619
480: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
481: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
482: END IF;
483:
484: INSERT
477: BEGIN
478: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PA');
479: IF l_debug ='Y'THEN -- bug 2674619
480: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
481: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
482: END IF;
483:
484: INSERT
485: INTO pa_rep_util_summ00_tmp(
571: AND cdl.util_summarized_flag = 'N'
572: AND NVL(cdl.org_id,-99) = l_org_id;
573: commit;
574: IF l_debug ='Y'THEN -- bug 2674619
575: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
576: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
577: END IF;
578:
579: PA_DEBUG.Reset_Curr_Function;
572: AND NVL(cdl.org_id,-99) = l_org_id;
573: commit;
574: IF l_debug ='Y'THEN -- bug 2674619
575: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
576: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
577: END IF;
578:
579: PA_DEBUG.Reset_Curr_Function;
580: EXCEPTION
575: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
576: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
577: END IF;
578:
579: PA_DEBUG.Reset_Curr_Function;
580: EXCEPTION
581: WHEN OTHERS THEN
582: RAISE;
583:
585: -------------------------------------------------------
586: PROCEDURE insert_act_into_tmp_GL
587: IS
588: BEGIN
589: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GL');
590: IF l_debug ='Y'THEN -- bug 2674619
591: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
592: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
593: END IF;
587: IS
588: BEGIN
589: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GL');
590: IF l_debug ='Y'THEN -- bug 2674619
591: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
592: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
593: END IF;
594: INSERT
595: INTO pa_rep_util_summ00_tmp(
588: BEGIN
589: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GL');
590: IF l_debug ='Y'THEN -- bug 2674619
591: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
592: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
593: END IF;
594: INSERT
595: INTO pa_rep_util_summ00_tmp(
596: Row_id
680: AND cdl.line_type = 'R'
681: AND cdl.util_summarized_flag = 'N'
682: AND NVL(cdl.org_id,-99) = l_org_id;
683: IF l_debug ='Y'THEN -- bug 2674619
684: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
685: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
686: END IF;
687: PA_DEBUG.Reset_Curr_Function;
688: EXCEPTION
681: AND cdl.util_summarized_flag = 'N'
682: AND NVL(cdl.org_id,-99) = l_org_id;
683: IF l_debug ='Y'THEN -- bug 2674619
684: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
685: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
686: END IF;
687: PA_DEBUG.Reset_Curr_Function;
688: EXCEPTION
689: WHEN OTHERS THEN
683: IF l_debug ='Y'THEN -- bug 2674619
684: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
685: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
686: END IF;
687: PA_DEBUG.Reset_Curr_Function;
688: EXCEPTION
689: WHEN OTHERS THEN
690: RAISE;
691:
693: -------------------------------------------------------
694: PROCEDURE insert_act_into_tmp_PAGL
695: IS
696: BEGIN
697: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGL');
698: IF l_debug ='Y'THEN -- bug 2674619
699: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
700: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
701: END IF;
695: IS
696: BEGIN
697: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGL');
698: IF l_debug ='Y'THEN -- bug 2674619
699: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
700: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
701: END IF;
702:
703: INSERT
696: BEGIN
697: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGL');
698: IF l_debug ='Y'THEN -- bug 2674619
699: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
700: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
701: END IF;
702:
703: INSERT
704: INTO pa_rep_util_summ00_tmp(
793: AND cdl.line_type = 'R'
794: AND cdl.util_summarized_flag = 'N'
795: AND NVL(cdl.org_id,-99) = l_org_id;
796: IF l_debug ='Y'THEN -- bug 2674619
797: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
798: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
799: END IF;
800:
801: PA_DEBUG.Reset_Curr_Function;
794: AND cdl.util_summarized_flag = 'N'
795: AND NVL(cdl.org_id,-99) = l_org_id;
796: IF l_debug ='Y'THEN -- bug 2674619
797: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
798: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
799: END IF;
800:
801: PA_DEBUG.Reset_Curr_Function;
802:
797: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
798: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
799: END IF;
800:
801: PA_DEBUG.Reset_Curr_Function;
802:
803: EXCEPTION
804: WHEN OTHERS THEN
805: RAISE;
807: -------------------------------------------------------
808: PROCEDURE insert_act_into_tmp_PAGE
809: IS
810: BEGIN
811: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGE');
812: IF l_debug ='Y'THEN -- bug 2674619
813: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
814: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
815: END IF;
809: IS
810: BEGIN
811: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGE');
812: IF l_debug ='Y'THEN -- bug 2674619
813: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
814: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
815: END IF;
816: INSERT
817: INTO pa_rep_util_summ00_tmp(
810: BEGIN
811: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGE');
812: IF l_debug ='Y'THEN -- bug 2674619
813: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
814: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
815: END IF;
816: INSERT
817: INTO pa_rep_util_summ00_tmp(
818: Row_id
907: AND cdl.line_type = 'R'
908: AND cdl.util_summarized_flag = 'N'
909: AND NVL(cdl.org_id,-99) = l_org_id;
910: IF l_debug ='Y'THEN -- bug 2674619
911: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
912: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
913: END IF;
914:
915: PA_DEBUG.Reset_Curr_Function;
908: AND cdl.util_summarized_flag = 'N'
909: AND NVL(cdl.org_id,-99) = l_org_id;
910: IF l_debug ='Y'THEN -- bug 2674619
911: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
912: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
913: END IF;
914:
915: PA_DEBUG.Reset_Curr_Function;
916:
911: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
912: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
913: END IF;
914:
915: PA_DEBUG.Reset_Curr_Function;
916:
917: EXCEPTION
918: WHEN OTHERS THEN
919: RAISE;
921: -------------------------------------------------------
922: PROCEDURE insert_act_into_tmp_GE
923: IS
924: BEGIN
925: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GE') ;
926: IF l_debug ='Y'THEN -- bug 2674619
927: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
928: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
929: END IF;
923: IS
924: BEGIN
925: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GE') ;
926: IF l_debug ='Y'THEN -- bug 2674619
927: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
928: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
929: END IF;
930: INSERT
931: INTO pa_rep_util_summ00_tmp(
924: BEGIN
925: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GE') ;
926: IF l_debug ='Y'THEN -- bug 2674619
927: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
928: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
929: END IF;
930: INSERT
931: INTO pa_rep_util_summ00_tmp(
932: Row_id
1017: AND cdl.line_type = 'R'
1018: AND cdl.util_summarized_flag = 'N'
1019: AND NVL(cdl.org_id,-99) = l_org_id;
1020: IF l_debug ='Y'THEN -- bug 2674619
1021: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1022: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1023: END IF;
1024:
1025: PA_DEBUG.Reset_Curr_Function;
1018: AND cdl.util_summarized_flag = 'N'
1019: AND NVL(cdl.org_id,-99) = l_org_id;
1020: IF l_debug ='Y'THEN -- bug 2674619
1021: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1022: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1023: END IF;
1024:
1025: PA_DEBUG.Reset_Curr_Function;
1026:
1021: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1022: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1023: END IF;
1024:
1025: PA_DEBUG.Reset_Curr_Function;
1026:
1027: EXCEPTION
1028: WHEN OTHERS THEN
1029: RAISE;
1032: -------------------------------------------------------
1033: PROCEDURE insert_act_into_tmp_PAGLGE
1034: IS
1035: BEGIN
1036: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGLGE');
1037: IF l_debug ='Y'THEN -- bug 2674619
1038: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1039: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1040: END IF;
1034: IS
1035: BEGIN
1036: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGLGE');
1037: IF l_debug ='Y'THEN -- bug 2674619
1038: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1039: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1040: END IF;
1041: INSERT
1042: INTO pa_rep_util_summ00_tmp(
1035: BEGIN
1036: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_PAGLGE');
1037: IF l_debug ='Y'THEN -- bug 2674619
1038: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1039: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1040: END IF;
1041: INSERT
1042: INTO pa_rep_util_summ00_tmp(
1043: Row_id
1136: AND cdl.line_type = 'R'
1137: AND cdl.util_summarized_flag = 'N'
1138: AND NVL(cdl.org_id,-99) = l_org_id;
1139: IF l_debug ='Y'THEN -- bug 2674619
1140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1142: END IF;
1143:
1144: PA_DEBUG.Reset_Curr_Function;
1137: AND cdl.util_summarized_flag = 'N'
1138: AND NVL(cdl.org_id,-99) = l_org_id;
1139: IF l_debug ='Y'THEN -- bug 2674619
1140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1142: END IF;
1143:
1144: PA_DEBUG.Reset_Curr_Function;
1145:
1140: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1141: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1142: END IF;
1143:
1144: PA_DEBUG.Reset_Curr_Function;
1145:
1146: EXCEPTION
1147: WHEN OTHERS THEN
1148: RAISE;
1150: -------------------------------------------------------
1151: PROCEDURE insert_act_into_tmp_GLGE
1152: IS
1153: BEGIN
1154: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GLGE');
1155: IF l_debug ='Y'THEN -- bug 2674619
1156: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1157: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1158: END IF;
1152: IS
1153: BEGIN
1154: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GLGE');
1155: IF l_debug ='Y'THEN -- bug 2674619
1156: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1157: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1158: END IF;
1159: INSERT
1160: INTO pa_rep_util_summ00_tmp(
1153: BEGIN
1154: PA_DEBUG.Set_Curr_Function( p_function => 'Insert_act_into_tmp_GLGE');
1155: IF l_debug ='Y'THEN -- bug 2674619
1156: PA_DEBUG.g_err_stage := '205: Before inserting recs into Temp Table';
1157: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1158: END IF;
1159: INSERT
1160: INTO pa_rep_util_summ00_tmp(
1161: Row_id
1251: AND cdl.util_summarized_flag = 'N'
1252: AND NVL(cdl.org_id,-99) = l_org_id;
1253: -- AND ROWNUM <= l_fetch_size;
1254: IF l_debug ='Y'THEN -- bug 2674619
1255: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1256: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1257: END IF;
1258:
1259: PA_DEBUG.Reset_Curr_Function;
1252: AND NVL(cdl.org_id,-99) = l_org_id;
1253: -- AND ROWNUM <= l_fetch_size;
1254: IF l_debug ='Y'THEN -- bug 2674619
1255: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1256: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1257: END IF;
1258:
1259: PA_DEBUG.Reset_Curr_Function;
1260:
1255: PA_DEBUG.g_err_stage := '210: After inserting recs into Temp Table';
1256: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
1257: END IF;
1258:
1259: PA_DEBUG.Reset_Curr_Function;
1260:
1261: EXCEPTION
1262: WHEN OTHERS THEN
1263: RAISE;