1113: --
1114: l_business_group_id number;
1115: l_person_id_appl number;
1116: l_person_id number;
1117: l_application_date per_addresses.date_from%TYPE;
1118: p_addr per_addresses%ROWTYPE;
1119: l_addr_id number;
1120: l_party_id number;
1121: l_object_version_number number;
1114: l_business_group_id number;
1115: l_person_id_appl number;
1116: l_person_id number;
1117: l_application_date per_addresses.date_from%TYPE;
1118: p_addr per_addresses%ROWTYPE;
1119: l_addr_id number;
1120: l_party_id number;
1121: l_object_version_number number;
1122: l_return_status varchar2(30);
1132: and sysdate between effective_start_date and effective_end_date;
1133: --
1134: Cursor C_Address_id is
1135: select address_id
1136: from per_addresses
1137: where person_id=l_person_id_appl;
1138: --
1139: Cursor C_Person_id is
1140: select min(person_id)
1144: where person_id=l_person_id_appl);
1145: --
1146: Cursor C_Address_details_Rec is
1147: select *
1148: from per_addresses
1149: where person_id=l_person_id
1150: and address_type='REC'
1151: and sysdate between date_from and nvl(date_to,sysdate);
1152: --
1151: and sysdate between date_from and nvl(date_to,sysdate);
1152: --
1153: Cursor C_Address_details_Primary is
1154: select *
1155: from per_addresses
1156: where person_id=l_person_id
1157: and primary_flag = 'Y'
1158: and sysdate between date_from and nvl(date_to,sysdate);
1159: --