95: ) IS
96: CURSOR C IS SELECT rowid FROM per_person_types
97: WHERE person_type_id = X_Person_Type_Id;
98:
99: CURSOR C2 IS SELECT per_person_types_s.nextval FROM sys.dual;
100:
101: BEGIN
102:
103: if (X_Person_Type_Id is NULL) then
453: -- modified the cursor definition for better performance
454: -- Bug #3646157
455: cursor csr_system is
456: select null
457: from dual
458: where exists (
459: (select null
460: from per_people_f
461: where person_type_id = X_person_type_id)