233: BEGIN
234: SELECT hp.party_id
235: INTO
236: l_party_id
237: FROM fnd_user fu,
238: hz_parties hp
239: WHERE
240: user_id = l_included_by
241: and employee_id IS NOT NULL
243: EXCEPTION
244: WHEN NO_DATA_FOUND THEN
245: SELECT hp.party_id
246: INTO l_party_id
247: FROM fnd_user fu,
248: hz_parties hp
249: WHERE
250: user_id = l_included_by
251: AND employee_id IS NULL
249: WHERE
250: user_id = l_included_by
251: AND employee_id IS NULL
252: -- Bug 4931044: R12 ATG Mandate: Moving customer_id to
253: -- person_party_id in fnd_user
254: AND hp.party_id = fu.person_party_id;
255: -- AND hp.party_id = fu.customer_id;
256: END;
257:
760: BEGIN
761: SELECT hp.party_id
762: INTO
763: l_party_id
764: FROM fnd_user fu,
765: hz_parties hp
766: WHERE
767: user_id = l_implemented_by
768: and employee_id IS NOT NULL
771: WHEN NO_DATA_FOUND THEN
772: SELECT hp.party_id
773: INTO
774: l_party_id
775: FROM fnd_user fu,
776: hz_parties hp
777: WHERE
778: user_id = l_implemented_by
779: and employee_id IS NULL
777: WHERE
778: user_id = l_implemented_by
779: and employee_id IS NULL
780: -- Bug 4931044: R12 ATG Mandate: Moving customer_id to
781: -- person_party_id in fnd_user
782: and hp.party_id = fu.person_party_id;
783: --and hp.party_id = fu.customer_id;
784: END;
785: