221: x_rules_list OUT NOCOPY /* file.sql.39 change */ aso_apr_pub.rules_list_tbl_type
222: ) IS
223: l_api_name CONSTANT VARCHAR2 (30) := 'GET_ALL_APPROVERS';
224: l_api_version CONSTANT NUMBER := 1.0;
225: approvers ame_util.approverstable;
226: ruleids ame_util.idlist;
227: ruledescriptions ame_util.stringlist;
228: l_ruletypeout VARCHAR2 (240);
229: l_conditionidsout ame_util.idlist;
222: ) IS
223: l_api_name CONSTANT VARCHAR2 (30) := 'GET_ALL_APPROVERS';
224: l_api_version CONSTANT NUMBER := 1.0;
225: approvers ame_util.approverstable;
226: ruleids ame_util.idlist;
227: ruledescriptions ame_util.stringlist;
228: l_ruletypeout VARCHAR2 (240);
229: l_conditionidsout ame_util.idlist;
230: l_approvaltypenameout VARCHAR2 (240);
223: l_api_name CONSTANT VARCHAR2 (30) := 'GET_ALL_APPROVERS';
224: l_api_version CONSTANT NUMBER := 1.0;
225: approvers ame_util.approverstable;
226: ruleids ame_util.idlist;
227: ruledescriptions ame_util.stringlist;
228: l_ruletypeout VARCHAR2 (240);
229: l_conditionidsout ame_util.idlist;
230: l_approvaltypenameout VARCHAR2 (240);
231: l_approvaltypedescriptionout VARCHAR2 (240);
225: approvers ame_util.approverstable;
226: ruleids ame_util.idlist;
227: ruledescriptions ame_util.stringlist;
228: l_ruletypeout VARCHAR2 (240);
229: l_conditionidsout ame_util.idlist;
230: l_approvaltypenameout VARCHAR2 (240);
231: l_approvaltypedescriptionout VARCHAR2 (240);
232: m integer;
233: BEGIN
358: END IF;
359:
360:
361: -- Added code to check if it is a self-approval case
362: IF ((approvers.count = 1) and (approvers(1).approval_status = ame_util.approvedStatus)) THEN
363:
364: -- the requester is approver in this case
365: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
366: aso_debug_pub.add('Self approval case -- requester is only approver', 1, 'N');
1668: x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
1669: IS
1670: l_api_name CONSTANT VARCHAR2 (30) := 'get_rule_details';
1671: l_api_version CONSTANT NUMBER := 1.0;
1672: ruledescriptions ame_util.stringlist;
1673: l_ruletypeout VARCHAR2 (240);
1674: l_conditionidsout ame_util.idlist;
1675: l_approvaltypenameout VARCHAR2 (240);
1676: l_approvaltypedescriptionout VARCHAR2 (240);
1670: l_api_name CONSTANT VARCHAR2 (30) := 'get_rule_details';
1671: l_api_version CONSTANT NUMBER := 1.0;
1672: ruledescriptions ame_util.stringlist;
1673: l_ruletypeout VARCHAR2 (240);
1674: l_conditionidsout ame_util.idlist;
1675: l_approvaltypenameout VARCHAR2 (240);
1676: l_approvaltypedescriptionout VARCHAR2 (240);
1677: j INTEGER:=1;
1678: CURSOR get_rule_ids( c_obj_app_id NUMBER)