943: l_appraisal_id per_appraisals.appraisal_id%type;
944: lv_result varchar2(3);
945: begin
946: hr_utility.set_location('Entered:'|| gv_package || '.commit_transaction', 1);
947: hr_utility.set_location('calling hr_complete_appraisal_ss.complete_appr', 2);
948: hr_complete_appraisal_ss.complete_appr(p_itemtype,p_itemkey,lv_result);
949: hr_utility.set_location('returned from hr_complete_appraisal_ss.complete_appr with result:'
950: ||lv_result, 3);
951: /*
944: lv_result varchar2(3);
945: begin
946: hr_utility.set_location('Entered:'|| gv_package || '.commit_transaction', 1);
947: hr_utility.set_location('calling hr_complete_appraisal_ss.complete_appr', 2);
948: hr_complete_appraisal_ss.complete_appr(p_itemtype,p_itemkey,lv_result);
949: hr_utility.set_location('returned from hr_complete_appraisal_ss.complete_appr with result:'
950: ||lv_result, 3);
951: /*
952: E : Error -- ntf to MA, HR/Sysadmin
945: begin
946: hr_utility.set_location('Entered:'|| gv_package || '.commit_transaction', 1);
947: hr_utility.set_location('calling hr_complete_appraisal_ss.complete_appr', 2);
948: hr_complete_appraisal_ss.complete_appr(p_itemtype,p_itemkey,lv_result);
949: hr_utility.set_location('returned from hr_complete_appraisal_ss.complete_appr with result:'
950: ||lv_result, 3);
951: /*
952: E : Error -- ntf to MA, HR/Sysadmin
953: W : Warning -- ntf MA
1100: hr_utility.set_location('Entered:'|| gv_package || '.notify_appraisee_on_completion', 1);
1101: --bug 4403850, to support old appraisals on upgrade, set the appraisal system status to COMPLETED,
1102: -- if APPRFEEDBACK
1103: appraisee_commit_aft_feedback(p_itemtype, p_itemkey, p_actid, p_funcmode, p_result);
1104: hr_complete_appraisal_ss.send_notification(p_itemtype,
1105: p_itemkey,
1106: p_result);
1107: hr_utility.set_location('Leaving:'|| gv_package || '.set_appraisal_commit_status', 10);
1108:
1133: -- build the log message, the log is restricted to 32k
1134: -- assumed the code setting the item attributes has the necessary format.
1135: document := wf_engine.GetItemAttrText(lv_item_type,
1136: lv_item_key,
1137: hr_complete_appraisal_ss.gv_upd_appr_status_log,
1138: true)
1139: ||wf_engine.GetItemAttrText(lv_item_type,
1140: lv_item_key,
1141: hr_complete_appraisal_ss.gv_apply_asses_comps_log,
1137: hr_complete_appraisal_ss.gv_upd_appr_status_log,
1138: true)
1139: ||wf_engine.GetItemAttrText(lv_item_type,
1140: lv_item_key,
1141: hr_complete_appraisal_ss.gv_apply_asses_comps_log,
1142: true)
1143: ||wf_engine.GetItemAttrText(lv_item_type,
1144: lv_item_key,
1145: hr_complete_appraisal_ss.gv_create_event_log,
1141: hr_complete_appraisal_ss.gv_apply_asses_comps_log,
1142: true)
1143: ||wf_engine.GetItemAttrText(lv_item_type,
1144: lv_item_key,
1145: hr_complete_appraisal_ss.gv_create_event_log,
1146: true)
1147: || wf_engine.GetItemAttrText(lv_item_type,
1148: lv_item_key,
1149: hr_complete_appraisal_ss.gv_upd_trn_act_status_log ,
1145: hr_complete_appraisal_ss.gv_create_event_log,
1146: true)
1147: || wf_engine.GetItemAttrText(lv_item_type,
1148: lv_item_key,
1149: hr_complete_appraisal_ss.gv_upd_trn_act_status_log ,
1150: true);
1151:
1152: -- set the document type
1153: document_type := wf_notification.doc_html;
1261: l_log := l_log || 'No Appraisal Id for this WorkFlow Transaction';
1262: --raise ; -- Should raise an Exception ?????
1263: end if;
1264:
1265: hr_utility.set_location('calling hr_complete_appraisal_ss.change_appr_status', 2);
1266: hr_complete_appraisal_ss.change_appr_status(l_appraisal_id, p_itemtype,p_itemkey,
1267: lv_chg_appr_status_log,chg_appr_status);
1268:
1269:
1262: --raise ; -- Should raise an Exception ?????
1263: end if;
1264:
1265: hr_utility.set_location('calling hr_complete_appraisal_ss.change_appr_status', 2);
1266: hr_complete_appraisal_ss.change_appr_status(l_appraisal_id, p_itemtype,p_itemkey,
1267: lv_chg_appr_status_log,chg_appr_status);
1268:
1269:
1270: p_result := 'COMPLETE:SUCCESS';