DBA Data[Home] [Help]

APPS.AHL_GENERIC_APRV_PVT dependencies on FND_API

Line 98: IF l_return_status <> Fnd_Api.g_ret_sts_error

94: l_application_usg_code := p_application_usg_code;
95: Check_Appl_Usg_Code(p_appl_usg_code => l_application_usg_code,
96: x_return_status => l_return_status
97: );
98: IF l_return_status <> Fnd_Api.g_ret_sts_error
99: THEN
100: -- Reema:
101: -- Set the Value of Application Usage Code
102: -- This value can then be used in other procedures.

Line 197: RAISE FND_API.G_EXC_ERROR;

193: --Standard Call to count messages
194: l_msg_count := FND_MSG_PUB.count_msg;
195:
196: IF l_msg_count > 0 THEN
197: RAISE FND_API.G_EXC_ERROR;
198: END IF;
199:
200:
201: -- Set up requester Role

Line 202: l_return_status := FND_API.G_RET_STS_SUCCESS;

198: END IF;
199:
200:
201: -- Set up requester Role
202: l_return_status := FND_API.G_RET_STS_SUCCESS;
203:
204: -- Get Resource ID of the Requester
205: OPEN c_resource ;
206: FETCH c_resource INTO l_resource_id ;

Line 208: l_return_status := FND_API.G_RET_STS_ERROR;

204: -- Get Resource ID of the Requester
205: OPEN c_resource ;
206: FETCH c_resource INTO l_resource_id ;
207: IF c_resource%NOTFOUND THEN
208: l_return_status := FND_API.G_RET_STS_ERROR;
209: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_RESOURCE');
210: FND_MSG_PUB.Add;
211: CLOSE c_resource ;
212: ELSE

Line 221: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then

217: x_return_status => l_return_status);
218:
219: END IF;
220:
221: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
222: RAISE FND_API.G_EXC_ERROR;
223: ELSE
224: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
225: itemkey => itemkey,

Line 222: RAISE FND_API.G_EXC_ERROR;

218:
219: END IF;
220:
221: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
222: RAISE FND_API.G_EXC_ERROR;
223: ELSE
224: WF_ENGINE.SetItemAttrText(itemtype => itemtype,
225: itemkey => itemkey,
226: aname => 'REQUESTER',

Line 245: p_encoded => FND_API.G_FALSE,

241: EXCEPTION
242: WHEN OTHERS THEN
243: -- wf_engine.threshold := l_save_threshold ;
244: FND_MSG_PUB.Count_And_Get (
245: p_encoded => FND_API.G_FALSE,
246: p_count => l_msg_count,
247: p_data => l_msg_data);
248:
249: if(l_msg_count > 0)then

Line 253: p_encoded => FND_API.G_FALSE,

249: if(l_msg_count > 0)then
250: for I in 1 .. l_msg_count LOOP
251: fnd_msg_pub.Get
252: (p_msg_index => FND_MSG_PUB.G_NEXT,
253: p_encoded => FND_API.G_FALSE,
254: p_data => l_msg_data,
255: p_msg_index_out => l_index);
256:
257: -- dbms_output.put_line('error message :'||l_msg_data);

Line 315: if (l_return_status = fnd_api.g_ret_sts_success) then

311: itemkey => itemkey,
312: aname => 'APPROVAL_TYPE' );
313:
314: Get_Api_Name('WORKFLOW', l_object, 'SET_ACTIVITY_DETAILS', l_approval_type, l_pkg_name, l_proc_name, l_return_status);
315: if (l_return_status = fnd_api.g_ret_sts_success) then
316: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
317: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
318: else
319: RAISE FND_API.G_EXC_ERROR;

Line 319: RAISE FND_API.G_EXC_ERROR;

315: if (l_return_status = fnd_api.g_ret_sts_success) then
316: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
317: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
318: else
319: RAISE FND_API.G_EXC_ERROR;
320: return;
321: end if;
322:
323: END IF;

Line 344: WHEN FND_API.G_EXC_ERROR THEN

340: --
341:
342: EXCEPTION
343:
344: WHEN FND_API.G_EXC_ERROR THEN
345: FND_MSG_PUB.Count_And_Get (
346: p_encoded => FND_API.G_FALSE,
347: p_count => l_msg_count,
348: p_data => l_msg_data

Line 346: p_encoded => FND_API.G_FALSE,

342: EXCEPTION
343:
344: WHEN FND_API.G_EXC_ERROR THEN
345: FND_MSG_PUB.Count_And_Get (
346: p_encoded => FND_API.G_FALSE,
347: p_count => l_msg_count,
348: p_data => l_msg_data
349: );
350: Handle_Error

Line 463: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then

459: x_approver_type => l_approver_type,
460: x_object_approver_id => l_object_approver_id,
461: x_return_status => l_return_status);
462:
463: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
464:
465: RAISE FND_API.G_EXC_ERROR;
466: END IF;
467:

Line 465: RAISE FND_API.G_EXC_ERROR;

461: x_return_status => l_return_status);
462:
463: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
464:
465: RAISE FND_API.G_EXC_ERROR;
466: END IF;
467:
468: Get_User_Role(p_resource_id => l_object_approver_id ,
469: x_role_name => l_approver,

Line 473: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then

469: x_role_name => l_approver,
470: x_role_display_name => l_approver_display_name,
471: x_return_status => l_return_status);
472:
473: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
474:
475: RAISE FND_API.G_EXC_ERROR;
476: END IF;
477:

Line 475: RAISE FND_API.G_EXC_ERROR;

471: x_return_status => l_return_status);
472:
473: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
474:
475: RAISE FND_API.G_EXC_ERROR;
476: END IF;
477:
478: wf_engine.SetItemAttrText( itemtype => itemtype,
479: itemkey => itemkey,

Line 508: WHEN FND_API.G_EXC_ERROR THEN

504: resultout := 'COMPLETE:';
505: return;
506: END IF;
507: EXCEPTION
508: WHEN FND_API.G_EXC_ERROR THEN
509: FND_MSG_PUB.Count_And_Get (
510: p_encoded => FND_API.G_FALSE,
511: p_count => l_msg_count,
512: p_data => l_msg_data

Line 510: p_encoded => FND_API.G_FALSE,

506: END IF;
507: EXCEPTION
508: WHEN FND_API.G_EXC_ERROR THEN
509: FND_MSG_PUB.Count_And_Get (
510: p_encoded => FND_API.G_FALSE,
511: p_count => l_msg_count,
512: p_data => l_msg_data
513: );
514:

Line 616: WHEN FND_API.G_EXC_ERROR THEN

612: return;
613: END IF;
614:
615: EXCEPTION
616: WHEN FND_API.G_EXC_ERROR THEN
617: FND_MSG_PUB.Count_And_Get (
618: p_encoded => FND_API.G_FALSE,
619: p_count => l_msg_count,
620: p_data => l_msg_data

Line 618: p_encoded => FND_API.G_FALSE,

614:
615: EXCEPTION
616: WHEN FND_API.G_EXC_ERROR THEN
617: FND_MSG_PUB.Count_And_Get (
618: p_encoded => FND_API.G_FALSE,
619: p_count => l_msg_count,
620: p_data => l_msg_data
621: );
622: Handle_Error

Line 686: if (l_return_stat = fnd_api.g_ret_sts_success) then

682: aname => 'APPROVAL_TYPE' );
683:
684: Get_Api_Name('WORKFLOW', l_object, 'NTF_APPROVAL',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
685:
686: if (l_return_stat = fnd_api.g_ret_sts_success) then
687: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
688: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
689: else
690: RAISE FND_API.G_EXC_ERROR;

Line 690: RAISE FND_API.G_EXC_ERROR;

686: if (l_return_stat = fnd_api.g_ret_sts_success) then
687: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
688: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
689: else
690: RAISE FND_API.G_EXC_ERROR;
691: end if;
692:
693: EXCEPTION
694: WHEN FND_API.G_EXC_ERROR THEN

Line 694: WHEN FND_API.G_EXC_ERROR THEN

690: RAISE FND_API.G_EXC_ERROR;
691: end if;
692:
693: EXCEPTION
694: WHEN FND_API.G_EXC_ERROR THEN
695: FND_MSG_PUB.Count_And_Get (
696: p_encoded => FND_API.G_FALSE,
697: p_count => l_msg_count,
698: p_data => l_msg_data

Line 696: p_encoded => FND_API.G_FALSE,

692:
693: EXCEPTION
694: WHEN FND_API.G_EXC_ERROR THEN
695: FND_MSG_PUB.Count_And_Get (
696: p_encoded => FND_API.G_FALSE,
697: p_count => l_msg_count,
698: p_data => l_msg_data
699: );
700: Handle_Error

Line 762: if (l_return_stat = fnd_api.g_ret_sts_success) then

758: aname => 'APPROVAL_TYPE' );
759:
760: Get_Api_Name('WORKFLOW', l_object, 'NTF_ERROR_ACT',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
761:
762: if (l_return_stat = fnd_api.g_ret_sts_success) then
763: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
764: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
765: else
766: RAISE FND_API.G_EXC_ERROR;

Line 766: RAISE FND_API.G_EXC_ERROR;

762: if (l_return_stat = fnd_api.g_ret_sts_success) then
763: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
764: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
765: else
766: RAISE FND_API.G_EXC_ERROR;
767: end if;
768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN

Line 770: WHEN FND_API.G_EXC_ERROR THEN

766: RAISE FND_API.G_EXC_ERROR;
767: end if;
768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: FND_MSG_PUB.Count_And_Get (
772: p_encoded => FND_API.G_FALSE,
773: p_count => l_msg_count,
774: p_data => l_msg_data

Line 772: p_encoded => FND_API.G_FALSE,

768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: FND_MSG_PUB.Count_And_Get (
772: p_encoded => FND_API.G_FALSE,
773: p_count => l_msg_count,
774: p_data => l_msg_data
775: );
776: Handle_Error

Line 838: if (l_return_stat = fnd_api.g_ret_sts_success) then

834: aname => 'APPROVAL_TYPE' );
835:
836: Get_Api_Name('WORKFLOW', l_object, 'NTF_APPROVAL_REMINDER',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
837:
838: if (l_return_stat = fnd_api.g_ret_sts_success) then
839: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
840: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
841: else
842: RAISE FND_API.G_EXC_ERROR;

Line 842: RAISE FND_API.G_EXC_ERROR;

838: if (l_return_stat = fnd_api.g_ret_sts_success) then
839: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
840: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
841: else
842: RAISE FND_API.G_EXC_ERROR;
843: end if;
844:
845: EXCEPTION
846: WHEN FND_API.G_EXC_ERROR THEN

Line 846: WHEN FND_API.G_EXC_ERROR THEN

842: RAISE FND_API.G_EXC_ERROR;
843: end if;
844:
845: EXCEPTION
846: WHEN FND_API.G_EXC_ERROR THEN
847: FND_MSG_PUB.Count_And_Get (
848: p_encoded => FND_API.G_FALSE,
849: p_count => l_msg_count,
850: p_data => l_msg_data

Line 848: p_encoded => FND_API.G_FALSE,

844:
845: EXCEPTION
846: WHEN FND_API.G_EXC_ERROR THEN
847: FND_MSG_PUB.Count_And_Get (
848: p_encoded => FND_API.G_FALSE,
849: p_count => l_msg_count,
850: p_data => l_msg_data
851: );
852: Handle_Error

Line 916: if (l_return_stat = fnd_api.g_ret_sts_success) then

912: aname => 'APPROVAL_TYPE' );
913:
914: Get_Api_Name('WORKFLOW', l_object, 'NTF_FORWARD_FYI',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
915:
916: if (l_return_stat = fnd_api.g_ret_sts_success) then
917: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
918: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
919: else
920: RAISE FND_API.G_EXC_ERROR;

Line 920: RAISE FND_API.G_EXC_ERROR;

916: if (l_return_stat = fnd_api.g_ret_sts_success) then
917: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
918: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
919: else
920: RAISE FND_API.G_EXC_ERROR;
921: end if;
922:
923: EXCEPTION
924: WHEN FND_API.G_EXC_ERROR THEN

Line 924: WHEN FND_API.G_EXC_ERROR THEN

920: RAISE FND_API.G_EXC_ERROR;
921: end if;
922:
923: EXCEPTION
924: WHEN FND_API.G_EXC_ERROR THEN
925: FND_MSG_PUB.Count_And_Get (
926: p_encoded => FND_API.G_FALSE,
927: p_count => l_msg_count,
928: p_data => l_msg_data

Line 926: p_encoded => FND_API.G_FALSE,

922:
923: EXCEPTION
924: WHEN FND_API.G_EXC_ERROR THEN
925: FND_MSG_PUB.Count_And_Get (
926: p_encoded => FND_API.G_FALSE,
927: p_count => l_msg_count,
928: p_data => l_msg_data
929: );
930: Handle_Error

Line 992: if (l_return_stat = fnd_api.g_ret_sts_success) then

988: aname => 'APPROVAL_TYPE' );
989:
990: Get_Api_Name('WORKFLOW', l_object, 'NTF_APPROVED_FYI',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
991:
992: if (l_return_stat = fnd_api.g_ret_sts_success) then
993: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
994: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
995: else
996: RAISE FND_API.G_EXC_ERROR;

Line 996: RAISE FND_API.G_EXC_ERROR;

992: if (l_return_stat = fnd_api.g_ret_sts_success) then
993: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
994: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
995: else
996: RAISE FND_API.G_EXC_ERROR;
997: end if;
998:
999: EXCEPTION
1000: WHEN FND_API.G_EXC_ERROR THEN

Line 1000: WHEN FND_API.G_EXC_ERROR THEN

996: RAISE FND_API.G_EXC_ERROR;
997: end if;
998:
999: EXCEPTION
1000: WHEN FND_API.G_EXC_ERROR THEN
1001: FND_MSG_PUB.Count_And_Get (
1002: p_encoded => FND_API.G_FALSE,
1003: p_count => l_msg_count,
1004: p_data => l_msg_data

Line 1002: p_encoded => FND_API.G_FALSE,

998:
999: EXCEPTION
1000: WHEN FND_API.G_EXC_ERROR THEN
1001: FND_MSG_PUB.Count_And_Get (
1002: p_encoded => FND_API.G_FALSE,
1003: p_count => l_msg_count,
1004: p_data => l_msg_data
1005: );
1006: Handle_Error

Line 1068: if (l_return_stat = fnd_api.g_ret_sts_success) then

1064: aname => 'APPROVAL_TYPE' );
1065:
1066: Get_Api_Name('WORKFLOW', l_object, 'NTF_REJECTED_FYI',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
1067:
1068: if (l_return_stat = fnd_api.g_ret_sts_success) then
1069: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
1070: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
1071: else
1072: RAISE FND_API.G_EXC_ERROR;

Line 1072: RAISE FND_API.G_EXC_ERROR;

1068: if (l_return_stat = fnd_api.g_ret_sts_success) then
1069: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
1070: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
1071: else
1072: RAISE FND_API.G_EXC_ERROR;
1073: end if;
1074:
1075: EXCEPTION
1076: WHEN FND_API.G_EXC_ERROR THEN

Line 1076: WHEN FND_API.G_EXC_ERROR THEN

1072: RAISE FND_API.G_EXC_ERROR;
1073: end if;
1074:
1075: EXCEPTION
1076: WHEN FND_API.G_EXC_ERROR THEN
1077: FND_MSG_PUB.Count_And_Get (
1078: p_encoded => FND_API.G_FALSE,
1079: p_count => l_msg_count,
1080: p_data => l_msg_data

Line 1078: p_encoded => FND_API.G_FALSE,

1074:
1075: EXCEPTION
1076: WHEN FND_API.G_EXC_ERROR THEN
1077: FND_MSG_PUB.Count_And_Get (
1078: p_encoded => FND_API.G_FALSE,
1079: p_count => l_msg_count,
1080: p_data => l_msg_data
1081: );
1082: Handle_Error

Line 1143: if (l_return_stat = fnd_api.g_ret_sts_success) then

1139: aname => 'APPROVAL_TYPE' );
1140:
1141: Get_Api_Name('WORKFLOW', l_object, 'NTF_FINAL_APPROVAL_FYI',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
1142:
1143: if (l_return_stat = fnd_api.g_ret_sts_success) then
1144: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
1145: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
1146: else
1147: RAISE FND_API.G_EXC_ERROR;

Line 1147: RAISE FND_API.G_EXC_ERROR;

1143: if (l_return_stat = fnd_api.g_ret_sts_success) then
1144: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:document_id,:display_type,:document,:document_type); END;';
1145: EXECUTE IMMEDIATE dml_str USING IN document_id,IN display_type,IN OUT document, IN OUT document_type;
1146: else
1147: RAISE FND_API.G_EXC_ERROR;
1148: end if;
1149:
1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN

Line 1151: WHEN FND_API.G_EXC_ERROR THEN

1147: RAISE FND_API.G_EXC_ERROR;
1148: end if;
1149:
1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN
1152: FND_MSG_PUB.Count_And_Get (
1153: p_encoded => FND_API.G_FALSE,
1154: p_count => l_msg_count,
1155: p_data => l_msg_data

Line 1153: p_encoded => FND_API.G_FALSE,

1149:
1150: EXCEPTION
1151: WHEN FND_API.G_EXC_ERROR THEN
1152: FND_MSG_PUB.Count_And_Get (
1153: p_encoded => FND_API.G_FALSE,
1154: p_count => l_msg_count,
1155: p_data => l_msg_data
1156: );
1157: Handle_Error

Line 1217: if (l_return_status = fnd_api.g_ret_sts_success) then

1213: aname => 'APPROVAL_TYPE' );
1214:
1215: Get_Api_Name('WORKFLOW', l_object, 'UPDATE_STATUS',l_approval_type, l_pkg_name, l_proc_name, l_return_status);
1216:
1217: if (l_return_status = fnd_api.g_ret_sts_success) then
1218: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
1219: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
1220: else
1221: RAISE FND_API.G_EXC_ERROR;

Line 1221: RAISE FND_API.G_EXC_ERROR;

1217: if (l_return_status = fnd_api.g_ret_sts_success) then
1218: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
1219: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
1220: else
1221: RAISE FND_API.G_EXC_ERROR;
1222: end if;
1223:
1224: EXCEPTION
1225: WHEN FND_API.G_EXC_ERROR THEN

Line 1225: WHEN FND_API.G_EXC_ERROR THEN

1221: RAISE FND_API.G_EXC_ERROR;
1222: end if;
1223:
1224: EXCEPTION
1225: WHEN FND_API.G_EXC_ERROR THEN
1226: FND_MSG_PUB.Count_And_Get (
1227: p_encoded => FND_API.G_FALSE,
1228: p_count => l_msg_count,
1229: p_data => l_msg_data

Line 1227: p_encoded => FND_API.G_FALSE,

1223:
1224: EXCEPTION
1225: WHEN FND_API.G_EXC_ERROR THEN
1226: FND_MSG_PUB.Count_And_Get (
1227: p_encoded => FND_API.G_FALSE,
1228: p_count => l_msg_count,
1229: p_data => l_msg_data
1230: );
1231: Handle_Error

Line 1387: if (l_return_stat = fnd_api.g_ret_sts_success) then

1383: aname => 'APPROVAL_TYPE' );
1384:
1385: Get_Api_Name('WORKFLOW', l_object, 'REVERT_STATUS',l_approval_type, l_pkg_name, l_proc_name, l_return_stat);
1386:
1387: if (l_return_stat = fnd_api.g_ret_sts_success) then
1388: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
1389: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
1390: else
1391: RAISE FND_API.G_EXC_ERROR;

Line 1391: RAISE FND_API.G_EXC_ERROR;

1387: if (l_return_stat = fnd_api.g_ret_sts_success) then
1388: dml_str := 'BEGIN ' || l_pkg_name||'.'||l_proc_name||'(:itemtype,:itemkey,:actid,:funcmode,:resultout); END;';
1389: EXECUTE IMMEDIATE dml_str USING IN itemtype,IN itemkey,IN actid,IN funcmode, OUT resultout;
1390: else
1391: RAISE FND_API.G_EXC_ERROR;
1392: end if;
1393:
1394: EXCEPTION
1395: WHEN FND_API.G_EXC_ERROR THEN

Line 1395: WHEN FND_API.G_EXC_ERROR THEN

1391: RAISE FND_API.G_EXC_ERROR;
1392: end if;
1393:
1394: EXCEPTION
1395: WHEN FND_API.G_EXC_ERROR THEN
1396: FND_MSG_PUB.Count_And_Get (
1397: p_encoded => FND_API.G_FALSE,
1398: p_count => l_msg_count,
1399: p_data => l_msg_data

Line 1397: p_encoded => FND_API.G_FALSE,

1393:
1394: EXCEPTION
1395: WHEN FND_API.G_EXC_ERROR THEN
1396: FND_MSG_PUB.Count_And_Get (
1397: p_encoded => FND_API.G_FALSE,
1398: p_count => l_msg_count,
1399: p_data => l_msg_data
1400: );
1401: Handle_Error

Line 1501: x_return_status := FND_API.G_RET_STS_SUCCESS;

1497: WHERE approval_rule_id = x_approval_rule_id;
1498:
1499: BEGIN
1500:
1501: x_return_status := FND_API.G_RET_STS_SUCCESS;
1502:
1503: l_operating_unit_id := nvl(p_object_details.operating_unit_id, l_operating_unit_id);
1504: l_priority := nvl(p_object_details.priority, l_priority);
1505: l_application_usg_code := nvl(p_object_details.application_usg_code, 'AHL');

Line 1525: x_return_status := FND_API.G_RET_STS_ERROR;

1521:
1522: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_RULE_ID');
1523: FND_MSG_PUB.Add;
1524:
1525: x_return_status := FND_API.G_RET_STS_ERROR;
1526: return;
1527:
1528: END IF;
1529: CLOSE c_default_rule;

Line 1545: x_return_status := FND_API.G_RET_STS_ERROR;

1541: CLOSE c_approver_seq;
1542:
1543: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_SEQ');
1544: FND_MSG_PUB.Add;
1545: x_return_status := FND_API.G_RET_STS_ERROR;
1546:
1547: return;
1548:
1549: END IF;

Line 1618: x_return_status := FND_API.G_RET_STS_SUCCESS;

1614: AND delete_flag = 'N'
1615: AND sysdate between rr.start_date_active and nvl(rr.end_date_active,sysdate);
1616:
1617: BEGIN
1618: x_return_status := FND_API.G_RET_STS_SUCCESS;
1619:
1620: OPEN c_approver_info;
1621: FETCH c_approver_info
1622: INTO x_approver_id,

Line 1630: x_return_status := FND_API.G_RET_STS_ERROR;

1626: IF c_approver_info%NOTFOUND THEN
1627: CLOSE c_approver_info;
1628: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_APPROVER_ID');
1629: FND_MSG_PUB.Add;
1630: x_return_status := FND_API.G_RET_STS_ERROR;
1631: return;
1632: END IF;
1633:
1634: IF x_approver_type = 'ROLE' THEN

Line 1645: x_return_status := FND_API.G_RET_STS_ERROR;

1641: IF c_default_role_info%NOTFOUND THEN
1642: CLOSE c_default_role_info ;
1643: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_DEFAULT_ROLE');
1644: FND_MSG_PUB.Add;
1645: x_return_status := FND_API.G_RET_STS_ERROR;
1646: return;
1647: END IF;
1648: CLOSE c_default_role_info ;
1649: end if;

Line 1660: x_return_status := FND_API.G_RET_STS_ERROR;

1656: CLOSE c_role_info_count;
1657:
1658: FND_MESSAGE.Set_Name('AHL','AHL_APRV_MORE_ROLE');
1659: FND_MSG_PUB.Add;
1660: x_return_status := FND_API.G_RET_STS_ERROR;
1661: return;
1662: END IF;
1663: CLOSE c_role_info_count;
1664:

Line 1673: x_return_status := FND_API.G_RET_STS_ERROR;

1669: CLOSE c_role_info;
1670:
1671: FND_MESSAGE.Set_Name('AHL','AHL_APRV_INVALID_ROLE');
1672: FND_MSG_PUB.Add;
1673: x_return_status := FND_API.G_RET_STS_ERROR;
1674: return;
1675: END IF;
1676: CLOSE c_role_info;
1677: END IF; --x_approval_type = ROLE;

Line 1708: x_return_status := FND_API.G_RET_STS_SUCCESS;

1704: AND activity_type = p_activity_type
1705: AND approval_type = p_approval_type;
1706:
1707: BEGIN
1708: x_return_status := FND_API.G_RET_STS_SUCCESS;
1709:
1710: open c_API_Name;
1711: fetch c_API_Name into x_pkg_name, x_proc_name;
1712:

Line 1714: x_return_status := FND_API.G_RET_STS_ERROR;

1710: open c_API_Name;
1711: fetch c_API_Name into x_pkg_name, x_proc_name;
1712:
1713: if c_API_Name%NOTFOUND THEN
1714: x_return_status := FND_API.G_RET_STS_ERROR;
1715: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_API');
1716: FND_MSG_PUB.Add;
1717: end if;
1718: close c_API_Name;

Line 1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1719:
1720: EXCEPTION
1721:
1722: WHEN OTHERS THEN
1723: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1724: RAISE;
1725: END Get_Api_Name;
1726:
1727: --------------------------------------------------------------------------------

Line 1756: p_encoded => FND_API.G_FALSE,

1752: WHILE l_cnt < p_msg_count
1753: LOOP
1754: FND_MSG_PUB.Get
1755: (p_msg_index => l_cnt + 1,
1756: p_encoded => FND_API.G_FALSE,
1757: p_data => l_msg_data,
1758: p_msg_index_out => l_msg_index ) ;
1759:
1760: l_final_data := l_final_data ||l_msg_index||': '

Line 1812: x_return_status := Fnd_Api.g_ret_sts_error;

1808: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
1809: Fnd_Message.set_name ('AHL', 'AHL_APPR_APPUSG_INVALID');
1810: Fnd_Msg_Pub.ADD;
1811: END IF;
1812: x_return_status := Fnd_Api.g_ret_sts_error;
1813: RETURN;
1814: ELSE
1815: CLOSE chk_appl_usg_code;
1816: END IF;

Line 1845: x_return_status := FND_API.G_RET_STS_SUCCESS;

1841: WHERE resource_id = p_resource_id ;
1842:
1843: BEGIN
1844:
1845: x_return_status := FND_API.G_RET_STS_SUCCESS;
1846:
1847: -- Get Employee ID
1848: OPEN c_resource ;
1849: FETCH c_resource INTO l_person_id ;

Line 1852: x_return_status := FND_API.G_RET_STS_ERROR;

1848: OPEN c_resource ;
1849: FETCH c_resource INTO l_person_id ;
1850:
1851: IF c_resource%NOTFOUND THEN
1852: x_return_status := FND_API.G_RET_STS_ERROR;
1853: FND_MESSAGE.Set_Name('AHL','AHL_APRV_NO_RESOURCE');
1854: FND_MSG_PUB.Add;
1855:
1856: END IF;

Line 1867: x_return_status := FND_API.G_RET_STS_ERROR;

1863: p_name => x_role_name,
1864: p_display_name => x_role_display_name );
1865:
1866: IF x_role_name is null then
1867: x_return_status := FND_API.G_RET_STS_ERROR;
1868: FND_MESSAGE.Set_Name('AHL','AHL_APRV_WF_NO_ROLE');
1869: FND_MSG_PUB.Add;
1870:
1871: END IF;

Line 1900: x_required_flag := FND_API.G_FALSE;

1896: OPEN c_check_app;
1897: FETCH c_check_app
1898: INTO x_next_seq;
1899: if c_check_app%NOTFOUND THEN
1900: x_required_flag := FND_API.G_FALSE;
1901: ELSE
1902: x_required_flag := FND_API.G_TRUE;
1903: END IF;
1904: CLOSE c_check_app;

Line 1902: x_required_flag := FND_API.G_TRUE;

1898: INTO x_next_seq;
1899: if c_check_app%NOTFOUND THEN
1900: x_required_flag := FND_API.G_FALSE;
1901: ELSE
1902: x_required_flag := FND_API.G_TRUE;
1903: END IF;
1904: CLOSE c_check_app;
1905: END Check_Approval_Required;
1906: