310: pos_log.combine_fnd_msg(l_msg_count, x_exception_msg);
311: raise_application_error(-20001, x_exception_msg, true);
312: END IF;
313:
314: fnd_user_pkg.updateuser
315: ( x_user_name => p_username,
316: x_owner => NULL,
317: x_customer_id => x_party_id
318: );
377: l_party_id number;
378: BEGIN
379: select distinct hz2.party_id
380: into l_party_id
381: from fnd_user f, hz_parties hz1, hz_parties hz2,
382: hz_relationships hzr1, hz_code_assignments hca
383: where f.person_party_id = hz1.party_id
384: and f.user_name = p_username
385: and hzr1.object_id = hz2.party_id
471: RETURN 'N';
472:
473: END is_person_employee_cont_worker;
474:
475: -- return person_party_id of the fnd user if the user
476: -- is a current employee or contingent worker; otherwise return null
477: FUNCTION get_emp_or_ctgt_wrkr_pty_id (p_userid IN NUMBER)
478: RETURN NUMBER IS
479:
479:
480: l_party_id NUMBER;
481: l_employee_id NUMBER;
482:
483: CURSOR l_fnd_user_cur IS
484: SELECT employee_id, person_party_id
485: FROM fnd_user WHERE user_id = p_userid;
486:
487: BEGIN
481: l_employee_id NUMBER;
482:
483: CURSOR l_fnd_user_cur IS
484: SELECT employee_id, person_party_id
485: FROM fnd_user WHERE user_id = p_userid;
486:
487: BEGIN
488:
489: OPEN l_fnd_user_cur;
485: FROM fnd_user WHERE user_id = p_userid;
486:
487: BEGIN
488:
489: OPEN l_fnd_user_cur;
490: FETCH l_fnd_user_cur INTO l_employee_id, l_party_id;
491: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
492: CLOSE l_fnd_user_cur;
493: RETURN NULL;
486:
487: BEGIN
488:
489: OPEN l_fnd_user_cur;
490: FETCH l_fnd_user_cur INTO l_employee_id, l_party_id;
491: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
492: CLOSE l_fnd_user_cur;
493: RETURN NULL;
494: END IF;
487: BEGIN
488:
489: OPEN l_fnd_user_cur;
490: FETCH l_fnd_user_cur INTO l_employee_id, l_party_id;
491: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
492: CLOSE l_fnd_user_cur;
493: RETURN NULL;
494: END IF;
495: CLOSE l_fnd_user_cur;
488:
489: OPEN l_fnd_user_cur;
490: FETCH l_fnd_user_cur INTO l_employee_id, l_party_id;
491: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
492: CLOSE l_fnd_user_cur;
493: RETURN NULL;
494: END IF;
495: CLOSE l_fnd_user_cur;
496:
491: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
492: CLOSE l_fnd_user_cur;
493: RETURN NULL;
494: END IF;
495: CLOSE l_fnd_user_cur;
496:
497: IF is_person_employee_cont_worker(l_employee_id) = 'Y' THEN
498: RETURN l_party_id;
499: ELSE
505: FUNCTION is_user_employee_cont_worker(p_userid IN NUMBER)
506: RETURN VARCHAR2 IS
507: l_employee_id NUMBER;
508:
509: CURSOR l_fnd_user_cur IS
510: SELECT employee_id
511: FROM fnd_user
512: WHERE user_id = p_userid;
513: BEGIN
507: l_employee_id NUMBER;
508:
509: CURSOR l_fnd_user_cur IS
510: SELECT employee_id
511: FROM fnd_user
512: WHERE user_id = p_userid;
513: BEGIN
514: OPEN l_fnd_user_cur;
515: FETCH l_fnd_user_cur INTO l_employee_id;
510: SELECT employee_id
511: FROM fnd_user
512: WHERE user_id = p_userid;
513: BEGIN
514: OPEN l_fnd_user_cur;
515: FETCH l_fnd_user_cur INTO l_employee_id;
516: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
517: CLOSE l_fnd_user_cur;
518: RETURN 'N';
511: FROM fnd_user
512: WHERE user_id = p_userid;
513: BEGIN
514: OPEN l_fnd_user_cur;
515: FETCH l_fnd_user_cur INTO l_employee_id;
516: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
517: CLOSE l_fnd_user_cur;
518: RETURN 'N';
519: END IF;
512: WHERE user_id = p_userid;
513: BEGIN
514: OPEN l_fnd_user_cur;
515: FETCH l_fnd_user_cur INTO l_employee_id;
516: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
517: CLOSE l_fnd_user_cur;
518: RETURN 'N';
519: END IF;
520: CLOSE l_fnd_user_cur;
513: BEGIN
514: OPEN l_fnd_user_cur;
515: FETCH l_fnd_user_cur INTO l_employee_id;
516: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
517: CLOSE l_fnd_user_cur;
518: RETURN 'N';
519: END IF;
520: CLOSE l_fnd_user_cur;
521:
516: IF l_fnd_user_cur%notfound OR l_employee_id IS NULL THEN
517: CLOSE l_fnd_user_cur;
518: RETURN 'N';
519: END IF;
520: CLOSE l_fnd_user_cur;
521:
522: IF is_person_employee_cont_worker(l_employee_id) = 'Y' THEN
523: RETURN 'Y';
524: ELSE
536: l_job_title HZ_PARTIES.PERSON_TITLE%TYPE;
537: BEGIN
538: SELECT hp.person_title
539: INTO l_job_title
540: FROM hz_parties hp, fnd_user fu
541: WHERE hp.party_id = fu.person_party_id
542: AND fu.user_id = p_user_id;
543:
544: return l_job_title;