325: IS
326: CURSOR csr_emp_person_types
327: IS
328: SELECT ttl.user_person_type
329: FROM per_person_types_tl ttl
330: ,per_person_types typ
331: ,per_person_type_usages_f ptu
332: ,PER_ALL_PEOPLE_F ppf
333: ,PER_ALL_PEOPLE_F ppf2
343: AND p_eff_date BETWEEN ptu.effective_start_date
344: AND ptu.effective_end_date
345: order by typ.system_person_type ASC, ptu.effective_start_date DESC;
346:
347: l_user_person_type per_person_types_tl.user_person_type%type;
348:
349: BEGIN
350: open csr_emp_person_types;
351: fetch csr_emp_person_types into l_user_person_type;
369: IS
370: CURSOR csr_emp_person_types
371: IS
372: SELECT ttl.user_person_type
373: FROM per_person_types_tl ttl
374: ,per_person_types typ
375: ,per_person_type_usages_f ptu
376: ,PER_ALL_PEOPLE_F ppf
377: WHERE ppf.party_id = p_party_id
423:
424: CURSOR csr_apl_person_types
425: IS
426: SELECT ttl.user_person_type
427: FROM per_person_types_tl ttl
428: ,per_person_types typ
429: ,per_person_type_usages_f ptu
430: ,PER_ALL_PEOPLE_F ppf
431: ,PER_ALL_PEOPLE_F ppf2
442: AND ptu.effective_end_date
443: ORDER BY typ.system_person_type ASC, ptu.effective_start_date DESC;
444:
445:
446: l_user_person_type per_person_types_tl.user_person_type%type;
447: l_dummy per_person_types_tl.user_person_type%type;
448:
449: BEGIN
450: open csr_emp_person_type_exists;
443: ORDER BY typ.system_person_type ASC, ptu.effective_start_date DESC;
444:
445:
446: l_user_person_type per_person_types_tl.user_person_type%type;
447: l_dummy per_person_types_tl.user_person_type%type;
448:
449: BEGIN
450: open csr_emp_person_type_exists;
451: fetch csr_emp_person_type_exists into l_dummy;
477: IS
478: CURSOR csr_emp_person_types
479: IS
480: SELECT ttl.user_person_type
481: FROM per_person_types_tl ttl
482: ,per_person_types typ
483: ,per_person_type_usages_f ptu
484: ,PER_ALL_PEOPLE_F ppf
485: WHERE ppf.party_id = p_party_id
492: AND p_eff_date BETWEEN ptu.effective_start_date
493: AND ptu.effective_end_date
494: order by typ.system_person_type ASC, ptu.effective_start_date DESC;
495:
496: l_user_person_type per_person_types_tl.user_person_type%type;
497:
498: BEGIN
499: if (nvl(g_apl_upt_party_id,-1)<>p_party_id) then
500: g_apl_upt_party_id:=p_party_id;