[Home] [Help]
2260: /************** END ENCUMBRANCE CHECK PARAMS *****************************/
2261: l_debug VARCHAR2 (1);
2262: l_rec_found NUMBER;
2263: l_valid_params VARCHAR2 (1);
2264: l_exception igc_cc_process_exceptions.exception_reason%TYPE;
2265: l_header_id igc_cc_headers.cc_header_id%TYPE;
2266: l_cc_num igc_cc_headers.cc_num%TYPE;
2267: l_lock_cc_status BOOLEAN;
2268: l_lock_po_status BOOLEAN;
2283: l_return_status VARCHAR2 (1);
2284: l_msg_count NUMBER;
2285: l_msg_data VARCHAR2 (12000);
2286: l_error_text VARCHAR2 (12000);
2287: l_usr_msg igc_cc_process_exceptions.exception_reason%TYPE;
2288: l_err_mesg igc_cc_process_exceptions.exception_reason%TYPE;
2289: l_fail VARCHAR2 (1);
2290: l_full_path VARCHAR2 (255);
2291: ------Variables related to XML Report
2284: l_msg_count NUMBER;
2285: l_msg_data VARCHAR2 (12000);
2286: l_error_text VARCHAR2 (12000);
2287: l_usr_msg igc_cc_process_exceptions.exception_reason%TYPE;
2288: l_err_mesg igc_cc_process_exceptions.exception_reason%TYPE;
2289: l_fail VARCHAR2 (1);
2290: l_full_path VARCHAR2 (255);
2291: ------Variables related to XML Report
2292: l_terr VARCHAR2(10):='US';
2422: END IF;
2423:
2424: IF (l_budg_status = FALSE) AND (l_usr_msg IS NOT NULL)
2425: THEN
2426: INSERT INTO igc_cc_process_exceptions
2427: (process_type, process_phase, cc_header_id,
2428: cc_acct_line_id, cc_det_pf_line_id, exception_reason,
2429: org_id, set_of_books_id, request_id
2430: )
2531: RETURN;
2532: END IF;
2533:
2534: /* End bug fix 1576023 */
2535: /*Perform the clean-up operation of IGC_CC_PROCESS_DATA and IGC_CC_PROCESS_EXCEPTIONS */
2536: SAVEPOINT s1; /* Flag 1 Marked for the Complete Roll back */
2537:
2538: /* Deletes from IGC_CC_PROCESS_DATA with PHASE - Preliminary and TYPE - MPFS */
2539: DELETE FROM igc_cc_process_data a
2541: AND a.process_phase = 'P'
2542: AND a.org_id = l_org_id
2543: AND a.set_of_books_id = l_sob_id;
2544:
2545: /* Deletes from IGC_CC_PROCESS_EXCEPTIONS with Type - MPFS */
2546: DELETE FROM igc_cc_process_exceptions b
2547: WHERE b.process_type = l_process_type
2548: AND b.org_id = l_org_id
2549: AND b.set_of_books_id = l_sob_id;
2542: AND a.org_id = l_org_id
2543: AND a.set_of_books_id = l_sob_id;
2544:
2545: /* Deletes from IGC_CC_PROCESS_EXCEPTIONS with Type - MPFS */
2546: DELETE FROM igc_cc_process_exceptions b
2547: WHERE b.process_type = l_process_type
2548: AND b.org_id = l_org_id
2549: AND b.set_of_books_id = l_sob_id;
2550:
2634: END IF;
2635:
2636: l_exception := fnd_message.get;
2637:
2638: INSERT INTO igc_cc_process_exceptions
2639: (process_type, process_phase, cc_header_id,
2640: cc_acct_line_id, cc_det_pf_line_id,
2641: exception_reason, org_id, set_of_books_id,
2642: request_id
2753: END IF;
2754:
2755: l_exception := fnd_message.get;
2756:
2757: INSERT INTO igc_cc_process_exceptions
2758: (process_type, process_phase, cc_header_id,
2759: cc_acct_line_id, cc_det_pf_line_id,
2760: exception_reason, org_id, set_of_books_id,
2761: request_id
2858: END IF;
2859:
2860: l_exception := fnd_message.get;
2861:
2862: INSERT INTO igc_cc_process_exceptions
2863: (process_type, process_phase, cc_header_id,
2864: cc_acct_line_id, cc_det_pf_line_id, exception_reason,
2865: org_id, set_of_books_id, request_id
2866: )
2899:
2900: BEGIN
2901: SELECT 'X'
2902: INTO l_dummy
2903: FROM igc_cc_process_exceptions
2904: WHERE cc_header_id = v4.cc_header_id
2905: AND cc_acct_line_id IS NULL
2906: AND cc_det_pf_line_id IS NULL
2907: AND org_id = l_org_id
2927: END IF;
2928:
2929: l_exception := fnd_message.get;
2930:
2931: INSERT INTO igc_cc_process_exceptions
2932: (process_type, process_phase,
2933: cc_header_id, cc_acct_line_id,
2934: cc_det_pf_line_id, exception_reason,
2935: org_id, set_of_books_id, request_id
2991: END IF;
2992:
2993: l_exception := fnd_message.get;
2994:
2995: INSERT INTO igc_cc_process_exceptions
2996: (process_type, process_phase,
2997: cc_header_id, cc_acct_line_id,
2998: cc_det_pf_line_id, exception_reason, org_id,
2999: set_of_books_id, request_id
3051: END IF;
3052:
3053: l_exception := fnd_message.get;
3054:
3055: INSERT INTO igc_cc_process_exceptions
3056: (process_type, process_phase,
3057: cc_header_id, cc_acct_line_id,
3058: cc_det_pf_line_id, exception_reason,
3059: org_id, set_of_books_id, request_id
3078:
3079: BEGIN
3080: SELECT 'X'
3081: INTO l_dummy
3082: FROM igc_cc_process_exceptions
3083: WHERE cc_header_id = v4.cc_header_id
3084: AND cc_acct_line_id = v4.cc_acct_line_id
3085: AND cc_det_pf_line_id IS NULL
3086: AND org_id = l_org_id
3103: END IF;
3104:
3105: l_exception := fnd_message.get;
3106:
3107: INSERT INTO igc_cc_process_exceptions
3108: (process_type, process_phase,
3109: cc_header_id, cc_acct_line_id,
3110: cc_det_pf_line_id, exception_reason,
3111: org_id, set_of_books_id, request_id
3130:
3131: BEGIN
3132: SELECT 'X'
3133: INTO l_dummy
3134: FROM igc_cc_process_exceptions
3135: WHERE cc_header_id = v4.cc_header_id
3136: AND cc_acct_line_id = v4.cc_acct_line_id
3137: AND cc_det_pf_line_id = v7.cc_det_pf_line_id
3138: AND org_id = l_org_id
3160: END IF;
3161:
3162: l_exception := fnd_message.get;
3163:
3164: INSERT INTO igc_cc_process_exceptions
3165: (process_type, process_phase,
3166: cc_header_id, cc_acct_line_id,
3167: cc_det_pf_line_id, exception_reason,
3168: org_id, set_of_books_id, request_id
3187:
3188: BEGIN
3189: SELECT 'X'
3190: INTO l_dummy
3191: FROM igc_cc_process_exceptions
3192: WHERE cc_header_id = v4.cc_header_id
3193: AND cc_acct_line_id = v4.cc_acct_line_id
3194: AND cc_det_pf_line_id = v7.cc_det_pf_line_id
3195: AND org_id = l_org_id
3217: END IF;
3218:
3219: l_exception := fnd_message.get;
3220:
3221: INSERT INTO igc_cc_process_exceptions
3222: (process_type, process_phase,
3223: cc_header_id, cc_acct_line_id,
3224: cc_det_pf_line_id, exception_reason,
3225: org_id, set_of_books_id, request_id
3239:
3240: BEGIN
3241: SELECT 'X'
3242: INTO l_DUMMY
3243: FROM igc_cc_process_exceptions
3244: WHERE cc_header_id = V4.cc_header_id
3245: AND cc_acct_line_id IS NULL
3246: AND org_id = l_org_id
3247: AND process_type = l_process_type
3260: l_EXCEPTION := NULL;
3261: FND_MESSAGE.SET_NAME('IGC','IGC_CC_MPFS_TGT_PF_NOT_FOUND');
3262: FND_MESSAGE.SET_TOKEN('CC_NUM',V4.cc_num,TRUE);
3263: l_EXCEPTION := FND_MESSAGE.GET;
3264: INSERT INTO igc_cc_process_exceptions
3265: (PROCESS_TYPE ,
3266: PROCESS_PHASE ,
3267: CC_HEADER_ID ,
3268: CC_ACCT_LINE_ID ,
3395: || ' *************************'
3396: );
3397: END IF;
3398:
3399: INSERT INTO igc_cc_process_exceptions
3400: (process_type, process_phase, cc_header_id,
3401: cc_acct_line_id, cc_det_pf_line_id,
3402: exception_reason, org_id, set_of_books_id,
3403: request_id
3452: END IF;
3453:
3454: l_exception := fnd_message.get;
3455:
3456: INSERT INTO igc_cc_process_exceptions
3457: (process_type, process_phase, cc_header_id,
3458: cc_acct_line_id, cc_det_pf_line_id,
3459: exception_reason, org_id, set_of_books_id,
3460: request_id
3504:
3505: BEGIN
3506: SELECT 'X'
3507: INTO l_dummy
3508: FROM igc_cc_process_exceptions
3509: WHERE cc_header_id = v4_1.cc_header_id
3510: AND cc_acct_line_id IS NULL
3511: AND cc_det_pf_line_id IS NULL
3512: AND org_id = l_org_id
3534: END IF;
3535:
3536: l_exception := fnd_message.get;
3537:
3538: INSERT INTO igc_cc_process_exceptions
3539: (process_type, process_phase,
3540: cc_header_id, cc_acct_line_id,
3541: cc_det_pf_line_id, exception_reason,
3542: org_id, set_of_books_id, request_id
3612: TRUE
3613: );
3614: l_exception := fnd_message.get;
3615:
3616: INSERT INTO igc_cc_process_exceptions
3617: (process_type, process_phase,
3618: cc_header_id, cc_acct_line_id,
3619: cc_det_pf_line_id, exception_reason,
3620: org_id, set_of_books_id, request_id
3683: END IF;
3684:
3685: l_exception := fnd_message.get;
3686:
3687: INSERT INTO igc_cc_process_exceptions
3688: (process_type, process_phase,
3689: cc_header_id, cc_acct_line_id,
3690: cc_det_pf_line_id, exception_reason,
3691: org_id, set_of_books_id, request_id
3729:
3730: BEGIN
3731: SELECT 'X'
3732: INTO l_dummy
3733: FROM igc_cc_process_exceptions
3734: WHERE cc_header_id = v4_1.cc_header_id
3735: AND cc_acct_line_id = v4_2.cc_acct_line_id
3736: AND cc_det_pf_line_id IS NULL
3737: AND org_id = l_org_id
3755: END IF;
3756:
3757: l_exception := fnd_message.get;
3758:
3759: INSERT INTO igc_cc_process_exceptions
3760: (process_type, process_phase,
3761: cc_header_id, cc_acct_line_id,
3762: cc_det_pf_line_id, exception_reason,
3763: org_id, set_of_books_id, request_id
3823:
3824: BEGIN
3825: SELECT 'X'
3826: INTO l_dummy
3827: FROM igc_cc_process_exceptions
3828: WHERE cc_header_id = v4_1.cc_header_id
3829: AND cc_acct_line_id = v4_2.cc_acct_line_id
3830: AND cc_det_pf_line_id = v7.cc_det_pf_line_id
3831: AND org_id = l_org_id
3855: END IF;
3856:
3857: l_exception := fnd_message.get;
3858:
3859: INSERT INTO igc_cc_process_exceptions
3860: (process_type, process_phase,
3861: cc_header_id, cc_acct_line_id,
3862: cc_det_pf_line_id, exception_reason,
3863: org_id, set_of_books_id, request_id
3912:
3913: BEGIN
3914: SELECT 'X'
3915: INTO l_dummy
3916: FROM igc_cc_process_exceptions
3917: WHERE cc_header_id = v4_1.cc_header_id
3918: AND cc_acct_line_id = v4_2.cc_acct_line_id
3919: AND cc_det_pf_line_id = v7.cc_det_pf_line_id
3920: AND org_id = l_org_id
3944: END IF;
3945:
3946: l_exception := fnd_message.get;
3947:
3948: INSERT INTO igc_cc_process_exceptions
3949: (process_type, process_phase,
3950: cc_header_id, cc_acct_line_id,
3951: cc_det_pf_line_id, exception_reason,
3952: org_id, set_of_books_id, request_id
3966:
3967: BEGIN
3968: SELECT 'X'
3969: INTO l_DUMMY
3970: FROM igc_cc_process_exceptions
3971: WHERE cc_header_id = V4.cc_header_id
3972: AND cc_acct_line_id IS NULL
3973: AND org_id = l_org_id
3974: AND process_type = l_process_type
3987: l_EXCEPTION := NULL;
3988: FND_MESSAGE.SET_NAME('IGC','IGC_CC_MPFS_TGT_PF_NOT_FOUND');
3989: FND_MESSAGE.SET_TOKEN('CC_NUM',V4.cc_num,TRUE);
3990: l_EXCEPTION := FND_MESSAGE.GET;
3991: INSERT INTO igc_cc_process_exceptions
3992: (PROCESS_TYPE ,
3993: PROCESS_PHASE ,
3994: CC_HEADER_ID ,
3995: CC_ACCT_LINE_ID ,
4232: END IF;
4233:
4234: ROLLBACK TO s2;
4235:
4236: INSERT INTO igc_cc_process_exceptions
4237: (process_type, process_phase,
4238: cc_header_id, cc_acct_line_id,
4239: cc_det_pf_line_id, exception_reason, org_id,
4240: set_of_books_id, request_id
4266: END IF;
4267:
4268: l_exception := fnd_message.get;
4269:
4270: INSERT INTO igc_cc_process_exceptions
4271: (process_type, process_phase, cc_header_id,
4272: cc_acct_line_id, cc_det_pf_line_id,
4273: exception_reason, org_id, set_of_books_id,
4274: request_id
4350: -- This ends the Final Mode Check
4351: END IF;
4352: -- If Paramer Validation fails the program logic is jumped here.
4353: ELSE
4354: INSERT INTO igc_cc_process_exceptions
4355: (process_type, process_phase, cc_header_id,
4356: cc_acct_line_id, cc_det_pf_line_id, exception_reason,
4357: org_id, set_of_books_id, request_id
4358: )
4370: END IF;
4371:
4372: l_exception := fnd_message.get;
4373:
4374: INSERT INTO igc_cc_process_exceptions
4375: (process_type, process_phase, cc_header_id,
4376: cc_acct_line_id, cc_det_pf_line_id, exception_reason,
4377: org_id, set_of_books_id, request_id
4378: )