[Home] [Help]
119: x_err_stack =>x_err_stack,
120: x_err_stage =>x_err_stage,
121: x_err_code =>x_err_code);
122:
123: /* Call schedules API to archive/purge data from pa_schedules, pa_schedule_history and pa_schedule_except_history */
124:
125: pa_debug.debug(' About to purge schedules, schedule history and schedule exceptions data ') ;
126: x_err_stage := 'About to purge schedules data for project '||to_char(p_project_id) ;
127:
245: x_err_stack =>x_err_stack,
246: x_err_stage =>x_err_stage,
247: x_err_code =>x_err_code);
248:
249: /* Call schedules API to archive/purge data from pa_schedules, pa_schedule_history and pa_schedule_except_history */
250:
251: pa_debug.debug(' About to purge schedules, schedule history and schedule exceptions data ') ;
252: x_err_stage := 'About to purge sschedules data for project '||to_char(p_project_id) ;
253:
440: x_err_stack =>x_err_stack,
441: x_err_stage =>x_err_stage,
442: x_err_code =>x_err_code);
443:
444: /* Call schedules API to archive/purge data from pa_schedules, pa_schedule_history and pa_schedule_except_history */
445:
446: pa_debug.debug(' About to purge schedules, schedule history and schedule exceptions data ') ;
447: x_err_stage := 'About to purge sschedules data for project '||to_char(p_project_id) ;
448:
569: x_err_stack =>x_err_stack,
570: x_err_stage =>x_err_stage,
571: x_err_code =>x_err_code);
572:
573: /* Call schedules API to archive/purge data from pa_schedules, pa_schedule_history and pa_schedule_except_history */
574:
575: pa_debug.debug(' About to purge schedules, schedule history and schedule exceptions data ') ;
576: x_err_stage := 'About to purge sschedules data for project '||to_char(p_project_id) ;
577:
1268: -- API name : PA_SCHEDULES_PURGE
1269: -- Type : Public
1270: -- Pre-reqs : None
1271: -- Function : Purge procedure for Purging records from tables PA_Schedules, pa_schedules_history and
1272: -- pa_schedule_except_history tables.
1273:
1274: Procedure PA_SCHEDULES_PURGE ( p_purge_batch_id in NUMBER,
1275: p_project_id in NUMBER,
1276: p_purge_release in VARCHAR2,
1280: x_err_stage in OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1281: x_err_code in OUT NOCOPY NUMBER ) IS --File.Sql.39 bug 4440895
1282:
1283: l_schedule_id pa_schedules.schedule_id%TYPE;
1284: l_schedule_exception_id pa_schedule_except_history.schedule_exception_id%TYPE;
1285: I PLS_INTEGER;
1286: l_assignment_id pa_forecast_items.assignment_id%TYPE;
1287: l_nos_schedule_inserted NUMBER ;
1288: l_nos_schedule_his_inserted NUMBER ;
1296: SELECT schedule_id from pa_schedules
1297: WHERE assignment_id =x_assignment_id;
1298:
1299: Cursor Cur_Schedule_except (a_assignment_id In NUMBER) IS
1300: SELECT schedule_exception_id from pa_schedule_except_history
1301: WHERE assignment_id =a_assignment_id;
1302:
1303: l_old_err_stack VARCHAR2(2000); -- Added for bug 4227589
1304:
1409: The value will increase for each loop*/
1410:
1411: l_nos_schedule_inserted := l_nos_schedule_inserted + SQL%ROWCOUNT;
1412:
1413: pa_debug.debug('Inserting Records into pa_schedule_except_history_AR table ') ;
1414: x_err_stage := 'Inserting Records into pa_schedules_except_history_AR table for schedule id '||to_char(l_schedule_id) ;
1415:
1416: INSERT INTO PA_SCHEDULES_HSTRY_AR
1417: (PURGE_BATCH_ID,
1590: Duration_Shift_Unit_Code,
1591: Number_Of_Shift,
1592: Change_Calendar_Type_Code,
1593: Change_Calendar_Id
1594: FROM pa_schedule_except_history WHERE schedule_exception_id=l_schedule_exception_id;
1595:
1596: /*Increase the value of l_nos_schedule_his_inserted to indicate number of records inserted inschedule_except_history_ar
1597: table. The value will increase for each loop*/
1598:
1605:
1606: pa_debug.debug('Deleting Records from pa_scheduleexcept_history table ') ;
1607: x_err_stage := 'Deleting Records from pa_schedules_except_history table for id '||to_char(l_schedule_exception_id) ;
1608:
1609: DELETE PA_SCHEDULE_EXCEPT_HISTORY
1610: WHERE schedule_exception_id =l_schedule_exception_id;
1611:
1612: l_nos_schedule_exp_deleted := l_nos_schedule_exp_deleted + SQL%ROWCOUNT;
1613: END LOOP;
1616: END LOOP;
1617:
1618: /*After "deleting" or "deleting and inserting" a set of records the transaction is commited. This also creates a record in
1619: the Pa_Purge_Project_details, which will show the no. of records that are purged from each table.
1620: The procedure is called pa_schedules, pa_schedule_except_history and pa_schedules_history tables */
1621:
1622: pa_purge.CommitProcess(p_purge_batch_id,
1623: p_project_id,
1624: 'PA_SCHEDULES',
1640: ) ;
1641:
1642: pa_purge.CommitProcess(p_purge_batch_id,
1643: p_project_id,
1644: 'PA_SCHEDULE_EXCEPT_HISTORY',
1645: l_nos_schedule_exp_inserted,
1646: l_nos_schedule_exp_deleted,
1647: x_err_code,
1648: x_err_stack,
1937: END LOOP;
1938:
1939: /*After "deleting" or "deleting and inserting" a set of records the transaction is commited. This also creates a record in
1940: the Pa_Purge_Project_details, which will show the no. of records that are purged from each table.
1941: The procedure is called pa_schedules, pa_schedule_except_history and pa_schedules_history tables */
1942:
1943: pa_purge.CommitProcess(p_purge_batch_id,
1944: p_project_id,
1945: 'PA_CANDIDATES',
2108: END LOOP;
2109:
2110: /*After "deleting" or "deleting and inserting" a set of records the transaction is commited. This also creates a record in
2111: the Pa_Purge_Project_details, which will show the no. of records that are purged from each table.
2112: The procedure is called pa_schedules, pa_schedule_except_history and pa_schedules_history tables */
2113:
2114: pa_purge.CommitProcess(p_purge_batch_id,
2115: p_project_id,
2116: 'PA_ASSIGNMENT_CONFLICT_HIST',