DBA Data[Home] [Help]

APPS.PV_PRGM_APPROVAL_PVT dependencies on AME_UTIL

Line 83: -- ame_util.booleanAttributeTrue if exists

79: -- IN
80: -- enrollment_request_id NUMBER
81: -- partner_type VARCHAR
82: -- OUT
83: -- ame_util.booleanAttributeTrue if exists
84: -- ame_util.booleanAttributeFalse if not exists
85: -- USED BY
86: -- Program Approval API, and Activate API.
87: -- HISTORY

Line 84: -- ame_util.booleanAttributeFalse if not exists

80: -- enrollment_request_id NUMBER
81: -- partner_type VARCHAR
82: -- OUT
83: -- ame_util.booleanAttributeTrue if exists
84: -- ame_util.booleanAttributeFalse if not exists
85: -- USED BY
86: -- Program Approval API, and Activate API.
87: -- HISTORY
88: -- 12/13/2002 CREATION

Line 115: RETURN ame_util.booleanAttributeTrue;

111: OPEN partnerType_cur(p_partner_id,p_partner_type);
112: FETCH partnerType_cur INTO l_exists_flag;
113: CLOSE partnerType_cur;
114: IF l_exists_flag='Y' THEN
115: RETURN ame_util.booleanAttributeTrue;
116: ELSE
117: RETURN ame_util.booleanAttributeFalse;
118: END IF;
119:

Line 117: RETURN ame_util.booleanAttributeFalse;

113: CLOSE partnerType_cur;
114: IF l_exists_flag='Y' THEN
115: RETURN ame_util.booleanAttributeTrue;
116: ELSE
117: RETURN ame_util.booleanAttributeFalse;
118: END IF;
119:
120: EXCEPTION
121: WHEN NO_DATA_FOUND THEN

Line 122: RETURN ame_util.booleanAttributeFalse;

118: END IF;
119:
120: EXCEPTION
121: WHEN NO_DATA_FOUND THEN
122: RETURN ame_util.booleanAttributeFalse;
123: WHEN OTHERS THEN
124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
125: END isPartnerType;
126:

Line 582: x_nextApproversOut ame_util.approversTable2;

578:
579: FUNCTION isApproverInList (p_enrollment_req_id in number,p_approver_id in number) return boolean is
580:
581: l_isApproverInList boolean:=false;
582: x_nextApproversOut ame_util.approversTable2;
583: xitemIndexesOut ame_util.idList;
584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;

Line 583: xitemIndexesOut ame_util.idList;

579: FUNCTION isApproverInList (p_enrollment_req_id in number,p_approver_id in number) return boolean is
580:
581: l_isApproverInList boolean:=false;
582: x_nextApproversOut ame_util.approversTable2;
583: xitemIndexesOut ame_util.idList;
584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;
587: x_approvalProcessCompleteYNOut VARCHAR2(100);

Line 584: xitemClassesOut ame_util.stringList;

580:
581: l_isApproverInList boolean:=false;
582: x_nextApproversOut ame_util.approversTable2;
583: xitemIndexesOut ame_util.idList;
584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;
587: x_approvalProcessCompleteYNOut VARCHAR2(100);
588: currApprRec ame_util.approverRecord2;

Line 585: xitemIdsOut ame_util.stringList;

581: l_isApproverInList boolean:=false;
582: x_nextApproversOut ame_util.approversTable2;
583: xitemIndexesOut ame_util.idList;
584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;
587: x_approvalProcessCompleteYNOut VARCHAR2(100);
588: currApprRec ame_util.approverRecord2;
589:

Line 586: xitemSourcesOut ame_util.longStringList;

582: x_nextApproversOut ame_util.approversTable2;
583: xitemIndexesOut ame_util.idList;
584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;
587: x_approvalProcessCompleteYNOut VARCHAR2(100);
588: currApprRec ame_util.approverRecord2;
589:
590: BEGIN

Line 588: currApprRec ame_util.approverRecord2;

584: xitemClassesOut ame_util.stringList;
585: xitemIdsOut ame_util.stringList;
586: xitemSourcesOut ame_util.longStringList;
587: x_approvalProcessCompleteYNOut VARCHAR2(100);
588: currApprRec ame_util.approverRecord2;
589:
590: BEGIN
591: -- get all the approver list and loop till you find the matching
592: -- and set the flag to true if you find any.

Line 596: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;

592: -- and set the flag to true if you find any.
593: ----DBMS_OUTPUT.PUT_LINE('before get all approvers');
594:
595: /** Following is required as we expect AME to return their new statuses. Bug # 4879218 **/
596: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;
597:
598: ame_api2.getAllApprovers1
599: ( applicationIdIn =>691,
600: transactionTypeIn => 'ENRQ',

Line 3263: --nextApprover AME_UTIL.APPROVERRECORD;

3259: AND usr.user_id=res.user_id
3260: AND res.category='PARTY';
3261:
3262: l_isPartnerFlag VARCHAR2(1);
3263: --nextApprover AME_UTIL.APPROVERRECORD;
3264: pv_pg_memb_rec PV_Pg_Memberships_PVT.memb_rec_type;
3265: pv_pg_prev_memb_rec PV_Pg_Memberships_PVT.memb_rec_type;
3266: l_approver_rec Pv_Ge_Temp_Approvers_PVT.APPROVER_REC_TYPE;
3267: l_check_row_pa BOOLEAN :=FALSE;

Line 3296: x_nextApproversOut ame_util.approversTable2;

3292: l_approverUserId NUMBER;
3293: l_rec_appr Pv_Ge_Temp_Approvers_PVT.APPROVER_REC_TYPE;
3294: l_approval_status_code VARCHAR2(30);
3295: x_approvalProcessCompleteYNOut VARCHAR2(100);
3296: x_nextApproversOut ame_util.approversTable2;
3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;

Line 3297: xitemIndexesOut ame_util.idList;

3293: l_rec_appr Pv_Ge_Temp_Approvers_PVT.APPROVER_REC_TYPE;
3294: l_approval_status_code VARCHAR2(30);
3295: x_approvalProcessCompleteYNOut VARCHAR2(100);
3296: x_nextApproversOut ame_util.approversTable2;
3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;

Line 3298: xitemClassesOut ame_util.stringList;

3294: l_approval_status_code VARCHAR2(30);
3295: x_approvalProcessCompleteYNOut VARCHAR2(100);
3296: x_nextApproversOut ame_util.approversTable2;
3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;

Line 3299: xitemIdsOut ame_util.stringList;

3295: x_approvalProcessCompleteYNOut VARCHAR2(100);
3296: x_nextApproversOut ame_util.approversTable2;
3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;

Line 3300: xitemSourcesOut ame_util.longStringList;

3296: x_nextApproversOut ame_util.approversTable2;
3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;

Line 3301: xproductionIndexesOut ame_util.idList;

3297: xitemIndexesOut ame_util.idList;
3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;

Line 3302: xvariableNamesOut ame_util.stringList;

3298: xitemClassesOut ame_util.stringList;
3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;

Line 3303: xvariableValuesOut ame_util.stringList;

3299: xitemIdsOut ame_util.stringList;
3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;
3307: currApprRec ame_util.approverRecord2;

Line 3304: xtransVariableNamesOut ame_util.stringList;

3300: xitemSourcesOut ame_util.longStringList;
3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;
3307: currApprRec ame_util.approverRecord2;
3308:

Line 3305: xtransVariableValuesOut ame_util.stringList;

3301: xproductionIndexesOut ame_util.idList;
3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;
3307: currApprRec ame_util.approverRecord2;
3308:
3309: BEGIN

Line 3306: adminApprRec ame_util.approverRecord2;

3302: xvariableNamesOut ame_util.stringList;
3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;
3307: currApprRec ame_util.approverRecord2;
3308:
3309: BEGIN
3310: -- call AME api to get the next

Line 3307: currApprRec ame_util.approverRecord2;

3303: xvariableValuesOut ame_util.stringList;
3304: xtransVariableNamesOut ame_util.stringList;
3305: xtransVariableValuesOut ame_util.stringList;
3306: adminApprRec ame_util.approverRecord2;
3307: currApprRec ame_util.approverRecord2;
3308:
3309: BEGIN
3310: -- call AME api to get the next
3311: SAVEPOINT submit_enrl_req_for_approval;

Line 3341: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;

3337: CLOSE c_enrl_cur;
3338:
3339:
3340: /** Following is required as we expect AME to return their new statuses. Bug # 4879218 **/
3341: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;
3342:
3343: AME_API2.getNextApprovers3
3344: ( applicationIdIn => 691
3345: , transactionTypeIn => 'ENRQ'

Line 3347: , flagApproversAsNotifiedIn => ame_util.booleanTrue

3343: AME_API2.getNextApprovers3
3344: ( applicationIdIn => 691
3345: , transactionTypeIn => 'ENRQ'
3346: , transactionIdIn => enrl_request_id
3347: , flagApproversAsNotifiedIn => ame_util.booleanTrue
3348: , approvalProcessCompleteYNOut => x_approvalProcessCompleteYNOut
3349: , nextApproversOut => x_nextApproversOut
3350: , itemIndexesOut => xitemIndexesOut
3351: , itemClassesOut => xitemClassesOut

Line 3362: If x_approvalProcessCompleteYNOut=ame_util2.completeFullyApproved THEN

3358: , transVariableValuesOut => xtransVariableValuesOut
3359: );
3360:
3361:
3362: If x_approvalProcessCompleteYNOut=ame_util2.completeFullyApproved THEN
3363: -- This means there are no more approvers to approve and approval is complete
3364: l_check_row_pa:=check_pending_approval(enrl_request_id);--this should be queried with status 'pending approval'
3365: IF l_check_row_pa =true AND g_isApproverInList=true THEN
3366:

Line 3460: ELSIF x_approvalProcessCompleteYNOut=ame_util2.completeNoApprovers THEN

3456:
3457: END IF;
3458:
3459:
3460: ELSIF x_approvalProcessCompleteYNOut=ame_util2.completeNoApprovers THEN
3461: -- This means no appprovers are returned by OAM which means route the request to default approver
3462:
3463: /**this means that there is no rule satisfying the criteria. so find OUT the
3464: the default approver from the profile value and send the FYI

Line 3745: ELSIF x_approvalProcessCompleteYNOut = ame_util2.notCompleted THEN

3741: ) ;
3742: END IF;
3743: ----DBMS_OUTPUT.PUT_LINE('after finishing workflow process');
3744:
3745: ELSIF x_approvalProcessCompleteYNOut = ame_util2.notCompleted THEN
3746: /* We need to update temp approvers table record with approved status
3747: for the logged in user for this enrollment request. The approval status
3748: for the logged in user can be only approved in this scenario.
3749: */

Line 3781: /**if nextApprover.approval_status = ame_util.exception, it means an error has occurred

3777: RAISE FND_API.g_exc_unexpected_error;
3778: END IF;
3779: END IF;
3780: ----DBMS_OUTPUT.PUT_LINE('iafter temp');
3781: /**if nextApprover.approval_status = ame_util.exception, it means an error has occurred
3782: it may return the admin approver or it may just return a exception status
3783: write to enrollment logs that there is an error
3784: */
3785:

Line 3788: IF (adminApprRec.approval_status = ame_util.exceptionStatus) THEN

3784: */
3785:
3786: IF x_nextApproversOut.COUNT>0 THEN
3787: adminApprRec := x_nextApproversOut(1);
3788: IF (adminApprRec.approval_status = ame_util.exceptionStatus) THEN
3789: IF adminApprRec.name IS NOT NULL THEN
3790: l_admin_id := adminApprRec.orig_system_id;
3791: l_admin_type:=adminApprRec.orig_system;
3792: l_param_tbl_var(1).param_name := 'ADMINISTRATOR';

Line 3870: IF x_nextApproversOut.COUNT>0 and x_approvalProcessCompleteYNOut=ame_util2.notCompleted THEN

3866: approvers has any record with 'PENDING_APPROVAL' status, then it needs to be updated
3867: with status 'PEER_RESPONDED'
3868: */
3869:
3870: IF x_nextApproversOut.COUNT>0 and x_approvalProcessCompleteYNOut=ame_util2.notCompleted THEN
3871: l_approver_rec:=NULL;
3872: FOR x in pending_appovers_csr(enrl_request_id) LOOP
3873: l_approver_rec.entity_approver_id :=x.entity_approver_id;
3874: l_approver_rec.object_version_number:=x.object_version_number;

Line 4197: l_approvalStatus:=ame_util.approvedStatus;

4193: FND_MSG_PUB.add;
4194: RAISE FND_API.G_EXC_ERROR;
4195: END IF;
4196:
4197: l_approvalStatus:=ame_util.approvedStatus;
4198: l_message_code :='PV_ENR_REQ_APPROVED_BY_APPR';
4199:
4200: --update enrollments table with the start and end date
4201: l_enrq_rec.enrl_request_id:=enrl_request_id;

Line 4221: l_approvalStatus:=ame_util.rejectStatus;

4217: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
4218: RAISE FND_API.g_exc_unexpected_error;
4219: END IF;
4220: ELSE
4221: l_approvalStatus:=ame_util.rejectStatus;
4222: l_message_code :='PV_ENR_REQ_REJECTED';
4223: END IF;
4224:
4225:

Line 4282: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;

4278:
4279: IF g_isApproverInList=true THEN
4280:
4281: /** Following is required as we expect AME to return their new statuses. Bug # 4879218 **/
4282: ame_util2.detailedApprovalStatusFlagYN := ame_util.booleanTrue;
4283:
4284: ame_api2.updateApprovalStatus2
4285: ( applicationIdIn => 691
4286: , transactionTypeIn => 'ENRQ'