239: END IF;
240: -- Set the message of the approval message based on the parameters.
241: IF (l_org IS NOT NULL) THEN -- ext account request
242: IF (l_expiration_dt IS NOT NULL) THEN
243: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WTH_EX_DT'); -- ext account request with an exp date.
244: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
240: -- Set the message of the approval message based on the parameters.
241: IF (l_org IS NOT NULL) THEN -- ext account request
242: IF (l_expiration_dt IS NOT NULL) THEN
243: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WTH_EX_DT'); -- ext account request with an exp date.
244: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
241: IF (l_org IS NOT NULL) THEN -- ext account request
242: IF (l_expiration_dt IS NOT NULL) THEN
243: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WTH_EX_DT'); -- ext account request with an exp date.
244: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
242: IF (l_expiration_dt IS NOT NULL) THEN
243: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WTH_EX_DT'); -- ext account request with an exp date.
244: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
243: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WTH_EX_DT'); -- ext account request with an exp date.
244: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
251: fnd_message.set_token('ORG_NAME',l_org);
245: fnd_message.set_token('ORG_NAME',l_org);
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
251: fnd_message.set_token('ORG_NAME',l_org);
252: l_message_text := fnd_message.get;
253: END IF;
246: fnd_message.set_token('EXP_DT',l_expiration_dt);
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
251: fnd_message.set_token('ORG_NAME',l_org);
252: l_message_text := fnd_message.get;
253: END IF;
254: ELSIF (l_org IS NULL) THEN -- int account.
247: l_message_text := fnd_message.get;
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
251: fnd_message.set_token('ORG_NAME',l_org);
252: l_message_text := fnd_message.get;
253: END IF;
254: ELSIF (l_org IS NULL) THEN -- int account.
255: IF (l_expiration_dt IS NOT NULL) THEN
248: ELSE
249: fnd_message.set_name('IGS','IGP_AD_EXT_NTF_WT_EX_DT'); -- ext account request without an exp date.
250: fnd_message.set_token('CONTACT_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
251: fnd_message.set_token('ORG_NAME',l_org);
252: l_message_text := fnd_message.get;
253: END IF;
254: ELSIF (l_org IS NULL) THEN -- int account.
255: IF (l_expiration_dt IS NOT NULL) THEN
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
252: l_message_text := fnd_message.get;
253: END IF;
254: ELSIF (l_org IS NULL) THEN -- int account.
255: IF (l_expiration_dt IS NOT NULL) THEN
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
257: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
253: END IF;
254: ELSIF (l_org IS NULL) THEN -- int account.
255: IF (l_expiration_dt IS NOT NULL) THEN
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
257: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
254: ELSIF (l_org IS NULL) THEN -- int account.
255: IF (l_expiration_dt IS NOT NULL) THEN
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
257: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
255: IF (l_expiration_dt IS NOT NULL) THEN
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
257: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
256: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WTH_EX_DT'); -- int account request with an exp date.
257: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
264: fnd_message.set_token('ACC_TYPE',l_classification_cd);
258: fnd_message.set_token('EXP_DT',l_expiration_dt);
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
264: fnd_message.set_token('ACC_TYPE',l_classification_cd);
265: l_message_text := fnd_message.get;
266: END IF;
259: fnd_message.set_token('ACC_TYPE',l_classification_cd);
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
264: fnd_message.set_token('ACC_TYPE',l_classification_cd);
265: l_message_text := fnd_message.get;
266: END IF;
267: END IF;
260: l_message_text := fnd_message.get;
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
264: fnd_message.set_token('ACC_TYPE',l_classification_cd);
265: l_message_text := fnd_message.get;
266: END IF;
267: END IF;
268: wf_engine.SetItemAttrText(itemtype,itemkey,'P_MESSAGE_TEXT', l_message_text); -- Set the parameter of the workflow to contain the approval message text.
261: ELSE
262: fnd_message.set_name('IGS','IGP_AD_INT_NTF_WT_EX_DT'); -- int account request without an exp date.
263: fnd_message.set_token('PERSON_NAME',Wf_Engine.GetItemAttrText(itemtype,itemkey,'P_PERSON_NAME'));
264: fnd_message.set_token('ACC_TYPE',l_classification_cd);
265: l_message_text := fnd_message.get;
266: END IF;
267: END IF;
268: wf_engine.SetItemAttrText(itemtype,itemkey,'P_MESSAGE_TEXT', l_message_text); -- Set the parameter of the workflow to contain the approval message text.
269:
288: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
289: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_user_id.record_data','approver '||l_approver);
290: END IF;
291: IF (l_classification_cd = 'EXTERNAL') THEN
292: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
293: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
294: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',null);
295: ELSE
296: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
289: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_user_id.record_data','approver '||l_approver);
290: END IF;
291: IF (l_classification_cd = 'EXTERNAL') THEN
292: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
293: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
294: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',null);
295: ELSE
296: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
297: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE', fnd_message.get);
292: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
293: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
294: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',null);
295: ELSE
296: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
297: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE', fnd_message.get);
298: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE', l_classification_cd);
299: END IF;
300: select SUBSTR(FND_PROFILE.VALUE('ICX_FORMS_LAUNCHER'),1,INSTR(FND_PROFILE.VALUE('ICX_FORMS_LAUNCHER'),'/',1,3)) INTO l_url_part1 FROM dual;
293: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
294: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',null);
295: ELSE
296: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
297: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE', fnd_message.get);
298: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE', l_classification_cd);
299: END IF;
300: select SUBSTR(FND_PROFILE.VALUE('ICX_FORMS_LAUNCHER'),1,INSTR(FND_PROFILE.VALUE('ICX_FORMS_LAUNCHER'),'/',1,3)) INTO l_url_part1 FROM dual;
301: select FND_PROFILE.VALUE('ICX_OA_HTML') INTO l_url_part2 FROM dual;
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;
466:
467: resultout := 'COMPLETE:N'; -- user name does not comply user name policy
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;
466:
467: resultout := 'COMPLETE:N'; -- user name does not comply user name policy
468: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
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;
466:
467: resultout := 'COMPLETE:N'; -- user name does not comply user name policy
468: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
469: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' does not comply user name policy.');
468: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
469: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' does not comply user name policy.');
470: END IF;
471: elsif l_num = 2 then
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.
469: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name || ' does not comply user name policy.');
470: END IF;
471: elsif l_num = 2 then
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
470: END IF;
471: elsif l_num = 2 then
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.');
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);
483: l_message_text := fnd_message.get;
484: resultout := 'COMPLETE:N'; -- user name is already in use with Oracle Internet Directory.
485: 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);
483: l_message_text := fnd_message.get;
484: resultout := 'COMPLETE:N'; -- user name is already in use with Oracle Internet Directory.
485: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
486: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name||' is already in use with Oracle Internet Directory.');
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);
483: l_message_text := fnd_message.get;
484: resultout := 'COMPLETE:N'; -- user name is already in use with Oracle Internet Directory.
485: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
486: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name','l_user_name :'||l_user_name||' is already in use with Oracle Internet Directory.');
487:
489: end if; -- FOR l_num = 0
490: else
491: l_num := -1;
492:
493: fnd_message.set_name('IGS','IGP_AD_USR_CRT_UPD_NOT_ALOWED'); -- Creation or updating of a user is not allowed.
494: l_message_text := fnd_message.get;
495: resultout := 'COMPLETE:N'; -- Creation or updating of a user is not allowed.
496:
497: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
490: else
491: l_num := -1;
492:
493: fnd_message.set_name('IGS','IGP_AD_USR_CRT_UPD_NOT_ALOWED'); -- Creation or updating of a user is not allowed.
494: l_message_text := fnd_message.get;
495: resultout := 'COMPLETE:N'; -- Creation or updating of a user is not allowed.
496:
497: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level THEN
498: fnd_log.string(fnd_log.level_procedure,'igs.plsql.igp_ad_userid_pkg.validate_user_name',' Creation or updating of a user is not allowed.');
896: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR_NAME',c_get_requestor_det_rec.req_name);
897: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR_EMAIL',l_href_mailto);
898:
899: IF (l_classcode = 'EXTERNAL') THEN
900: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
901: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
902: ELSE
903: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
904: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
897: wf_engine.SetItemAttrText(itemtype,itemkey,'P_REQUESTOR_EMAIL',l_href_mailto);
898:
899: IF (l_classcode = 'EXTERNAL') THEN
900: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
901: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
902: ELSE
903: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
904: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
905: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',l_classcode);
899: IF (l_classcode = 'EXTERNAL') THEN
900: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
901: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
902: ELSE
903: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
904: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
905: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',l_classcode);
906: END IF;
907:
900: fnd_message.set_name('IGS','IGP_AD_EXTERNAL_NOTE');
901: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
902: ELSE
903: fnd_message.set_name('IGS','IGP_AD_INTERNAL_NOTE');
904: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_TYPE',fnd_message.get);
905: wf_engine.SetItemAttrText(itemtype,itemkey,'P_ACC_SUB_TYPE',l_classcode);
906: END IF;
907:
908: OPEN c_get_per_details(l_user_id);