DBA Data[Home] [Help]

APPS.GMS_BILLING_ADJUSTMENTS dependencies on GMS_BILLING_ADJUSTMENTS

Line 1: PACKAGE BODY GMS_BILLING_ADJUSTMENTS AS

1: PACKAGE BODY GMS_BILLING_ADJUSTMENTS AS
2: -- $Header: gmsinadb.pls 120.3 2006/03/23 20:42:31 appldev ship $
3:
4: -- To check on, whether to print debug messages in log file or not
5: L_DEBUG varchar2(1) := NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N');

Line 939: FND_MESSAGE.SET_NAME('GMS','GMS_BILLING_ADJUSTMENTS');

935: expenditure_item_id = X_Expenditure_Item_Id;
936:
937: If SQL%NOTFOUND THEN
938: X_Err_Code := 'E';
939: FND_MESSAGE.SET_NAME('GMS','GMS_BILLING_ADJUSTMENTS');
940: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE','No Expenditure Line Updated');
941: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_BILLING_ADJUSTMENTS : UPD_GET_PA_EXP_INFO');
942: X_Err_Buff := FND_MESSAGE.GET;
943: pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.UPD_GET_PA_EXP_INFO'

Line 941: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_BILLING_ADJUSTMENTS : UPD_GET_PA_EXP_INFO');

937: If SQL%NOTFOUND THEN
938: X_Err_Code := 'E';
939: FND_MESSAGE.SET_NAME('GMS','GMS_BILLING_ADJUSTMENTS');
940: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE','No Expenditure Line Updated');
941: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_BILLING_ADJUSTMENTS : UPD_GET_PA_EXP_INFO');
942: X_Err_Buff := FND_MESSAGE.GET;
943: pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.UPD_GET_PA_EXP_INFO'
944: ,x_message => X_Err_Buff
945: ,x_error_message => X_pa_Err_Msg

Line 943: pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.UPD_GET_PA_EXP_INFO'

939: FND_MESSAGE.SET_NAME('GMS','GMS_BILLING_ADJUSTMENTS');
940: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE','No Expenditure Line Updated');
941: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_BILLING_ADJUSTMENTS : UPD_GET_PA_EXP_INFO');
942: X_Err_Buff := FND_MESSAGE.GET;
943: pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.UPD_GET_PA_EXP_INFO'
944: ,x_message => X_Err_Buff
945: ,x_error_message => X_pa_Err_Msg
946: ,x_status => X_pa_Status);
947: RAISE_APPLICATION_ERROR(-20008,X_Err_Buff);

Line 2495: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('DELETE',

2491: END IF;
2492: /* GMS INSTALLATION CHECK */
2493: If gms_install.enabled then
2494:
2495: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('DELETE',
2496: 'Invoice',
2497: X_project_id,
2498: NULL,
2499: NULL,

Line 2506: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.DELINV'

2502: NULL,
2503: X_retcode,
2504: X_errbuf);
2505: If X_retcode <> 'S' then
2506: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.DELINV'
2507: ,x_message => X_errbuf
2508: ,x_error_message => X_Err_Msg
2509: ,x_status => X_Status); */
2510: RAISE_APPLICATION_ERROR(-20226,X_errbuf);

Line 2578: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('CANCEL',

2574: ,x_status => X_Status); */
2575: RAISE_APPLICATION_ERROR(-20027,X_Err_Buff);
2576: End;
2577:
2578: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('CANCEL',
2579: 'Invoice',
2580: X_project_id,
2581: X_Draft_Invoice_Num_Credited,
2582: NULL,

Line 2589: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.CANINV'

2585: NULL,
2586: X_retcode,
2587: X_errbuf);
2588:
2589: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.CANINV'
2590: ,x_message => 'Retcode is '||X_retcode
2591: ,x_error_message => X_Err_Msg
2592: ,x_status => X_Status);
2593: */

Line 2596: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.CANINV'

2592: ,x_status => X_Status);
2593: */
2594: If X_retcode <> 'S' then
2595:
2596: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.CANINV'
2597: ,x_message => X_Errbuf
2598: ,x_error_message => X_Err_Msg
2599: ,x_status => X_Status); */
2600: RAISE_APPLICATION_ERROR(-20228,X_Errbuf);

Line 2648: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('WRITE_OFF',

2644: nvl(concession_flag,'N') = 'Y');
2645:
2646: g_request_id := X_request_id;
2647:
2648: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('WRITE_OFF',
2649: 'Invoice',
2650: X_project_id,
2651: X_Draft_Invoice_Num_Credited,
2652: NULL,

Line 2726: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('DELETE',

2722:
2723: /* GMS INSTALLATION CHECK */
2724: If gms_install.enabled then
2725:
2726: GMS_BILLING_ADJUSTMENTS.PERFORM_REV_BILL_ADJS('DELETE',
2727: 'Revenue',
2728: X_project_id,
2729: NULL,
2730: NULL,

Line 2737: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.DELREV'

2733: NULL,
2734: X_retcode,
2735: X_errbuf);
2736: If X_retcode <> 'S' then
2737: /* pa_billing_pub.insert_message(X_INSERTING_PROCEDURE_NAME => 'GMS_BILLING_ADJUSTMENTS.DELREV'
2738: ,x_message => X_errbuf
2739: ,x_error_message => X_Err_Msg
2740: ,x_status => X_Status);
2741: */

Line 2753: End GMS_BILLING_ADJUSTMENTS;

2749: END IF;
2750:
2751: End DELREV;
2752:
2753: End GMS_BILLING_ADJUSTMENTS;