[Home] [Help]
2250:
2251: PROCEDURE Check_Mand_Person_Type
2252: (
2253: p_person_id IN HZ_PARTIES.PARTY_ID%TYPE,
2254: p_data_element IN IGS_PE_STUP_DATA_EMT_ALL.data_element%TYPE,
2255: p_required_ind OUT NOCOPY IGS_PE_STUP_DATA_EMT_ALL.required_ind%TYPE
2256: )
2257: IS
2258: Cursor per_type IS
2251: PROCEDURE Check_Mand_Person_Type
2252: (
2253: p_person_id IN HZ_PARTIES.PARTY_ID%TYPE,
2254: p_data_element IN IGS_PE_STUP_DATA_EMT_ALL.data_element%TYPE,
2255: p_required_ind OUT NOCOPY IGS_PE_STUP_DATA_EMT_ALL.required_ind%TYPE
2256: )
2257: IS
2258: Cursor per_type IS
2259: SELECT person_type_code
2260: FROM igs_pe_typ_instances
2261: WHERE person_id = p_person_id
2262: AND sysdate BETWEEN start_date AND NVL(end_date, sysdate);
2263:
2264: CURSOR per_type_req_man_upd (cp_person_type_code IGS_PE_STUP_DATA_EMT.PERSON_TYPE_CODE%TYPE) IS
2265: SELECT 'x'
2266: FROM igs_pe_stup_data_emt
2267: WHERE person_type_code = cp_person_type_code
2268: AND UPPER(data_element) = UPPER(p_data_element)
2262: AND sysdate BETWEEN start_date AND NVL(end_date, sysdate);
2263:
2264: CURSOR per_type_req_man_upd (cp_person_type_code IGS_PE_STUP_DATA_EMT.PERSON_TYPE_CODE%TYPE) IS
2265: SELECT 'x'
2266: FROM igs_pe_stup_data_emt
2267: WHERE person_type_code = cp_person_type_code
2268: AND UPPER(data_element) = UPPER(p_data_element)
2269: AND required_ind = 'M';
2270:
2267: WHERE person_type_code = cp_person_type_code
2268: AND UPPER(data_element) = UPPER(p_data_element)
2269: AND required_ind = 'M';
2270:
2271: CURSOR per_type_req_pre_upd (cp_person_type_code IGS_PE_STUP_DATA_EMT.PERSON_TYPE_CODE%TYPE) IS
2272: SELECT 'x'
2273: FROM igs_pe_stup_data_emt
2274: WHERE person_type_code = cp_person_type_code
2275: AND UPPER(data_element) = UPPER(p_data_element)
2269: AND required_ind = 'M';
2270:
2271: CURSOR per_type_req_pre_upd (cp_person_type_code IGS_PE_STUP_DATA_EMT.PERSON_TYPE_CODE%TYPE) IS
2272: SELECT 'x'
2273: FROM igs_pe_stup_data_emt
2274: WHERE person_type_code = cp_person_type_code
2275: AND UPPER(data_element) = UPPER(p_data_element)
2276: AND required_ind = 'P';
2277:
2276: AND required_ind = 'P';
2277:
2278: CURSOR per_type_req_man_ins IS
2279: SELECT 'x'
2280: FROM igs_pe_stup_data_emt sdt, igs_pe_person_types pt
2281: WHERE sdt.person_type_code = pt.person_type_code
2282: AND pt.system_type = 'OTHER'
2283: AND UPPER(sdt.data_element) = UPPER(p_data_element)
2284: AND sdt.required_ind = 'M';
2284: AND sdt.required_ind = 'M';
2285:
2286: CURSOR per_type_req_pre_ins IS
2287: SELECT 'x'
2288: FROM igs_pe_stup_data_emt sdt, igs_pe_person_types pt
2289: WHERE sdt.person_type_code = pt.person_type_code
2290: AND pt.system_type = 'OTHER'
2291: AND UPPER(sdt.data_element) = UPPER(p_data_element)
2292: AND sdt.required_ind = 'P';