DBA Data[Home] [Help]

APPS.PA_PURGE_COSTING dependencies on PA_PURGE

Line 1: package body pa_purge_costing as

1: package body pa_purge_costing as
2: /* $Header: PAXCSPRB.pls 120.5 2010/11/23 06:45:10 jjgeorge ship $ */
3:
4: -- forward declarations
5:

Line 76: pa_purge_costing.PA_CostDistLines(p_purge_batch_id => p_purge_batch_id,

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 ,
79: p_purge_release => p_purge_release,
80: p_archive_flag => p_archive_flag,

Line 89: pa_purge_costing.PA_CcDistLines(p_purge_batch_id => p_purge_batch_id,

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 ,
92: p_purge_release => p_purge_release,
93: p_archive_flag => p_archive_flag,

Line 102: pa_purge_costing.PA_ExpenditureComments(p_purge_batch_id => p_purge_batch_id,

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 ,
105: p_purge_release => p_purge_release,
106: p_archive_flag => p_archive_flag,

Line 115: pa_purge_costing.PA_ExpendItemAdjActivities(p_purge_batch_id => p_purge_batch_id,

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 ,
118: p_purge_release => p_purge_release,
119: p_archive_flag => p_archive_flag,

Line 128: pa_purge_costing.PA_EiDenorm(p_purge_batch_id => p_purge_batch_id,

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 ,
131: p_purge_release => p_purge_release,
132: p_archive_flag => p_archive_flag,

Line 142: pa_purge_costing.PA_ExpItemsSrcPurge() ;

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:
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) ;

Line 147: pa_purge_costing.PA_ExpItemsDestPurge(p_purge_batch_id => p_purge_batch_id,

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 ,
150: p_purge_release => p_purge_release,
151: p_archive_flag => p_archive_flag,

Line 161: pa_purge_costing.PA_ExpenditureItems(p_purge_batch_id => p_purge_batch_id,

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 ,
164: p_purge_release => p_purge_release,
165: p_archive_flag => p_archive_flag,

Line 174: pa_purge_costing.PA_ExpenditureHistory(p_purge_batch_id => p_purge_batch_id,

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 ,
177: p_purge_release => p_purge_release,
178: p_archive_flag => p_archive_flag,

Line 193: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTING_MAIN_PURGE' );

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 ;

Line 485: pa_purge_costing.PA_MRCCostDistLines(

481: -- being purged will be those records which are already archived.
482: -- table and
483:
484: IF (l_mrc_flag = 'Y') THEN
485: pa_purge_costing.PA_MRCCostDistLines(
486: p_purge_batch_id,
487: p_project_id,
488: p_txn_to_date,
489: p_purge_release,

Line 516: -- Pa_Purge_Project_details which will show the no. of records

512:
513: IF l_NoOfRecordsDel > 0 THEN
514: -- After "deleting" or "deleting and inserting" a set of records
515: -- the transaction is commited. This also creates a record in the
516: -- Pa_Purge_Project_details which will show the no. of records
517: -- that are purged from each table.
518:
519: x_err_stage := 'PA_CostDistLines: Commiting the transaction' ;
520: pa_purge.CommitProcess(p_purge_batch_id,

Line 520: pa_purge.CommitProcess(p_purge_batch_id,

516: -- Pa_Purge_Project_details which will show the no. of records
517: -- that are purged from each table.
518:
519: x_err_stage := 'PA_CostDistLines: Commiting the transaction' ;
520: pa_purge.CommitProcess(p_purge_batch_id,
521: p_project_id,
522: 'PA_COST_DISTRIBUTION_LINES',
523: l_NoOfRecordsIns,
524: l_NoOfRecordsDel,

Line 549: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_COSTDISTLINES' );

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 ;

Line 794: pa_purge_costing.PA_MRCCcDistLines(

790: -- being purged will be those records which are already archived.
791: -- table and
792:
793: IF (l_mrc_flag = 'Y') THEN
794: pa_purge_costing.PA_MRCCcDistLines(
795: p_purge_batch_id,
796: p_project_id,
797: p_txn_to_date,
798: p_purge_release,

Line 859: -- Pa_Purge_Project_details which will show the no. of records

855:
856: else */
857: -- After "deleting" or "deleting and inserting" a set of records
858: -- the transaction is commited. This also creates a record in the
859: -- Pa_Purge_Project_details which will show the no. of records
860: -- that are purged from each table.
861:
862: x_err_stage := 'PA_CostDistLines: Commiting the transaction' ;
863: If l_NoOfRecordsDel > 0 Then

Line 864: pa_purge.CommitProcess(p_purge_batch_id,

860: -- that are purged from each table.
861:
862: x_err_stage := 'PA_CostDistLines: Commiting the transaction' ;
863: If l_NoOfRecordsDel > 0 Then
864: pa_purge.CommitProcess(p_purge_batch_id,
865: p_project_id,
866: 'PA_CC_DIST_LINES',
867: l_NoOfRecordsIns,
868: l_NoOfRecordsDel,

Line 894: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_CCDISTLINES' );

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 ;

Line 1106: -- Pa_Purge_Project_details which will show the no. of records

1102:
1103: else */
1104: -- After "deleting" or "deleting and inserting" a set of records
1105: -- the transaction is commited. This also creates a record in the
1106: -- Pa_Purge_Project_details which will show the no. of records
1107: -- that are purged from each table.
1108:
1109: x_err_stage := 'PA_ExpenditureComments: Commiting the transaction' ;
1110: if l_NoOfRecordsDel > 0 Then

Line 1111: pa_purge.CommitProcess(p_purge_batch_id,

1107: -- that are purged from each table.
1108:
1109: x_err_stage := 'PA_ExpenditureComments: Commiting the transaction' ;
1110: if l_NoOfRecordsDel > 0 Then
1111: pa_purge.CommitProcess(p_purge_batch_id,
1112: p_project_id,
1113: 'PA_EXPENDITURE_COMMENTS',
1114: l_NoOfRecordsIns,
1115: l_NoOfRecordsDel,

Line 1136: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURECOMMENTS' );

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;

Line 1416: -- Pa_Purge_Project_details which will show the no. of records

1412:
1413: else */
1414: -- After "deleting" or "deleting and inserting" a set of records
1415: -- the transaction is commited. This also creates a record in the
1416: -- Pa_Purge_Project_details which will show the no. of records
1417: -- that are purged from each table.
1418:
1419: x_err_stage := 'PA_ExpendItemAdjActivities: Commiting the transaction' ;
1420: If l_NoOfRecordsDel > 0 Then

Line 1421: Pa_Purge.CommitProcess(p_purge_batch_id,

1417: -- that are purged from each table.
1418:
1419: x_err_stage := 'PA_ExpendItemAdjActivities: Commiting the transaction' ;
1420: If l_NoOfRecordsDel > 0 Then
1421: Pa_Purge.CommitProcess(p_purge_batch_id,
1422: p_project_id,
1423: 'PA_EXPEND_ITEM_ADJ_ACTIVITIES',
1424: l_NoOfRecordsIns,
1425: l_NoOfRecordsDel,

Line 1446: pa_debug.debug('Error Procedure Name := pa_purge_costing.PA_ExpendItemAdjActivities' );

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 ;

Line 1491: -- pa_purge_costing.pa_costing_main_purge. It purges the data from

1487: begin
1488:
1489: --
1490: -- This procedure is called by the main costing purge procedure
1491: -- pa_purge_costing.pa_costing_main_purge. It purges the data from
1492: -- Pa_Ei_Denorm. This is a new table created for Online Time and
1493: -- Expense(OTE) entry. Once OTE patch is installed user should
1494: -- uncomment these code to allow the purging of data from Pa_Ei_Denorm
1495: -- which is also a transaction table.

Line 1980: -- Pa_Purge_Project_details which will show the no. of records

1976:
1977: else
1978: -- After "deleting" or "deleting and inserting" a set of records
1979: -- the transaction is commited. This also creates a record in the
1980: -- Pa_Purge_Project_details which will show the no. of records
1981: -- that are purged from each table.
1982:
1983: pa_purge.CommitProcess(p_purge_batch_id,
1984: p_project_id,

Line 1983: pa_purge.CommitProcess(p_purge_batch_id,

1979: -- the transaction is commited. This also creates a record in the
1980: -- Pa_Purge_Project_details which will show the no. of records
1981: -- that are purged from each table.
1982:
1983: pa_purge.CommitProcess(p_purge_batch_id,
1984: p_project_id,
1985: 'PA_EI_DENORM',
1986: l_NoOfRecordsIns,
1987: l_NoOfRecordsDel,

Line 2005: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EIDENORM' );

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 ;

Line 2266: -- Pa_Purge_Project_details which will show the no. of records

2262:
2263: else
2264: -- After "deleting" or "deleting and inserting" a set of records
2265: -- the transaction is commited. This also creates a record in the
2266: -- Pa_Purge_Project_details which will show the no. of records
2267: -- that are purged from each table.
2268:
2269: pa_purge.CommitProcess(p_purge_batch_id,
2270: p_project_id,

Line 2269: pa_purge.CommitProcess(p_purge_batch_id,

2265: -- the transaction is commited. This also creates a record in the
2266: -- Pa_Purge_Project_details which will show the no. of records
2267: -- that are purged from each table.
2268:
2269: pa_purge.CommitProcess(p_purge_batch_id,
2270: p_project_id,
2271: 'PA_EXPENDITURE_HISTORY',
2272: l_NoOfRecordsIns,
2273: l_NoOfRecordsDel,

Line 2290: pa_debug.debug('Error Procedure Name := PA_PURGE_EXTN.PA_EXPENDITUREHISTORY' );

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 ;

Line 2817: pa_purge_costing.PA_MRCExpenditureItems(

2813:
2814: if l_NoOfRecordsIns > 0 then
2815:
2816: IF (l_mrc_flag = 'Y') THEN
2817: pa_purge_costing.PA_MRCExpenditureItems(
2818: p_purge_batch_id,
2819: p_project_id,
2820: p_txn_to_date,
2821: p_purge_release,

Line 2862: from pa_purge_projects pp

2858: from pa_expenditure_items_all ei
2859: where ei.transferred_from_exp_item_id = l_exp_item_id_tab(exp_ind)
2860: and ei.transferred_from_exp_item_id is not null
2861: and not exists ( select pp.project_id
2862: from pa_purge_projects pp
2863: where pp.project_id = ei.project_id
2864: and pp.purge_batch_id = p_purge_batch_id ) ;
2865:
2866: FORALL exp_ind IN l_exp_item_id_tab.FIRST .. l_exp_item_id_tab.LAST

Line 2872: from pa_purge_projects pp

2868: set ei.transferred_from_exp_item_id = NULL
2869: where ei.transferred_from_exp_item_id = l_exp_item_id_tab(exp_ind)
2870: and ei.transferred_from_exp_item_id is not null
2871: and not exists ( select pp.project_id
2872: from pa_purge_projects pp
2873: where pp.project_id = ei.project_id
2874: and pp.purge_batch_id = p_purge_batch_id ) ;
2875:
2876: /* Each time thru the loop need to make sure that reset the

Line 2900: pa_purge.CommitProcess(p_purge_batch_id,

2896:
2897:
2898: IF l_NoOfRecordsDel > 0 THEN
2899: x_err_stage := 'PA_ExpenditureItems: Commiting the transaction' ;
2900: pa_purge.CommitProcess(p_purge_batch_id,
2901: p_project_id,
2902: 'PA_EXPENDITURE_ITEMS',
2903: l_NoOfRecordsIns,
2904: l_NoOfRecordsDel,

Line 2931: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITUREITEMS' );

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 ;

Line 3021: from pa_purge_projects pp

3017: and ei1.project_id = p_project_id )
3018: and ei.transferred_from_exp_item_id is not null
3019: and rownum < l_commit_size
3020: and not exists ( select pp.project_id
3021: from pa_purge_projects pp
3022: where pp.project_id = ei.project_id
3023: and pp.purge_batch_id = p_purge_batch_id ) ;
3024: else
3025: insert into Pa_Expend_item_Adj_Activities

Line 3057: from pa_purge_projects pp

3053: and ei.task_id = t.task_id
3054: and ei.transferred_from_exp_item_id is not null
3055: and rownum < l_commit_size
3056: and not exists ( select pp.project_id
3057: from pa_purge_projects pp
3058: where pp.project_id = t.project_id
3059: and pp.purge_batch_id = p_purge_batch_id ) ;
3060: end if;
3061:

Line 3490: -- Pa_Purge_Project_details which will show the no. of records

3486:
3487:
3488: -- After "deleting" or "deleting and inserting" a set of records
3489: -- the transaction is commited. This also creates a record in the
3490: -- Pa_Purge_Project_details which will show the no. of records
3491: -- that are purged from each table.
3492:
3493: x_err_stage := 'PA_ExpenditureComments: Commiting the transaction' ;
3494:

Line 3507: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSSRCPURGE' );

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 ;

Line 3638: from pa_purge_projects pp

3634: and ei1.transferred_from_exp_item_id is not null
3635: and ei1.project_id = p_project_id )
3636: and rownum < l_commit_size */
3637: and not exists ( select pp.project_id
3638: from pa_purge_projects pp
3639: where pp.project_id = ei.project_id
3640: and pp.purge_batch_id = p_purge_batch_id );
3641: /* else */
3642: /* end if; */

Line 3662: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPITEMSDESTPURGE' );

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 ;

Line 3801: -- Pa_Purge_Project_details which will show the no. of records

3797:
3798: else
3799: -- After "deleting" or "deleting and inserting" a set of records
3800: -- the transaction is commited. This also creates a record in the
3801: -- Pa_Purge_Project_details which will show the no. of records
3802: -- that are purged from each table.
3803:
3804: x_err_stage := 'PA_Routings1: Commiting the transaction' ;
3805: pa_purge.CommitProcess(p_purge_batch_id,

Line 3805: pa_purge.CommitProcess(p_purge_batch_id,

3801: -- Pa_Purge_Project_details which will show the no. of records
3802: -- that are purged from each table.
3803:
3804: x_err_stage := 'PA_Routings1: Commiting the transaction' ;
3805: pa_purge.CommitProcess(p_purge_batch_id,
3806: p_project_id,
3807: 'PA_ROUTINGS',
3808: l_NoOfRecordsIns,
3809: l_NoOfRecordsDel,

Line 3826: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_ROUTINGS1' );

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 ;

Line 4047: -- Pa_Purge_Project_details which will show the no. of records

4043:
4044: else
4045: -- After "deleting" or "deleting and inserting" a set of records
4046: -- the transaction is commited. This also creates a record in the
4047: -- Pa_Purge_Project_details which will show the no. of records
4048: -- that are purged from each table.
4049:
4050: x_err_stage := 'PA_Expenditures1: Commiting the transaction' ;
4051: pa_purge.CommitProcess(p_purge_batch_id,

Line 4051: pa_purge.CommitProcess(p_purge_batch_id,

4047: -- Pa_Purge_Project_details which will show the no. of records
4048: -- that are purged from each table.
4049:
4050: x_err_stage := 'PA_Expenditures1: Commiting the transaction' ;
4051: pa_purge.CommitProcess(p_purge_batch_id,
4052: p_project_id,
4053: 'PA_EXPENDITURES_ALL',
4054: l_NoOfRecordsIns,
4055: l_NoOfRecordsDel,

Line 4073: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_EXPENDITURES1' );

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 ;

Line 4224: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCExpenditureItems' );

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 ;

Line 4344: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCOSTDISTLINES');

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 ;

Line 4460: pa_debug.debug('Error Procedure Name := PA_PURGE_COSTING.PA_MRCCCDISTLINES');

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 ;

Line 4470: END pa_purge_costing;

4466: RAISE PA_PROJECT_UTILS2.PA_Arch_Pur_Subroutine_Error ;
4467:
4468: END PA_MRCCcDistLines ;
4469:
4470: END pa_purge_costing;