70:
71: g_user := -1 ;
72: -- Call the procedure to delete CDLs
73:
74: pa_debug.debug('*-> About to purge CDLs ') ;
75: x_err_stage := 'About to purge CDLs for project '||to_char(p_project_id) ;
76: pa_purge_costing.PA_CostDistLines(p_purge_batch_id => p_purge_batch_id,
77: p_project_id => p_project_id,
78: p_txn_to_date => p_txn_to_date ,
83: x_err_stack => x_err_stack,
84: x_err_stage => x_err_stage
85: ) ;
86:
87: pa_debug.debug('*-> About to purge CCDIST lines ') ;
88: x_err_stage := 'About to purge CCDIST lines for project '||to_char(p_project_id) ;
89: pa_purge_costing.PA_CcDistLines(p_purge_batch_id => p_purge_batch_id,
90: p_project_id => p_project_id,
91: p_txn_to_date => p_txn_to_date ,
96: x_err_stack => x_err_stack,
97: x_err_stage => x_err_stage
98: ) ;
99:
100: pa_debug.debug('*-> About to purge expenditure comments ') ;
101: x_err_stage := 'About to purge expenditure comments for project '||to_char(p_project_id) ;
102: pa_purge_costing.PA_ExpenditureComments(p_purge_batch_id => p_purge_batch_id,
103: p_project_id => p_project_id,
104: p_txn_to_date => p_txn_to_date ,
109: x_err_stack => x_err_stack,
110: x_err_stage => x_err_stage
111: ) ;
112:
113: pa_debug.debug('*-> About ot purge expenditure adj acts ') ;
114: x_err_stage := 'About to purge audit record for project '||to_char(p_project_id) ;
115: pa_purge_costing.PA_ExpendItemAdjActivities(p_purge_batch_id => p_purge_batch_id,
116: p_project_id => p_project_id,
117: p_txn_to_date => p_txn_to_date ,
122: x_err_stack => x_err_stack,
123: x_err_stage => x_err_stage
124: ) ;
125:
126: pa_debug.debug('*-> About to purge records from the denorm table');
127: x_err_stage := 'About to purge records from denorm table for project '||to_char(p_project_id) ;
128: pa_purge_costing.PA_EiDenorm(p_purge_batch_id => p_purge_batch_id,
129: p_project_id => p_project_id,
130: p_txn_to_date => p_txn_to_date ,
135: x_err_stack => x_err_stack,
136: x_err_stage => x_err_stage
137: ) ;
138:
139: pa_debug.debug('*-> About to purge expenditure items that were transferred to another item');
140: x_err_stage := 'About to purge exp items transferred to another item for project '||to_char(p_project_id) ;
141: /*
142: pa_purge_costing.PA_ExpItemsSrcPurge() ;
143:
141: /*
142: pa_purge_costing.PA_ExpItemsSrcPurge() ;
143:
144: */
145: pa_debug.debug('*-> About to purge expenditure items that were transferred from another item ');
146: x_err_stage := 'About to purge exp items transferred from another item for project '||to_char(p_project_id) ;
147: pa_purge_costing.PA_ExpItemsDestPurge(p_purge_batch_id => p_purge_batch_id,
148: p_project_id => p_project_id,
149: p_txn_to_date => p_txn_to_date ,
155: x_err_stage => x_err_stage
156: ) ;
157:
158:
159: pa_debug.debug('*-> About to purge expenditure items ');
160: x_err_stage := 'About to purge expenditure items of project '||to_char(p_project_id);
161: pa_purge_costing.PA_ExpenditureItems(p_purge_batch_id => p_purge_batch_id,
162: p_project_id => p_project_id,
163: p_txn_to_date => p_txn_to_date ,
168: x_err_stack => x_err_stack,
169: x_err_stage => x_err_stage
170: ) ;
171:
172: pa_debug.debug('*-> About to purge expenditure history records of expenditures ');
173: x_err_stage := 'About to purge expenditure history records of expenditures without any exp items ';
174: pa_purge_costing.PA_ExpenditureHistory(p_purge_batch_id => p_purge_batch_id,
175: p_project_id => p_project_id,
176: p_txn_to_date => p_txn_to_date ,
189: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
190:
191: WHEN OTHERS THEN
192: x_err_stage := l_err_stage ;
193: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTING_MAIN_PURGE' );
194: pa_debug.debug('Error stage is '||x_err_stage );
195: pa_debug.debug('Error stack is '||x_err_stack );
196: pa_debug.debug(SQLERRM);
197: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
190:
191: WHEN OTHERS THEN
192: x_err_stage := l_err_stage ;
193: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTING_MAIN_PURGE' );
194: pa_debug.debug('Error stage is '||x_err_stage );
195: pa_debug.debug('Error stack is '||x_err_stack );
196: pa_debug.debug(SQLERRM);
197: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
198:
191: WHEN OTHERS THEN
192: x_err_stage := l_err_stage ;
193: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTING_MAIN_PURGE' );
194: pa_debug.debug('Error stage is '||x_err_stage );
195: pa_debug.debug('Error stack is '||x_err_stack );
196: pa_debug.debug(SQLERRM);
197: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
198:
199: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
192: x_err_stage := l_err_stage ;
193: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTING_MAIN_PURGE' );
194: pa_debug.debug('Error stage is '||x_err_stage );
195: pa_debug.debug('Error stack is '||x_err_stack );
196: pa_debug.debug(SQLERRM);
197: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
198:
199: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
200:
545: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
546:
547: WHEN OTHERS THEN
548: -- x_err_stage := l_err_stage ;
549: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTDISTLINES' );
550: pa_debug.debug('Error stage is '||x_err_stage );
551: pa_debug.debug('Error stack is '||x_err_stack );
552: pa_debug.debug(SQLERRM);
553: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
546:
547: WHEN OTHERS THEN
548: -- x_err_stage := l_err_stage ;
549: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTDISTLINES' );
550: pa_debug.debug('Error stage is '||x_err_stage );
551: pa_debug.debug('Error stack is '||x_err_stack );
552: pa_debug.debug(SQLERRM);
553: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
554:
547: WHEN OTHERS THEN
548: -- x_err_stage := l_err_stage ;
549: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTDISTLINES' );
550: pa_debug.debug('Error stage is '||x_err_stage );
551: pa_debug.debug('Error stack is '||x_err_stack );
552: pa_debug.debug(SQLERRM);
553: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
554:
555: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
548: -- x_err_stage := l_err_stage ;
549: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTDISTLINES' );
550: pa_debug.debug('Error stage is '||x_err_stage );
551: pa_debug.debug('Error stack is '||x_err_stack );
552: pa_debug.debug(SQLERRM);
553: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
554:
555: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
556:
890: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
891:
892: WHEN OTHERS THEN
893: -- x_err_stage := l_err_stage ;
894: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_CCDISTLINES' );
895: pa_debug.debug('Error stage is '||x_err_stage );
896: pa_debug.debug('Error stack is '||x_err_stack );
897: pa_debug.debug(SQLERRM);
898: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
891:
892: WHEN OTHERS THEN
893: -- x_err_stage := l_err_stage ;
894: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_CCDISTLINES' );
895: pa_debug.debug('Error stage is '||x_err_stage );
896: pa_debug.debug('Error stack is '||x_err_stack );
897: pa_debug.debug(SQLERRM);
898: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
899:
892: WHEN OTHERS THEN
893: -- x_err_stage := l_err_stage ;
894: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_CCDISTLINES' );
895: pa_debug.debug('Error stage is '||x_err_stage );
896: pa_debug.debug('Error stack is '||x_err_stack );
897: pa_debug.debug(SQLERRM);
898: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
899:
900: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
893: -- x_err_stage := l_err_stage ;
894: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_CCDISTLINES' );
895: pa_debug.debug('Error stage is '||x_err_stage );
896: pa_debug.debug('Error stack is '||x_err_stack );
897: pa_debug.debug(SQLERRM);
898: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
899:
900: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
901:
1132: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1133:
1134: WHEN OTHERS THEN
1135: -- x_err_stage := l_err_stage ;
1136: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURECOMMENTS' );
1137: pa_debug.debug('Error stage is '||x_err_stage );
1138: pa_debug.debug('Error stack is '||x_err_stack );
1139: pa_debug.debug(SQLERRM);
1140: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM;
1133:
1134: WHEN OTHERS THEN
1135: -- x_err_stage := l_err_stage ;
1136: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURECOMMENTS' );
1137: pa_debug.debug('Error stage is '||x_err_stage );
1138: pa_debug.debug('Error stack is '||x_err_stack );
1139: pa_debug.debug(SQLERRM);
1140: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM;
1141:
1134: WHEN OTHERS THEN
1135: -- x_err_stage := l_err_stage ;
1136: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURECOMMENTS' );
1137: pa_debug.debug('Error stage is '||x_err_stage );
1138: pa_debug.debug('Error stack is '||x_err_stack );
1139: pa_debug.debug(SQLERRM);
1140: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM;
1141:
1142: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1135: -- x_err_stage := l_err_stage ;
1136: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURECOMMENTS' );
1137: pa_debug.debug('Error stage is '||x_err_stage );
1138: pa_debug.debug('Error stack is '||x_err_stack );
1139: pa_debug.debug(SQLERRM);
1140: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM;
1141:
1142: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1143:
1442: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1443:
1444: WHEN OTHERS THEN
1445: -- x_err_stage := l_err_stage ;
1446: pa_debug.debug('Error Procedure Name := pa_purge_costing.PA_ExpendItemAdjActivities' );
1447: pa_debug.debug('Error stage is '||x_err_stage );
1448: pa_debug.debug('Error stack is '||x_err_stack );
1449: pa_debug.debug(SQLERRM);
1450: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
1443:
1444: WHEN OTHERS THEN
1445: -- x_err_stage := l_err_stage ;
1446: pa_debug.debug('Error Procedure Name := pa_purge_costing.PA_ExpendItemAdjActivities' );
1447: pa_debug.debug('Error stage is '||x_err_stage );
1448: pa_debug.debug('Error stack is '||x_err_stack );
1449: pa_debug.debug(SQLERRM);
1450: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
1451:
1444: WHEN OTHERS THEN
1445: -- x_err_stage := l_err_stage ;
1446: pa_debug.debug('Error Procedure Name := pa_purge_costing.PA_ExpendItemAdjActivities' );
1447: pa_debug.debug('Error stage is '||x_err_stage );
1448: pa_debug.debug('Error stack is '||x_err_stack );
1449: pa_debug.debug(SQLERRM);
1450: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
1451:
1452: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1445: -- x_err_stage := l_err_stage ;
1446: pa_debug.debug('Error Procedure Name := pa_purge_costing.PA_ExpendItemAdjActivities' );
1447: pa_debug.debug('Error stage is '||x_err_stage );
1448: pa_debug.debug('Error stack is '||x_err_stack );
1449: pa_debug.debug(SQLERRM);
1450: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
1451:
1452: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
1453:
2001: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2002:
2003: WHEN OTHERS THEN
2004: -- x_err_stage := l_err_stage ;
2005: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EIDENORM' );
2006: pa_debug.debug('Error stage is '||x_err_stage );
2007: pa_debug.debug('Error stack is '||x_err_stack );
2008: pa_debug.debug(SQLERRM);
2009: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2002:
2003: WHEN OTHERS THEN
2004: -- x_err_stage := l_err_stage ;
2005: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EIDENORM' );
2006: pa_debug.debug('Error stage is '||x_err_stage );
2007: pa_debug.debug('Error stack is '||x_err_stack );
2008: pa_debug.debug(SQLERRM);
2009: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2010:
2003: WHEN OTHERS THEN
2004: -- x_err_stage := l_err_stage ;
2005: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EIDENORM' );
2006: pa_debug.debug('Error stage is '||x_err_stage );
2007: pa_debug.debug('Error stack is '||x_err_stack );
2008: pa_debug.debug(SQLERRM);
2009: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2010:
2011: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2004: -- x_err_stage := l_err_stage ;
2005: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EIDENORM' );
2006: pa_debug.debug('Error stage is '||x_err_stage );
2007: pa_debug.debug('Error stack is '||x_err_stack );
2008: pa_debug.debug(SQLERRM);
2009: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2010:
2011: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2012:
2286: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2287:
2288: WHEN OTHERS THEN
2289: -- x_err_stage := l_err_stage ;
2290: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EXPENDITUREHISTORY' );
2291: pa_debug.debug('Error stage is '||x_err_stage );
2292: pa_debug.debug('Error stack is '||x_err_stack );
2293: pa_debug.debug(SQLERRM);
2294: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2287:
2288: WHEN OTHERS THEN
2289: -- x_err_stage := l_err_stage ;
2290: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EXPENDITUREHISTORY' );
2291: pa_debug.debug('Error stage is '||x_err_stage );
2292: pa_debug.debug('Error stack is '||x_err_stack );
2293: pa_debug.debug(SQLERRM);
2294: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2295:
2288: WHEN OTHERS THEN
2289: -- x_err_stage := l_err_stage ;
2290: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EXPENDITUREHISTORY' );
2291: pa_debug.debug('Error stage is '||x_err_stage );
2292: pa_debug.debug('Error stack is '||x_err_stack );
2293: pa_debug.debug(SQLERRM);
2294: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2295:
2296: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2289: -- x_err_stage := l_err_stage ;
2290: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EXPENDITUREHISTORY' );
2291: pa_debug.debug('Error stage is '||x_err_stage );
2292: pa_debug.debug('Error stack is '||x_err_stack );
2293: pa_debug.debug(SQLERRM);
2294: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2295:
2296: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2297:
2927: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2928:
2929: WHEN OTHERS THEN
2930: -- x_err_stage := l_err_stage ;
2931: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITUREITEMS' );
2932: pa_debug.debug('Error stage is '||x_err_stage );
2933: pa_debug.debug('Error stack is '||x_err_stack );
2934: pa_debug.debug(SQLERRM);
2935: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2928:
2929: WHEN OTHERS THEN
2930: -- x_err_stage := l_err_stage ;
2931: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITUREITEMS' );
2932: pa_debug.debug('Error stage is '||x_err_stage );
2933: pa_debug.debug('Error stack is '||x_err_stack );
2934: pa_debug.debug(SQLERRM);
2935: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2936:
2929: WHEN OTHERS THEN
2930: -- x_err_stage := l_err_stage ;
2931: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITUREITEMS' );
2932: pa_debug.debug('Error stage is '||x_err_stage );
2933: pa_debug.debug('Error stack is '||x_err_stack );
2934: pa_debug.debug(SQLERRM);
2935: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2936:
2937: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2930: -- x_err_stage := l_err_stage ;
2931: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITUREITEMS' );
2932: pa_debug.debug('Error stage is '||x_err_stage );
2933: pa_debug.debug('Error stack is '||x_err_stack );
2934: pa_debug.debug(SQLERRM);
2935: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
2936:
2937: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
2938:
3503: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3504:
3505: WHEN OTHERS THEN
3506: -- x_err_stage := l_err_stage ;
3507: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSSRCPURGE' );
3508: pa_debug.debug('Error stage is '||x_err_stage );
3509: pa_debug.debug('Error stack is '||x_err_stack );
3510: pa_debug.debug(SQLERRM);
3511: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3504:
3505: WHEN OTHERS THEN
3506: -- x_err_stage := l_err_stage ;
3507: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSSRCPURGE' );
3508: pa_debug.debug('Error stage is '||x_err_stage );
3509: pa_debug.debug('Error stack is '||x_err_stack );
3510: pa_debug.debug(SQLERRM);
3511: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3512:
3505: WHEN OTHERS THEN
3506: -- x_err_stage := l_err_stage ;
3507: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSSRCPURGE' );
3508: pa_debug.debug('Error stage is '||x_err_stage );
3509: pa_debug.debug('Error stack is '||x_err_stack );
3510: pa_debug.debug(SQLERRM);
3511: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3512:
3513: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3506: -- x_err_stage := l_err_stage ;
3507: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSSRCPURGE' );
3508: pa_debug.debug('Error stage is '||x_err_stage );
3509: pa_debug.debug('Error stack is '||x_err_stack );
3510: pa_debug.debug(SQLERRM);
3511: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3512:
3513: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3514:
3658: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3659:
3660: WHEN OTHERS THEN
3661: -- x_err_stage := l_err_stage ;
3662: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSDESTPURGE' );
3663: pa_debug.debug('Error stage is '||x_err_stage );
3664: pa_debug.debug('Error stack is '||x_err_stack );
3665: pa_debug.debug(SQLERRM);
3666: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3659:
3660: WHEN OTHERS THEN
3661: -- x_err_stage := l_err_stage ;
3662: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSDESTPURGE' );
3663: pa_debug.debug('Error stage is '||x_err_stage );
3664: pa_debug.debug('Error stack is '||x_err_stack );
3665: pa_debug.debug(SQLERRM);
3666: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3667:
3660: WHEN OTHERS THEN
3661: -- x_err_stage := l_err_stage ;
3662: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSDESTPURGE' );
3663: pa_debug.debug('Error stage is '||x_err_stage );
3664: pa_debug.debug('Error stack is '||x_err_stack );
3665: pa_debug.debug(SQLERRM);
3666: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3667:
3668: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3661: -- x_err_stage := l_err_stage ;
3662: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSDESTPURGE' );
3663: pa_debug.debug('Error stage is '||x_err_stage );
3664: pa_debug.debug('Error stack is '||x_err_stack );
3665: pa_debug.debug(SQLERRM);
3666: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3667:
3668: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3669:
3822: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3823:
3824: WHEN OTHERS THEN
3825: -- x_err_stage := l_err_stage ;
3826: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_ROUTINGS1' );
3827: pa_debug.debug('Error stage is '||x_err_stage );
3828: pa_debug.debug('Error stack is '||x_err_stack );
3829: pa_debug.debug(SQLERRM);
3830: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3823:
3824: WHEN OTHERS THEN
3825: -- x_err_stage := l_err_stage ;
3826: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_ROUTINGS1' );
3827: pa_debug.debug('Error stage is '||x_err_stage );
3828: pa_debug.debug('Error stack is '||x_err_stack );
3829: pa_debug.debug(SQLERRM);
3830: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3831:
3824: WHEN OTHERS THEN
3825: -- x_err_stage := l_err_stage ;
3826: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_ROUTINGS1' );
3827: pa_debug.debug('Error stage is '||x_err_stage );
3828: pa_debug.debug('Error stack is '||x_err_stack );
3829: pa_debug.debug(SQLERRM);
3830: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3831:
3832: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3825: -- x_err_stage := l_err_stage ;
3826: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_ROUTINGS1' );
3827: pa_debug.debug('Error stage is '||x_err_stage );
3828: pa_debug.debug('Error stack is '||x_err_stack );
3829: pa_debug.debug(SQLERRM);
3830: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
3831:
3832: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
3833:
4069: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4070:
4071: WHEN OTHERS THEN
4072: -- x_err_stage := l_err_stage ;
4073: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURES1' );
4074: pa_debug.debug('Error stage is '||x_err_stage );
4075: pa_debug.debug('Error stack is '||x_err_stack );
4076: pa_debug.debug(SQLERRM);
4077: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4070:
4071: WHEN OTHERS THEN
4072: -- x_err_stage := l_err_stage ;
4073: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURES1' );
4074: pa_debug.debug('Error stage is '||x_err_stage );
4075: pa_debug.debug('Error stack is '||x_err_stack );
4076: pa_debug.debug(SQLERRM);
4077: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4078:
4071: WHEN OTHERS THEN
4072: -- x_err_stage := l_err_stage ;
4073: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURES1' );
4074: pa_debug.debug('Error stage is '||x_err_stage );
4075: pa_debug.debug('Error stack is '||x_err_stack );
4076: pa_debug.debug(SQLERRM);
4077: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4078:
4079: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4072: -- x_err_stage := l_err_stage ;
4073: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURES1' );
4074: pa_debug.debug('Error stage is '||x_err_stage );
4075: pa_debug.debug('Error stack is '||x_err_stack );
4076: pa_debug.debug(SQLERRM);
4077: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4078:
4079: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4080:
4220: WHEN PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error then
4221: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4222:
4223: WHEN OTHERS THEN
4224: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCExpenditureItems' );
4225: pa_debug.debug('Error stage is '||x_err_stage );
4226: pa_debug.debug('Error stack is '||x_err_stack );
4227: pa_debug.debug(SQLERRM);
4228: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4221: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4222:
4223: WHEN OTHERS THEN
4224: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCExpenditureItems' );
4225: pa_debug.debug('Error stage is '||x_err_stage );
4226: pa_debug.debug('Error stack is '||x_err_stack );
4227: pa_debug.debug(SQLERRM);
4228: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4229:
4222:
4223: WHEN OTHERS THEN
4224: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCExpenditureItems' );
4225: pa_debug.debug('Error stage is '||x_err_stage );
4226: pa_debug.debug('Error stack is '||x_err_stack );
4227: pa_debug.debug(SQLERRM);
4228: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4229:
4230: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4223: WHEN OTHERS THEN
4224: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCExpenditureItems' );
4225: pa_debug.debug('Error stage is '||x_err_stage );
4226: pa_debug.debug('Error stack is '||x_err_stack );
4227: pa_debug.debug(SQLERRM);
4228: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4229:
4230: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4231:
4340: WHEN PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error then
4341: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4342:
4343: WHEN OTHERS THEN
4344: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCOSTDISTLINES');
4345: pa_debug.debug('Error stage is '|| x_err_stage );
4346: pa_debug.debug('Error stack is '|| x_err_stack );
4347: pa_debug.debug(SQLERRM);
4348: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4341: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4342:
4343: WHEN OTHERS THEN
4344: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCOSTDISTLINES');
4345: pa_debug.debug('Error stage is '|| x_err_stage );
4346: pa_debug.debug('Error stack is '|| x_err_stack );
4347: pa_debug.debug(SQLERRM);
4348: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4349:
4342:
4343: WHEN OTHERS THEN
4344: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCOSTDISTLINES');
4345: pa_debug.debug('Error stage is '|| x_err_stage );
4346: pa_debug.debug('Error stack is '|| x_err_stack );
4347: pa_debug.debug(SQLERRM);
4348: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4349:
4350: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4343: WHEN OTHERS THEN
4344: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCOSTDISTLINES');
4345: pa_debug.debug('Error stage is '|| x_err_stage );
4346: pa_debug.debug('Error stack is '|| x_err_stack );
4347: pa_debug.debug(SQLERRM);
4348: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4349:
4350: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4351:
4456: WHEN PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error then
4457: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4458:
4459: WHEN OTHERS THEN
4460: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCCDISTLINES');
4461: pa_debug.debug('Error stage is '|| x_err_stage );
4462: pa_debug.debug('Error stack is '|| x_err_stack );
4463: pa_debug.debug(SQLERRM);
4464: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4457: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4458:
4459: WHEN OTHERS THEN
4460: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCCDISTLINES');
4461: pa_debug.debug('Error stage is '|| x_err_stage );
4462: pa_debug.debug('Error stack is '|| x_err_stack );
4463: pa_debug.debug(SQLERRM);
4464: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4465:
4458:
4459: WHEN OTHERS THEN
4460: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCCDISTLINES');
4461: pa_debug.debug('Error stage is '|| x_err_stage );
4462: pa_debug.debug('Error stack is '|| x_err_stack );
4463: pa_debug.debug(SQLERRM);
4464: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4465:
4466: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4459: WHEN OTHERS THEN
4460: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCCDISTLINES');
4461: pa_debug.debug('Error stage is '|| x_err_stage );
4462: pa_debug.debug('Error stack is '|| x_err_stack );
4463: pa_debug.debug(SQLERRM);
4464: PA_PROJECT_UTILS2.g_sqlerrm := SQLERRM ;
4465:
4466: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4467: