DBA Data[Home] [Help]

APPS.IGP_AD_USERID_PKG dependencies on FND_USER

Line 33: CURSOR c_get_fnd_user(cp_user_id fnd_user.user_id%TYPE) IS

29: CURSOR c_get_val IS
30: SELECT to_char(sysdate,'dd-mm-yyyy-HH24-MI-SS')
31: FROM dual;
32:
33: CURSOR c_get_fnd_user(cp_user_id fnd_user.user_id%TYPE) IS
34: SELECT user_name
35: FROM fnd_user
36: WHERE user_id=cp_user_id;
37:

Line 35: FROM fnd_user

31: FROM dual;
32:
33: CURSOR c_get_fnd_user(cp_user_id fnd_user.user_id%TYPE) IS
34: SELECT user_name
35: FROM fnd_user
36: WHERE user_id=cp_user_id;
37:
38: CURSOR c_get_party_name(cp_party_id hz_parties.party_id%TYPE) IS
39: SELECT party_name ,party_number,email_address

Line 46: FROM fnd_user

42:
43: -- Get the details of email of approver.
44: CURSOR c_get_approver_email(cp_user_name VARCHAR2) IS
45: SELECT email_address
46: FROM fnd_user
47: WHERE user_name=cp_user_name;
48:
49: CURSOR c_get_req_dets(cp_req_id number)
50: is

Line 55: -- get requestor fnd user_name

51: select party_name, email_address
52: from hz_parties
53: where party_id=cp_req_id;
54:
55: -- get requestor fnd user_name
56: CURSOR c_get_req_fnd_user_name(cp_req_id number)
57: is
58: SELECT user_name
59: FROM fnd_user

Line 56: CURSOR c_get_req_fnd_user_name(cp_req_id number)

52: from hz_parties
53: where party_id=cp_req_id;
54:
55: -- get requestor fnd user_name
56: CURSOR c_get_req_fnd_user_name(cp_req_id number)
57: is
58: SELECT user_name
59: FROM fnd_user
60: WHERE PERSON_PARTY_ID=cp_req_id;

Line 59: FROM fnd_user

55: -- get requestor fnd user_name
56: CURSOR c_get_req_fnd_user_name(cp_req_id number)
57: is
58: SELECT user_name
59: FROM fnd_user
60: WHERE PERSON_PARTY_ID=cp_req_id;
61:
62:
63: l_party_id hz_parties.party_id%TYPE;

Line 64: l_user_id fnd_user.user_id%TYPE;

60: WHERE PERSON_PARTY_ID=cp_req_id;
61:
62:
63: l_party_id hz_parties.party_id%TYPE;
64: l_user_id fnd_user.user_id%TYPE;
65: l_user_name fnd_user.user_name%TYPE;
66: l_email_address fnd_user.email_address%TYPE;
67: l_person_name hz_parties.party_name%TYPE;
68: l_org hz_parties.party_name%TYPE;

Line 65: l_user_name fnd_user.user_name%TYPE;

61:
62:
63: l_party_id hz_parties.party_id%TYPE;
64: l_user_id fnd_user.user_id%TYPE;
65: l_user_name fnd_user.user_name%TYPE;
66: l_email_address fnd_user.email_address%TYPE;
67: l_person_name hz_parties.party_name%TYPE;
68: l_org hz_parties.party_name%TYPE;
69: l_approver_email fnd_user.email_address%TYPE;

Line 66: l_email_address fnd_user.email_address%TYPE;

62:
63: l_party_id hz_parties.party_id%TYPE;
64: l_user_id fnd_user.user_id%TYPE;
65: l_user_name fnd_user.user_name%TYPE;
66: l_email_address fnd_user.email_address%TYPE;
67: l_person_name hz_parties.party_name%TYPE;
68: l_org hz_parties.party_name%TYPE;
69: l_approver_email fnd_user.email_address%TYPE;
70: l_item_key wf_items.item_key%TYPE;

Line 69: l_approver_email fnd_user.email_address%TYPE;

65: l_user_name fnd_user.user_name%TYPE;
66: l_email_address fnd_user.email_address%TYPE;
67: l_person_name hz_parties.party_name%TYPE;
68: l_org hz_parties.party_name%TYPE;
69: l_approver_email fnd_user.email_address%TYPE;
70: l_item_key wf_items.item_key%TYPE;
71: l_classification_cd igp_ac_acc_classes.acc_classification_code%TYPE;
72: l_expiration_dt DATE;
73: l_requestor VARCHAR2(240);

Line 138: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACTION', 'ACCOUNT'); -- Already a FND user. Only Portfolio a/c is reqd.

134:
135: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
136: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_user_id.record_data','UserId passed is Not Null' ||l_user_id);
137: END IF;
138: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACTION', 'ACCOUNT'); -- Already a FND user. Only Portfolio a/c is reqd.
139: ELSE
140:
141: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
142: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_user_id.record_data','UserId passed is Null');

Line 148: IF (l_user_id IS NULL) THEN -- For a new FND user.

144: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACTION', 'BOTH'); -- Both FND and Portfolio a/c have to be created.
145: END IF;
146:
147:
148: IF (l_user_id IS NULL) THEN -- For a new FND user.
149: BEGIN
150: INSERT INTO igp_ac_account_ints (item_key,
151: int_account_id,
152: party_id,

Line 184: -- Start : Setting requestor fnd user name

180: END IF;
181: resultout := 'COMPLETE:IGP_FAIL';
182: RAISE;
183: END;
184: -- Start : Setting requestor fnd user name
185: OPEN c_get_req_fnd_user_name(l_req_id);
186: FETCH c_get_req_fnd_user_name INTO l_requestor;
187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name

Line 185: OPEN c_get_req_fnd_user_name(l_req_id);

181: resultout := 'COMPLETE:IGP_FAIL';
182: RAISE;
183: END;
184: -- Start : Setting requestor fnd user name
185: OPEN c_get_req_fnd_user_name(l_req_id);
186: FETCH c_get_req_fnd_user_name INTO l_requestor;
187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name
189:

Line 186: FETCH c_get_req_fnd_user_name INTO l_requestor;

182: RAISE;
183: END;
184: -- Start : Setting requestor fnd user name
185: OPEN c_get_req_fnd_user_name(l_req_id);
186: FETCH c_get_req_fnd_user_name INTO l_requestor;
187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name
189:
190: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor); -- This attr holds the USER name to which the ntification needs to be sent.

Line 187: CLOSE c_get_req_fnd_user_name;

183: END;
184: -- Start : Setting requestor fnd user name
185: OPEN c_get_req_fnd_user_name(l_req_id);
186: FETCH c_get_req_fnd_user_name INTO l_requestor;
187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name
189:
190: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor); -- This attr holds the USER name to which the ntification needs to be sent.
191: ELSIF (l_user_id IS NOT NULL) THEN -- For an existing FND user.

Line 188: -- End : Setting requestor fnd user name

184: -- Start : Setting requestor fnd user name
185: OPEN c_get_req_fnd_user_name(l_req_id);
186: FETCH c_get_req_fnd_user_name INTO l_requestor;
187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name
189:
190: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor); -- This attr holds the USER name to which the ntification needs to be sent.
191: ELSIF (l_user_id IS NOT NULL) THEN -- For an existing FND user.
192: BEGIN

Line 191: ELSIF (l_user_id IS NOT NULL) THEN -- For an existing FND user.

187: CLOSE c_get_req_fnd_user_name;
188: -- End : Setting requestor fnd user name
189:
190: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor); -- This attr holds the USER name to which the ntification needs to be sent.
191: ELSIF (l_user_id IS NOT NULL) THEN -- For an existing FND user.
192: BEGIN
193: INSERT INTO igp_ac_account_ints (item_key,
194: int_account_id,
195: party_id,

Line 228: OPEN c_get_fnd_user(l_user_id); -- Get FND user name from user_id for notifications.

224: resultout := 'COMPLETE:IGP_FAIL';
225: RAISE;
226: END;
227:
228: OPEN c_get_fnd_user(l_user_id); -- Get FND user name from user_id for notifications.
229: FETCH c_get_fnd_user INTO l_requestor;
230: CLOSE c_get_fnd_user;
231:
232: wf_engine.SetItemAttrText(itemtype,itemkey,'P_USER_NAME', l_requestor);

Line 229: FETCH c_get_fnd_user INTO l_requestor;

225: RAISE;
226: END;
227:
228: OPEN c_get_fnd_user(l_user_id); -- Get FND user name from user_id for notifications.
229: FETCH c_get_fnd_user INTO l_requestor;
230: CLOSE c_get_fnd_user;
231:
232: wf_engine.SetItemAttrText(itemtype,itemkey,'P_USER_NAME', l_requestor);
233: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor);

Line 230: CLOSE c_get_fnd_user;

226: END;
227:
228: OPEN c_get_fnd_user(l_user_id); -- Get FND user name from user_id for notifications.
229: FETCH c_get_fnd_user INTO l_requestor;
230: CLOSE c_get_fnd_user;
231:
232: wf_engine.SetItemAttrText(itemtype,itemkey,'P_USER_NAME', l_requestor);
233: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_requestor);
234:

Line 332: CURSOR c_exists_acc(cp_acc_type VARCHAR2,cp_user_id fnd_user.user_id%TYPE)

328: || Who When What
329: || (reverse chronological order - newest change first)
330: */
331: -- Get the details of
332: CURSOR c_exists_acc(cp_acc_type VARCHAR2,cp_user_id fnd_user.user_id%TYPE)
333: IS
334: SELECT 'Y'
335: FROM igp_ac_accounts ac,
336: igp_ac_acc_classes acc

Line 341: l_user_id fnd_user.user_id%TYPE;

337: WHERE ac.user_id=cp_user_id AND
338: acc.acc_classification_code=cp_acc_type AND
339: ac.account_id=acc.account_id;
340:
341: l_user_id fnd_user.user_id%TYPE;
342: l_acc_type igp_ac_acc_classes.acc_classification_code%TYPE;
343: l_exists VARCHAR2(1);
344:
345: BEGIN

Line 371: ELSE -- If user id is null. This is for a new FND user account.

367: END;
368: ELSE
369: resultout := 'COMPLETE:N';
370: END IF;
371: ELSE -- If user id is null. This is for a new FND user account.
372: resultout := 'COMPLETE:N';
373: END IF;
374: END IF; --funcmode
375: EXCEPTION

Line 435: l_user_name fnd_user.user_name%TYPE;

431: || Who When What
432: || (reverse chronological order - newest change first)
433: */
434: l_exists VARCHAR2(1);
435: l_user_name fnd_user.user_name%TYPE;
436: l_num pls_integer;
437: l_message_text VARCHAR2(2000);
438: BEGIN
439: IF (funcmode = 'RUN') THEN

Line 456: l_num := fnd_user_pkg.testusername(x_user_name=>l_user_name);

452: --@ USER_INVALID_NAME constant pls_integer := 1;
453: --@ USER_EXISTS_IN_FND constant pls_integer := 2;
454: --@ USER_SYNCHED constant pls_integer := 3;
455: --@ USER_EXISTS_NO_LINK_ALLOWED constant pls_integer := 4;
456: l_num := fnd_user_pkg.testusername(x_user_name=>l_user_name);
457: if l_num = 0 then
458: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
459: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_exists :'||l_exists);
460: END IF;

Line 461: resultout := 'COMPLETE:Y'; -- No FND user with this name exists.

457: if l_num = 0 then
458: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
459: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_exists :'||l_exists);
460: END IF;
461: resultout := 'COMPLETE:Y'; -- No FND user with this name exists.
462: elsif l_num = 1 then
463: fnd_message.set_name('IGS','IGP_AD_INVALID_USR_NAME'); -- Invalid user name
464: fnd_message.set_token('USERNAME',l_user_name);
465: l_message_text := fnd_message.get;

Line 476: resultout := 'COMPLETE:N'; -- user name already exist in fnd_user.

472: fnd_message.set_name('IGS','IGP_AD_USR_ALREADY_REGISTERED'); -- User already registered in fnd
473: fnd_message.set_token('USERNAME',l_user_name);
474: l_message_text := fnd_message.get;
475:
476: resultout := 'COMPLETE:N'; -- user name already exist in fnd_user.
477: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
478: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' user name already exist in fnd_user.');
479: END IF;
480: else -- if l_num = 3 or 4

Line 478: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' user name already exist in fnd_user.');

474: l_message_text := fnd_message.get;
475:
476: resultout := 'COMPLETE:N'; -- user name already exist in fnd_user.
477: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
478: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' user name already exist in fnd_user.');
479: END IF;
480: else -- if l_num = 3 or 4
481: fnd_message.set_name('IGS','IGP_AD_USR_ALREADY_REG_IN_OID'); -- User already registered in OID
482: fnd_message.set_token('USERNAME',l_user_name);

Line 525: PROCEDURE CREATE_FND_USER(itemtype IN VARCHAR2,

521: fnd_log.string(fnd_log.level_exception,'igs.plsql.igp_ad_userid_pkg.validate_user_name','Unhandled exception :'||sqlerrm);
522: END IF;
523: END VALIDATE_USER_NAME;
524:
525: PROCEDURE CREATE_FND_USER(itemtype IN VARCHAR2,
526: itemkey IN VARCHAR2,
527: actid IN NUMBER,
528: funcmode IN VARCHAR2,
529: resultout OUT NOCOPY VARCHAR2 )

Line 534: || Purpose : Procedure to create a new FND user.

530: AS
531: /*
532: || Created By : nsidana
533: || Created On : 1/28/2004
534: || Purpose : Procedure to create a new FND user.
535: || Known limitations, enhancements or remarks :
536: || Change History :
537: || Who When What
538: || (reverse chronological order - newest change first)

Line 541: l_user_id fnd_user.user_id%TYPE;

537: || Who When What
538: || (reverse chronological order - newest change first)
539: */
540:
541: l_user_id fnd_user.user_id%TYPE;
542: l_user_name fnd_user.user_name%TYPE;
543: l_email_address fnd_user.email_address%TYPE;
544: l_party_id hz_parties.party_id%TYPE;
545: l_return_status VARCHAR2(1);

Line 542: l_user_name fnd_user.user_name%TYPE;

538: || (reverse chronological order - newest change first)
539: */
540:
541: l_user_id fnd_user.user_id%TYPE;
542: l_user_name fnd_user.user_name%TYPE;
543: l_email_address fnd_user.email_address%TYPE;
544: l_party_id hz_parties.party_id%TYPE;
545: l_return_status VARCHAR2(1);
546: l_msg_count NUMBER;

Line 543: l_email_address fnd_user.email_address%TYPE;

539: */
540:
541: l_user_id fnd_user.user_id%TYPE;
542: l_user_name fnd_user.user_name%TYPE;
543: l_email_address fnd_user.email_address%TYPE;
544: l_party_id hz_parties.party_id%TYPE;
545: l_return_status VARCHAR2(1);
546: l_msg_count NUMBER;
547: l_msg_data VARCHAR2(2000);

Line 556: -- Extract the attributes from the workflow. These are required to create the FND user.

552:
553: BEGIN
554: IF (funcmode = 'RUN') THEN
555: l_resp_exists :='N';
556: -- Extract the attributes from the workflow. These are required to create the FND user.
557: l_party_id := wf_engine.GetItemAttrNumber(itemtype,itemkey,'P_PARTY_ID' );
558: l_user_name := wf_engine.GetItemAttrText(itemtype,itemkey,'P_USER_NAME' );
559: l_email_address := wf_engine.GetItemAttrText(itemtype,itemkey,'P_EMAIL_ADDRESS' );
560: l_user_password := wf_engine.GetItemAttrText(itemtype,itemkey,'P_PASSWORD' );

Line 567: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Creating user with values :'||l_party_id||' '||l_user_name||' '||l_email_address);

563: l_user_password:=GENERATE_PASSWORD(l_party_id);
564: Wf_Engine.SetItemAttrText(itemtype,itemkey,'P_PASSWORD',l_user_password);
565: END IF;
566: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
567: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Creating user with values :'||l_party_id||' '||l_user_name||' '||l_email_address);
568: END IF;
569: -- Now, call FND package to create the FND user.
570: begin
571: fnd_user_pkg.CreateUser (

Line 569: -- Now, call FND package to create the FND user.

565: END IF;
566: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
567: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Creating user with values :'||l_party_id||' '||l_user_name||' '||l_email_address);
568: END IF;
569: -- Now, call FND package to create the FND user.
570: begin
571: fnd_user_pkg.CreateUser (
572: x_user_name => l_user_name,
573: x_owner => '',

Line 571: fnd_user_pkg.CreateUser (

567: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Creating user with values :'||l_party_id||' '||l_user_name||' '||l_email_address);
568: END IF;
569: -- Now, call FND package to create the FND user.
570: begin
571: fnd_user_pkg.CreateUser (
572: x_user_name => l_user_name,
573: x_owner => '',
574: x_session_number => '0',
575: x_start_date => sysdate,

Line 582: from FND_USER

578: x_password_date => sysdate,
579: x_customer_id => l_party_id);
580:
581: select USER_ID into l_user_id
582: from FND_USER
583: where USER_NAME = l_user_name;
584:
585: wf_engine.SetItemAttrNumber(itemtype,itemkey,'P_USER_ID', l_user_id); -- set the FND user ID. To be used later.
586: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_user_name);

Line 585: wf_engine.SetItemAttrNumber(itemtype,itemkey,'P_USER_ID', l_user_id); -- set the FND user ID. To be used later.

581: select USER_ID into l_user_id
582: from FND_USER
583: where USER_NAME = l_user_name;
584:
585: wf_engine.SetItemAttrNumber(itemtype,itemkey,'P_USER_ID', l_user_id); -- set the FND user ID. To be used later.
586: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_user_name);
587: resultout := 'COMPLETE:IGP_SUCCESS';
588: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
589: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_id :'||l_user_id);

Line 589: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_id :'||l_user_id);

585: wf_engine.SetItemAttrNumber(itemtype,itemkey,'P_USER_ID', l_user_id); -- set the FND user ID. To be used later.
586: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_user_name);
587: resultout := 'COMPLETE:IGP_SUCCESS';
588: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
589: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_id :'||l_user_id);
590: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_name :'||l_user_name);
591: END IF;
592: exception
593: when others then

Line 590: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_name :'||l_user_name);

586: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR', l_user_name);
587: resultout := 'COMPLETE:IGP_SUCCESS';
588: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
589: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_id :'||l_user_id);
590: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','l_user_name :'||l_user_name);
591: END IF;
592: exception
593: when others then
594: delete from igp_ac_account_ints where item_key= itemkey;

Line 596: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','error while creating FND user.');

592: exception
593: when others then
594: delete from igp_ac_account_ints where item_key= itemkey;
595: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
596: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','error while creating FND user.');
597: END IF;
598: resultout := 'COMPLETE:IGP_FAIL';
599: end;
600:

Line 605: fnd_log.string(fnd_log.level_exception,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Unhandled Exception :'||sqlerrm);

601: END IF; -- for funcmode='RUN'
602: EXCEPTION
603: WHEN others THEN
604: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
605: fnd_log.string(fnd_log.level_exception,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Unhandled Exception :'||sqlerrm);
606: END IF;
607: resultout := 'COMPLETE:IGP_FAIL';
608: END CREATE_FND_USER;
609:

Line 608: END CREATE_FND_USER;

604: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level THEN
605: fnd_log.string(fnd_log.level_exception,'igs.plsql.igp_ad_userid_pkg.create_fnd_user','Unhandled Exception :'||sqlerrm);
606: END IF;
607: resultout := 'COMPLETE:IGP_FAIL';
608: END CREATE_FND_USER;
609:
610: PROCEDURE CREATE_PORT_ACCOUNT(itemtype IN VARCHAR2,
611: itemkey IN VARCHAR2,
612: actid IN NUMBER,

Line 626: -- Get the details of responsibilities to be attached to the FND user because of a classification cd.

622: || Who When What
623: || (reverse chronological order - newest change first)
624: */
625:
626: -- Get the details of responsibilities to be attached to the FND user because of a classification cd.
627: -- the resp would be different for IGS/IGP, All IGP resp would have TAG= IGP.
628: CURSOR c_get_resp(cp_class_cd VARCHAR2) IS
629: SELECT responsibility_id
630: FROM igp_as_resp_mappings

Line 638: FROM fnd_user a,

634:
635: -- Cursor to check if a resp is already attached to the user.
636: CURSOR c_chk_resp(cp_user_id NUMBER,cp_resp NUMBER) IS
637: SELECT b.responsibility_id,b.end_date
638: FROM fnd_user a,
639: fnd_user_resp_groups_direct b
640: WHERE a.user_id=cp_user_id AND
641: a.user_id=b.user_id AND
642: b.responsibility_id=cp_resp;

Line 639: fnd_user_resp_groups_direct b

635: -- Cursor to check if a resp is already attached to the user.
636: CURSOR c_chk_resp(cp_user_id NUMBER,cp_resp NUMBER) IS
637: SELECT b.responsibility_id,b.end_date
638: FROM fnd_user a,
639: fnd_user_resp_groups_direct b
640: WHERE a.user_id=cp_user_id AND
641: a.user_id=b.user_id AND
642: b.responsibility_id=cp_resp;
643:

Line 652: FROM fnd_user

648: WHERE party_id=cp_party_id;
649:
650: CURSOR c_get_user_id(cp_user_name VARCHAR2) IS
651: SELECT user_id
652: FROM fnd_user
653: WHERE user_name=cp_user_name;
654:
655: CURSOR c_get_resp_desc(cp_resp_id NUMBER) IS
656: SELECT description

Line 662: l_user_name fnd_user.user_name%TYPE;

658: WHERE responsibility_id=cp_resp_id AND
659: language = USERENV('LANG');
660:
661: l_resp NUMBER;
662: l_user_name fnd_user.user_name%TYPE;
663: l_user_id fnd_user.user_id%TYPE;
664: l_fnd_user_id fnd_user.user_id%TYPE;
665: l_party_id hz_parties.party_id%TYPE;
666: l_classification_cd igp_ac_acc_classes.acc_classification_code%TYPE;

Line 663: l_user_id fnd_user.user_id%TYPE;

659: language = USERENV('LANG');
660:
661: l_resp NUMBER;
662: l_user_name fnd_user.user_name%TYPE;
663: l_user_id fnd_user.user_id%TYPE;
664: l_fnd_user_id fnd_user.user_id%TYPE;
665: l_party_id hz_parties.party_id%TYPE;
666: l_classification_cd igp_ac_acc_classes.acc_classification_code%TYPE;
667: l_account_id igp_ac_accounts.account_id%TYPE;

Line 664: l_fnd_user_id fnd_user.user_id%TYPE;

660:
661: l_resp NUMBER;
662: l_user_name fnd_user.user_name%TYPE;
663: l_user_id fnd_user.user_id%TYPE;
664: l_fnd_user_id fnd_user.user_id%TYPE;
665: l_party_id hz_parties.party_id%TYPE;
666: l_classification_cd igp_ac_acc_classes.acc_classification_code%TYPE;
667: l_account_id igp_ac_accounts.account_id%TYPE;
668: l_expiration_dt DATE;

Line 681: l_fnd_user_id := wf_engine.GetItemAttrNumber(itemtype,itemkey,'P_USER_ID' ); -- FND user ID.

677: BEGIN
678: IF (funcmode = 'RUN') THEN
679: l_exists :='N';
680: l_party_id := wf_engine.GetItemAttrNumber(itemtype,itemkey,'P_PARTY_ID' ); -- HZ party ID.
681: l_fnd_user_id := wf_engine.GetItemAttrNumber(itemtype,itemkey,'P_USER_ID' ); -- FND user ID.
682: l_classification_cd := wf_engine.GetItemAttrText(itemtype,itemkey,'P_CLASSIFICATION_CD' ); -- Portfolio acc classification code...STAFF,FACULTY,STUDENT.
683: l_expiration_dt := wf_engine.GetItemAttrDate(itemtype,itemkey,'P_EXPIRATION_DT' ); -- Access expiration date.
684:
685: -- check if already a Portfolio user.

Line 705: x_user_id => l_fnd_user_id, -- FND user ID.

701: x_mode => 'R',
702: x_rowid => lv_rowid, -- OUT param
703: x_account_id => l_account_id, -- OUT param
704: x_party_id => l_party_id, -- HZ party ID.
705: x_user_id => l_fnd_user_id, -- FND user ID.
706: x_object_version_number => 1 -- OVN is always 1 for a newly created record.
707: );
708: EXCEPTION
709: WHEN others THEN

Line 724: OPEN c_chk_resp(l_fnd_user_id,c_get_resp_rec.responsibility_id);

720: FOR c_get_resp_rec IN c_get_resp(l_classification_cd)
721: LOOP -- For each resp, check if its already attached.
722: l_exists:='N';
723: c_chk_resp_rec:=null;
724: OPEN c_chk_resp(l_fnd_user_id,c_get_resp_rec.responsibility_id);
725: FETCH c_chk_resp INTO c_chk_resp_rec;
726: CLOSE c_chk_resp;
727:
728: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN

Line 742: fnd_user_resp_groups_api.update_assignment(

738: IF (l_expiration_dt IS NULL) THEN -- Update the FNd resp to be not end dated,.
739: OPEN c_get_resp_desc(c_get_resp_rec.responsibility_id); -- get the desc of the resp. reqd for API call.
740: FETCH c_get_resp_desc INTO l_desc;
741: CLOSE c_get_resp_desc;
742: fnd_user_resp_groups_api.update_assignment(
743: user_id => l_fnd_user_id, -- FND user ID.
744: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
745: responsibility_application_id =>8405,
746: security_group_id => 0,

Line 743: user_id => l_fnd_user_id, -- FND user ID.

739: OPEN c_get_resp_desc(c_get_resp_rec.responsibility_id); -- get the desc of the resp. reqd for API call.
740: FETCH c_get_resp_desc INTO l_desc;
741: CLOSE c_get_resp_desc;
742: fnd_user_resp_groups_api.update_assignment(
743: user_id => l_fnd_user_id, -- FND user ID.
744: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
745: responsibility_application_id =>8405,
746: security_group_id => 0,
747: start_date => sysdate,

Line 759: fnd_user_resp_groups_api.update_assignment(

755: OPEN c_get_resp_desc(c_get_resp_rec.responsibility_id); -- get the desc of the resp. reqd for API call.
756: FETCH c_get_resp_desc INTO l_desc;
757: CLOSE c_get_resp_desc;
758: BEGIN
759: fnd_user_resp_groups_api.update_assignment(
760: user_id => l_fnd_user_id, -- FND user ID.
761: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
762: responsibility_application_id =>8405,
763: security_group_id => 0,

Line 760: user_id => l_fnd_user_id, -- FND user ID.

756: FETCH c_get_resp_desc INTO l_desc;
757: CLOSE c_get_resp_desc;
758: BEGIN
759: fnd_user_resp_groups_api.update_assignment(
760: user_id => l_fnd_user_id, -- FND user ID.
761: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
762: responsibility_application_id =>8405,
763: security_group_id => 0,
764: start_date => sysdate,

Line 777: ELSIF (c_chk_resp_rec.responsibility_id IS NULL) THEN -- Attach the resp. Call the pkg fnd_user_resp_groups_api.

773: END;
774: END IF;
775: END IF;
776: END IF;
777: ELSIF (c_chk_resp_rec.responsibility_id IS NULL) THEN -- Attach the resp. Call the pkg fnd_user_resp_groups_api.
778: OPEN c_get_resp_desc(c_get_resp_rec.responsibility_id); -- get the desc of the resp. reqd for API call.
779: FETCH c_get_resp_desc INTO l_desc;
780: CLOSE c_get_resp_desc;
781:

Line 785: fnd_user_resp_groups_api.insert_assignment(

781:
782: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
783: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_port_account','Resp desc for new resp :'||l_desc);
784: END IF;
785: fnd_user_resp_groups_api.insert_assignment(
786: user_id => l_fnd_user_id, -- FND user ID.
787: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
788: responsibility_application_id =>8405,
789: security_group_id => 0,

Line 786: user_id => l_fnd_user_id, -- FND user ID.

782: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
783: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.create_port_account','Resp desc for new resp :'||l_desc);
784: END IF;
785: fnd_user_resp_groups_api.insert_assignment(
786: user_id => l_fnd_user_id, -- FND user ID.
787: responsibility_id =>c_get_resp_rec.responsibility_id, -- RESP ID.
788: responsibility_application_id =>8405,
789: security_group_id => 0,
790: start_date => sysdate,

Line 851: CURSOR c_get_fnd_user(cp_user_id NUMBER) IS

847: FROM hz_parties hz,igp_ac_accounts ac
848: WHERE ac.user_id=cp_user_id AND
849: ac.party_id=hz.party_id;
850:
851: CURSOR c_get_fnd_user(cp_user_id NUMBER) IS
852: SELECT user_name
853: FROM fnd_user
854: WHERE user_id=cp_user_id;
855:

Line 853: FROM fnd_user

849: ac.party_id=hz.party_id;
850:
851: CURSOR c_get_fnd_user(cp_user_id NUMBER) IS
852: SELECT user_name
853: FROM fnd_user
854: WHERE user_id=cp_user_id;
855:
856: CURSOR c_get_requestor_det(cp_req_id NUMBER) IS
857: SELECT hz.person_last_name||', '||hz.person_first_name req_name,

Line 861: fnd_user fu,

857: SELECT hz.person_last_name||', '||hz.person_first_name req_name,
858: fu.email_address req_email
859: FROM
860: hz_parties hz,
861: fnd_user fu,
862: igp_ac_Accounts acc
863: WHERE
864: hz.party_id=cp_req_id AND
865: hz.party_id=acc.party_id AND

Line 870: l_user_id fnd_user.user_id%TYPE;

866: acc.user_id=fu.user_id;
867:
868:
869: l_account_id NUMBER;
870: l_user_id fnd_user.user_id%TYPE;
871: l_classcode igp_ac_acc_classes.acc_classification_code%TYPE;
872: l_expiry_dt DATE;
873: l_user_name fnd_user.user_name%TYPE;
874: c_get_per_details_rec c_get_per_details%ROWTYPE;

Line 873: l_user_name fnd_user.user_name%TYPE;

869: l_account_id NUMBER;
870: l_user_id fnd_user.user_id%TYPE;
871: l_classcode igp_ac_acc_classes.acc_classification_code%TYPE;
872: l_expiry_dt DATE;
873: l_user_name fnd_user.user_name%TYPE;
874: c_get_per_details_rec c_get_per_details%ROWTYPE;
875: l_requestor_id hz_parties.party_id%TYPE;
876: l_requestor_name hz_parties.party_name%TYPE;
877: l_requestor_email fnd_user.email_address%TYPE;

Line 877: l_requestor_email fnd_user.email_address%TYPE;

873: l_user_name fnd_user.user_name%TYPE;
874: c_get_per_details_rec c_get_per_details%ROWTYPE;
875: l_requestor_id hz_parties.party_id%TYPE;
876: l_requestor_name hz_parties.party_name%TYPE;
877: l_requestor_email fnd_user.email_address%TYPE;
878: l_href_mailto VARCHAR2(1000);
879: c_get_requestor_det_rec c_get_requestor_det%ROWTYPE;
880:
881:

Line 920: OPEN c_get_fnd_user(l_user_id);

916:
917: wf_engine.SetItemAttrText(itemtype,itemkey,'P_PERSON_NAME', c_get_per_details_rec.party_name);
918: wf_engine.SetItemAttrText(itemtype,itemkey,'P_PERSON_NUMBER', c_get_per_details_rec.party_number);
919:
920: OPEN c_get_fnd_user(l_user_id);
921: FETCH c_get_fnd_user INTO l_user_name;
922: CLOSE c_get_fnd_user;
923:
924: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN

Line 921: FETCH c_get_fnd_user INTO l_user_name;

917: wf_engine.SetItemAttrText(itemtype,itemkey,'P_PERSON_NAME', c_get_per_details_rec.party_name);
918: wf_engine.SetItemAttrText(itemtype,itemkey,'P_PERSON_NUMBER', c_get_per_details_rec.party_number);
919:
920: OPEN c_get_fnd_user(l_user_id);
921: FETCH c_get_fnd_user INTO l_user_name;
922: CLOSE c_get_fnd_user;
923:
924: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
925: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.set_data','User Name :'||l_user_name);

Line 922: CLOSE c_get_fnd_user;

918: wf_engine.SetItemAttrText(itemtype,itemkey,'P_PERSON_NUMBER', c_get_per_details_rec.party_number);
919:
920: OPEN c_get_fnd_user(l_user_id);
921: FETCH c_get_fnd_user INTO l_user_name;
922: CLOSE c_get_fnd_user;
923:
924: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
925: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.set_data','User Name :'||l_user_name);
926: END IF;