[Home] [Help]
132: PLSQL as product is BETA. Procedure
133: seed_life_events =>
134: becomes seed_benefit_data.
135: Added call to seed person types.
136: 110.6 16-JUN-98 GPerry Didn't dual maintain first time.
137: 110.7 28-OCT-98 STee Added call to seed action types
138: and communication types.
139: 115.3 10-DEC-98 VTreiger MLS modications for New Business Group.
140: 115.4 11-DEC-98 MStewart Added code in insert_bus_grp_details
230: --
231: hr_utility.set_location('hr_organization.ins_si_type', 1);
232: select per_special_info_types_s.nextval
233: into l_special_info_type_id
234: from dual;
235: --
236: insert into per_special_info_types
237: (special_information_type_id,
238: business_group_id,
535: begin
536: hr_utility.set_location('hr_organization.insert_bus_grp_details',5);
537: SELECT 'Y'
538: INTO l_install_mode
539: FROM sys.dual
540: WHERE NOT EXISTS (SELECT null
541: FROM fnd_product_installations
542: WHERE application_id = 800
543: AND status IN ('I','S'));
599: ,last_update_login
600: ,created_by
601: ,creation_date
602: ,org_security_mode
603: ,restrict_on_individual_asg
604: ,top_organization_method
605: ,top_position_method)
606: SELECT decode(p_organization_id,0,0,per_security_profiles_s.nextval)
607: ,p_organization_id
792: ,p_last_updated_by
793: ,p_last_update_login
794: ,p_created_by
795: ,p_creation_date
796: FROM sys.dual;
797: END IF;
798: --
799: --fix for bug 6792619.
800: l_row_count := SQL%ROWCOUNT;
978: --
979: hr_utility.set_location('hr_organization.unique_name',1);
980: SELECT 'Y'
981: INTO org_check
982: FROM sys.dual
983: WHERE exists
984: (
985: SELECT 'Name Already Exists'
986: FROM hr_organization_units org
1053: -- Do Any rows Exist in PER_PEOPLE_F.
1054: hr_utility.set_location('hr_organization.org_predel_check',1);
1055: select '1'
1056: into l_test_func
1057: from sys.dual
1058: where exists ( select 1
1059: from PER_PEOPLE_F x
1060: where x.business_group_id = p_business_group_id);
1061: --
1072: -- Do Any rows Exist in HR_ORGANIZATION_UNITS.
1073: hr_utility.set_location('hr_organization.org_predel_check',2);
1074: select '1'
1075: into l_test_func
1076: from sys.dual
1077: where exists ( select 1
1078: from HR_ORGANIZATION_UNITS x
1079: where x.business_group_id = p_business_group_id
1080: and x.organization_id <> p_business_group_id);
1093: -- Do Any rows Exist in PER_ORG_STRUCTURE_ELEMENTS.
1094: hr_utility.set_location('hr_organization.org_predel_check',3);
1095: select '1'
1096: into l_test_func
1097: from sys.dual
1098: where exists ( select 1
1099: from PER_ORG_STRUCTURE_ELEMENTS x
1100: where x.business_group_id = p_business_group_id);
1101: --
1116: -- Do Any rows Exist in PER_ORG_STRUCTURE_ELEMENTS.
1117: hr_utility.set_location('hr_organization.org_predel_check',4);
1118: select '1'
1119: into l_test_func
1120: from sys.dual
1121: where exists ( select 1
1122: from PER_ORG_STRUCTURE_ELEMENTS x
1123: where x.organization_id_child = p_organization_id);
1124: --
1135: -- Do Any rows Exist in PER_ORG_STRUCTURE_ELEMENTS.
1136: hr_utility.set_location('hr_organization.org_predel_check',5);
1137: select '1'
1138: into l_test_func
1139: from sys.dual
1140: where exists ( select 1
1141: from PER_ORG_STRUCTURE_ELEMENTS x
1142: where x.organization_id_parent = p_organization_id);
1143: --
1154: -- Do any rows exist in BEN_BENEFICIARIES_F
1155: hr_utility.set_location('hr_organization.org_predel_check', 6);
1156: select '1'
1157: into l_test_func
1158: from sys.dual
1159: where exists (select 1
1160: from BEN_BENEFICIARIES_F x
1161: where x.source_id = p_organization_id
1162: and x.source_type = 'O');
1194: -- Doing check on PER_ASSIGNMENTS_F.
1195: hr_utility.set_location('hr_organization.hr_weak_bg_chk',1);
1196: select '1'
1197: into l_test_func
1198: from sys.dual
1199: where exists ( select 1
1200: from PER_ASSIGNMENTS_F x
1201: where x.SOURCE_ORGANIZATION_ID = p_organization_id);
1202: --
1213: -- Doing check on PER_ASSIGNMENTS_F.
1214: hr_utility.set_location('hr_organization.hr_weak_bg_chk',2);
1215: select '1'
1216: into l_test_func
1217: from sys.dual
1218: where exists ( select 1
1219: from PER_ASSIGNMENTS_F x
1220: where x.ORGANIZATION_ID = p_organization_id);
1221: --
1232: -- Doing check on PER_ORG_STRUCTURE_ELEMENTS.
1233: hr_utility.set_location('hr_organization.hr_weak_bg_chk',3);
1234: select '1'
1235: into l_test_func
1236: from sys.dual
1237: where exists ( select 1
1238: from PER_ORG_STRUCTURE_ELEMENTS x
1239: where x.ORGANIZATION_ID_PARENT = p_organization_id);
1240: --
1251: -- Doing check on PER_ORG_STRUCTURE_ELEMENTS.
1252: hr_utility.set_location('hr_organization.hr_weak_bg_chk',4);
1253: select '1'
1254: into l_test_func
1255: from sys.dual
1256: where exists ( select 1
1257: from PER_ORG_STRUCTURE_ELEMENTS x
1258: where x.ORGANIZATION_ID_CHILD = p_organization_id);
1259: --
1271: -- Doing check on PER_SECURITY_PROFILES.
1272: hr_utility.set_location('hr_organization.hr_weak_bg_chk',5);
1273: select '1'
1274: into l_test_func
1275: from sys.dual
1276: where exists ( select 1
1277: from PER_SECURITY_PROFILES x
1278: where x.ORGANIZATION_ID = p_organization_id);
1279: --