[Home] [Help]
709:
710:
711: BEGIN
712:
713: Ams_Utility_Pvt.Write_Conc_Log('The program bulk_all_delete_group started... ');
714:
715: OPEN csr_delete_groups ;
716:
717: FETCH csr_delete_groups BULK COLLECT INTO l_tbl_user_role,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
717: FETCH csr_delete_groups BULK COLLECT INTO l_tbl_user_role,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
718:
719: CLOSE csr_delete_groups ;
720:
721: Ams_Utility_Pvt.Write_Conc_Log('Data is bulk collected ');
722:
723:
724: -- Bulk delete
725: FORALL i IN 1..l_tbl_object_id.COUNT
754: AND act_access_to_object_id = l_tbl_object_id(i)
755: AND arc_user_or_role_type = 'USER'
756: AND user_or_role_id = aacd.resource_id ) ;
757:
758: Ams_Utility_Pvt.Write_Conc_Log('Bulk delete operation done ');
759: -- Bulk Update for admin flag
760: FORALL i IN 1..l_tbl_object_id.COUNT
761: UPDATE ams_act_access_denorm aacd
762: SET edit_metrics_yn = 'N'
792: AND edit_metrics_yn = 'Y'
793: AND edit_metrics_yn = NVL(l_tbl_admin_flag(i),'N');
794:
795:
796: Ams_Utility_Pvt.Write_Conc_Log('The procedure completed ');
797:
798: END bulk_all_delete_group ;
799:
800:
831: and delete_flag = 'N' ;
832:
833:
834: BEGIN
835: Ams_Utility_Pvt.Write_Conc_Log('Procedure bulk_all_refresh_group started ');
836: OPEN csr_delete_groups ;
837:
838: FETCH csr_delete_groups BULK COLLECT INTO l_tbl_user_role,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
839:
838: FETCH csr_delete_groups BULK COLLECT INTO l_tbl_user_role,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
839:
840: CLOSE csr_delete_groups ;
841:
842: Ams_Utility_Pvt.Write_Conc_Log('bulk_all_refresh_group - cursor closed ');
843:
844: -- Bulk update for admin flag
845: FORALL i IN 1..l_tbl_object_id.COUNT
846: UPDATE ams_act_access_denorm aacd
861: AND NVL(jgd.end_date_active,TRUNC(SYSDATE)) >= TRUNC(SYSDATE)
862: AND jgm.delete_flag = 'N'
863: );
864:
865: Ams_Utility_Pvt.Write_Conc_Log('bulk_all_refresh_group - first forall ');
866: -- Bulk insert
867: FORALL i IN 1..l_tbl_object_id.COUNT
868: INSERT INTO ams_act_access_denorm
869: ( access_denorm_id
904: AND object_type = l_tbl_object(i)
905: AND object_id = l_tbl_object_id(i))
906: );
907:
908: Ams_Utility_Pvt.Write_Conc_Log('bulk_all_refresh_group - second forall ');
909: -- Bulk access update for admin flag as true
910: FORALL i IN 1..l_tbl_object_id.COUNT
911: UPDATE ams_act_access_denorm aacd
912: SET edit_metrics_yn = 'Y'
932: AND jgm.delete_flag='N'
933: AND jgm.resource_id = aacd.resource_id
934: AND aac.delete_flag = 'N' );
935:
936: Ams_Utility_Pvt.Write_Conc_Log('bulk_all_refresh_group - third forall ');
937: -- Bulk access update for admin flag as false
938: FORALL i IN 1..l_tbl_object_id.COUNT
939: UPDATE ams_act_access_denorm aacd
940: SET edit_metrics_yn = l_tbl_admin_flag(i)
984: AND aac.arc_user_or_role_type = 'USER'
985: AND aac.delete_flag = 'N'
986: AND aac.admin_flag = 'Y'
987: );
988: Ams_Utility_Pvt.Write_Conc_Log('bulk_all_refresh_group - end of forall ');
989: END bulk_all_refresh_group ;
990:
991:
992: -------------------------------------------------------------------------
1022: and creation_date > p_last_run_date
1023: and delete_flag = 'N' ;
1024:
1025: BEGIN
1026: Ams_Utility_Pvt.Write_Conc_Log('bulk_insert_group - start ');
1027:
1028: OPEN crs_insert_grp ;
1029:
1030: FETCH crs_insert_grp BULK COLLECT INTO l_tbl_user_role,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
1151:
1152:
1153:
1154: BEGIN
1155: Ams_Utility_Pvt.Write_Conc_Log('bulk_delete_group - start ');
1156:
1157: if(p_reason_code = 'AMS_ACCESS') then
1158:
1159: OPEN csr_del_grp ;
1281: AND last_update_date > p_last_run_date
1282: and delete_flag = 'N' ;
1283:
1284: BEGIN
1285: Ams_Utility_Pvt.Write_Conc_Log('bulk_update_group - start ');
1286:
1287:
1288: OPEN csr_upd_grp ;
1289:
1445: );
1446:
1447:
1448: BEGIN
1449: Ams_Utility_Pvt.Write_Conc_Log('bulk_insert_resource - start ');
1450:
1451: OPEN cur_get_crt_res ;
1452:
1453: FETCH cur_get_crt_res BULK COLLECT INTO l_tbl_res,l_tbl_object_id,l_tbl_object,l_tbl_admin_flag ;
1576: );
1577:
1578:
1579: BEGIN
1580: Ams_Utility_Pvt.Write_Conc_Log('bulk_delete_group - start ');
1581:
1582:
1583: OPEN cur_get_del_res ;
1584:
1863: CLOSE cur_get_latest_start_date ;
1864:
1865: IF (l_last_run_date IS NULL) OR p_full_mode IN (Fnd_Api.G_TRUE, 'Y') THEN
1866:
1867: Ams_Utility_Pvt.Write_Conc_Log('** Start the bulk operations ');
1868:
1869: bulk_all_delete_group ;
1870:
1871: bulk_all_refresh_group ;
1869: bulk_all_delete_group ;
1870:
1871: bulk_all_refresh_group ;
1872:
1873: Ams_Utility_Pvt.Write_Conc_Log('** End the bulk operations ');
1874:
1875: ELSE
1876: --l_last_run_date := SYSDATE - 1000000;
1877: Ams_Utility_Pvt.Write_Conc_Log('** Start the bulk operations : prev date ');
1873: Ams_Utility_Pvt.Write_Conc_Log('** End the bulk operations ');
1874:
1875: ELSE
1876: --l_last_run_date := SYSDATE - 1000000;
1877: Ams_Utility_Pvt.Write_Conc_Log('** Start the bulk operations : prev date ');
1878:
1879: bulk_insert_group (l_last_run_date) ;
1880:
1881: bulk_delete_group (l_last_run_date, 'AMS_ACCESS') ;
1880:
1881: bulk_delete_group (l_last_run_date, 'AMS_ACCESS') ;
1882:
1883: bulk_update_group (l_last_run_date) ;
1884: Ams_Utility_Pvt.Write_Conc_Log('** End the bulk operations : prev date');
1885:
1886: END IF; -- IF p_full_mode IN (Fnd_Api.G_TRUE, 'Y') THEN
1887:
1888: -- delete all the deleted group associations.