DBA Data[Home] [Help]

APPS.GMS_MULTI_FUNDING dependencies on FND_API

Line 270: RAISE FND_API.G_EXC_ERROR;

266:
267: IF l_Return_Status <> 'S' THEN
268: X_Err_Stage := l_Msg_Data;
269: X_Err_Code := l_Return_Status;
270: RAISE FND_API.G_EXC_ERROR;
271: END IF;
272:
273: -- Create Options for the award project template.
274: /* bug 5282308 - commented the insert */

Line 306: WHEN FND_API.G_EXC_ERROR THEN

302:
303: END IF;
304:
305: EXCEPTION
306: WHEN FND_API.G_EXC_ERROR THEN
307: X_ERR_CODE := l_return_status;
308: X_ERR_STAGE := l_msg_data;
309:
310: WHEN OTHERS THEN

Line 355: p_init_msg_list => FND_API.G_TRUE,

351: X_err_code := 'S';
352:
353: IF l_project_id IS NULL AND x_field_name = 'BILL_TO_CUSTOMER' THEN
354: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
355: p_init_msg_list => FND_API.G_TRUE,
356: p_commit => FND_API.G_FALSE,
357: p_validate_only => FND_API.G_FALSE,
358: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
359: p_calling_module => 'FORM',

Line 356: p_commit => FND_API.G_FALSE,

352:
353: IF l_project_id IS NULL AND x_field_name = 'BILL_TO_CUSTOMER' THEN
354: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
355: p_init_msg_list => FND_API.G_TRUE,
356: p_commit => FND_API.G_FALSE,
357: p_validate_only => FND_API.G_FALSE,
358: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
359: p_calling_module => 'FORM',
360: p_debug_mode => 'N',

Line 357: p_validate_only => FND_API.G_FALSE,

353: IF l_project_id IS NULL AND x_field_name = 'BILL_TO_CUSTOMER' THEN
354: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
355: p_init_msg_list => FND_API.G_TRUE,
356: p_commit => FND_API.G_FALSE,
357: p_validate_only => FND_API.G_FALSE,
358: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
359: p_calling_module => 'FORM',
360: p_debug_mode => 'N',
361: p_max_msg_count => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 358: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

354: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
355: p_init_msg_list => FND_API.G_TRUE,
356: p_commit => FND_API.G_FALSE,
357: p_validate_only => FND_API.G_FALSE,
358: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
359: p_calling_module => 'FORM',
360: p_debug_mode => 'N',
361: p_max_msg_count => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
362: p_project_id => x_award_project_id,

Line 378: RAISE FND_API.G_EXC_ERROR;

374: --To be more precise, call appropriate exception handler
375: IF x_Return_Status <> 'S' THEN
376: X_Err_Code := x_Return_Status;
377: X_Err_Stage := x_Msg_Data;
378: RAISE FND_API.G_EXC_ERROR;
379: END IF;
380:
381: END IF;
382:

Line 385: p_init_msg_list => FND_API.G_TRUE,

381: END IF;
382:
383: IF l_project_id IS NULL AND x_field_name = 'SHIP_TO_CUSTOMER' THEN
384: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
385: p_init_msg_list => FND_API.G_TRUE,
386: p_commit => FND_API.G_FALSE,
387: p_validate_only => FND_API.G_FALSE,
388: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
389: p_calling_module => 'FORM',

Line 386: p_commit => FND_API.G_FALSE,

382:
383: IF l_project_id IS NULL AND x_field_name = 'SHIP_TO_CUSTOMER' THEN
384: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
385: p_init_msg_list => FND_API.G_TRUE,
386: p_commit => FND_API.G_FALSE,
387: p_validate_only => FND_API.G_FALSE,
388: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
389: p_calling_module => 'FORM',
390: p_debug_mode => 'N',

Line 387: p_validate_only => FND_API.G_FALSE,

383: IF l_project_id IS NULL AND x_field_name = 'SHIP_TO_CUSTOMER' THEN
384: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
385: p_init_msg_list => FND_API.G_TRUE,
386: p_commit => FND_API.G_FALSE,
387: p_validate_only => FND_API.G_FALSE,
388: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
389: p_calling_module => 'FORM',
390: p_debug_mode => 'N',
391: p_max_msg_count => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 388: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

384: PA_PROJ_TEMPLATE_SETUP_PUB.ADD_QUICK_ENTRY_FIELD( p_api_version => 1.0,
385: p_init_msg_list => FND_API.G_TRUE,
386: p_commit => FND_API.G_FALSE,
387: p_validate_only => FND_API.G_FALSE,
388: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
389: p_calling_module => 'FORM',
390: p_debug_mode => 'N',
391: p_max_msg_count => PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
392: p_project_id => x_award_project_id,

Line 408: RAISE FND_API.G_EXC_ERROR;

404: --To be more precise, call appropriate exception handler
405: IF x_Return_Status <> 'S' THEN
406: X_Err_Code := x_Return_Status;
407: X_Err_Stage := x_Msg_Data;
408: RAISE FND_API.G_EXC_ERROR;
409: END IF;
410:
411: END IF;
412: END;

Line 589: RAISE FND_API.G_EXC_ERROR;

585: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
586: FND_MSG_PUB.add;
587: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
588: p_data => X_Err_Stage);
589: RAISE FND_API.G_EXC_ERROR;
590: END;
591:
592: G_Stage := '(520:Calling create_awd_proj_template_struc)';
593:

Line 606: RAISE FND_API.G_EXC_ERROR;

602:
603: IF p_Return_Status <> 'S' THEN
604: X_Err_Code := p_return_status;
605: X_Err_Stage := X_Err_Stage;
606: RAISE FND_API.G_EXC_ERROR;
607: END IF;
608:
609: -- END of Bug Fix for Bug 3002270
610:

Line 627: RAISE FND_API.G_EXC_ERROR;

623:
624: IF x_err_code <> 'S' THEN
625: X_Err_Code := X_err_code;
626: X_Err_Stage := X_Err_Stage;
627: RAISE FND_API.G_EXC_ERROR;
628: END IF;
629:
630: G_Stage := '(540:Calling mark_fields_as_overridable)';
631: MARK_FIELDS_AS_OVERRIDABLE

Line 641: RAISE FND_API.G_EXC_ERROR;

637: --To be more precise, call appropriate exception handler
638: IF x_err_code <> 'S' THEN
639: X_Err_Code := X_err_code;
640: X_Err_Stage := X_Err_Stage;
641: RAISE FND_API.G_EXC_ERROR;
642: END IF;
643:
644: G_Stage := '(550:Before Initializing the Tables)';
645: /* Initializing the Tables */

Line 730: p_commit => FND_API.G_FALSE,

726: p_class_categories => X_Class_Categories_IN_TBL,
727: p_tasks_in => X_Tasks_IN_TBL,
728: p_tasks_out => X_Tasks_OUT_TBL,
729: p_workflow_started => X_Workflow_Started,
730: p_commit => FND_API.G_FALSE,
731: /** Bug 3576717 **/
732: P_deliverables_in => X_Deliverable_IN_TBL,
733: --P_deliverables_out => X_Deliverable_OUT_TBL, (3650374)
734: P_deliverable_actions_in => X_Deliverable_Action_IN_TBL

Line 746: RAISE FND_API.G_EXC_ERROR;

742: X_Err_Code := P_Return_Status;
743:
744: IF P_Return_Status <> 'S' THEN
745: X_Err_Stage := X_Msg_Data;
746: RAISE FND_API.G_EXC_ERROR;
747: ELSE
748: X_Award_Project_Id := X_Project_OUT_REC.PA_PROJECT_ID;
749: END IF;
750:

Line 777: RAISE FND_API.G_EXC_ERROR;

773:
774: X_Err_Code := P_Return_Status;
775: IF P_Return_Status <> 'S' THEN
776: X_Err_Stage := X_Msg_Data;
777: RAISE FND_API.G_EXC_ERROR;
778: END IF;
779:
780: --dbms_output.put_line('Project_Id is '||to_char(X_Project_OUT_REC.PA_PROJECT_ID) );
781: --dbms_output.put_line('Return Code is '||P_Return_Status);

Line 785: WHEN FND_API.G_EXC_ERROR THEN

781: --dbms_output.put_line('Return Code is '||P_Return_Status);
782:
783:
784: EXCEPTION
785: WHEN FND_API.G_EXC_ERROR THEN
786: X_Award_Project_Id := -1;
787: --dbms_output.put_line('The Count From API is '||X_Msg_Count);
788: --dbms_output.put_line('Message Name is '||X_Text);
789: -- X_Err_Code := P_Return_Status;

Line 1872: RAISE FND_API.G_EXC_ERROR;

1868: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
1869: FND_MSG_PUB.add;
1870: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
1871: p_data => X_Err_Stage);
1872: RAISE FND_API.G_EXC_ERROR;
1873:
1874: END ALLOW_REV_LIMIT_FLAG_UPDATE;
1875:
1876: PROCEDURE UPDATE_AGREEMENT(X_Agreement_Id IN NUMBER,

Line 1944: RAISE FND_API.G_EXC_ERROR;

1940: FND_MSG_PUB.add;
1941: FND_MSG_PUB.Count_And_Get
1942: ( p_count => p_msg_count ,
1943: p_data => ERRBUF );
1944: RAISE FND_API.G_EXC_ERROR;
1945: WHEN OTHERS THEN
1946: RETCODE := 'U';
1947: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
1948: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AGREEMENT');

Line 1955: RAISE FND_API.G_EXC_ERROR;

1951: FND_MSG_PUB.add;
1952: FND_MSG_PUB.Count_And_Get
1953: ( p_count => p_msg_count ,
1954: p_data => ERRBUF );
1955: RAISE FND_API.G_EXC_ERROR;
1956: END;
1957:
1958:
1959: Store_Amount := (Store_Amount + X_Amount);

Line 2003: WHEN FND_API.G_EXC_ERROR THEN

1999:
2000:
2001: RETCODE := 'S';
2002: EXCEPTION
2003: WHEN FND_API.G_EXC_ERROR THEN
2004: RETURN;
2005:
2006: -- Added when others exception for Bug:2662848
2007: WHEN OTHERS THEN

Line 2690: RAISE FND_API.G_EXC_ERROR;

2686: --dbms_output.put_line('AJ03:b4 INSERT_AWARD_PROJECT');
2687: --dbms_output.put_line('After Insert Project'||X_Err_Stage);
2688: IF X_Err_Code <> 'S' THEN
2689: X_Award_Project_Id := -1;
2690: RAISE FND_API.G_EXC_ERROR;
2691: ELSE
2692: RETCODE := X_Err_Code;
2693: X_Award_Project_Id := Store_Project_Id;
2694: IF X_Bill_To_Address_Id_IN is NULL THEN

Line 2711: RAISE FND_API.G_EXC_ERROR;

2707:
2708: ELSE
2709: IF X_Err_Code <> 'S' THEN
2710: X_App_Short_Name := 'GMS';
2711: RAISE FND_API.G_EXC_ERROR;
2712: ELSE
2713: RETCODE := X_Err_Code;
2714: END IF;
2715: END IF;

Line 2719: RAISE FND_API.G_EXC_ERROR;

2715: END IF;
2716: ELSE
2717: IF X_Err_Code <> 'S' THEN
2718: X_App_Short_Name := 'GMS';
2719: RAISE FND_API.G_EXC_ERROR;
2720: ELSE
2721: RETCODE := X_Err_Code;
2722: END IF;
2723: END IF;

Line 2795: RAISE FND_API.G_EXC_ERROR;

2791: X_Err_Code,
2792: X_Err_Stage);
2793: IF X_Err_Code <> 'S' THEN
2794: X_App_Short_Name := 'GMS';
2795: RAISE FND_API.G_EXC_ERROR;
2796: ELSE
2797: RETCODE := X_Err_Code;
2798: END IF;
2799:

Line 2818: RAISE FND_API.G_EXC_ERROR;

2814: X_Err_Stage => X_Err_Stage) ;
2815:
2816: IF X_Err_Code <> 'S' THEN
2817: X_App_Short_Name := 'GMS';
2818: RAISE FND_API.G_EXC_ERROR;
2819: ELSE
2820: RETCODE := X_Err_Code;
2821: END IF;
2822: */

Line 2841: RAISE FND_API.G_EXC_ERROR;

2837: X_Err_Code,
2838: X_Err_Stage) ;
2839: IF X_Err_Code <> 'S' THEN
2840: X_Agreement_Id := -1;
2841: RAISE FND_API.G_EXC_ERROR;
2842: ELSE
2843: RETCODE := X_Err_Code;
2844: X_Agreement_Id := Store_Agreement_Id;
2845: END IF;

Line 2855: WHEN FND_API.G_EXC_ERROR THEN

2851: Store_Agreement_Id,
2852: Store_Project_Id);
2853:
2854: EXCEPTION
2855: WHEN FND_API.G_EXC_ERROR THEN
2856: --dbms_output.put_line('P MSG COUNT '||p_msg_count);
2857: X_Msg_Count := p_msg_count;
2858: RETCODE := X_Err_Code;
2859: ERRBUF := X_Err_Stage;

Line 2868: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR;

2864: --dbms_output.put_line('error:' || X_Err_Stage);
2865:
2866: -- Added When OTHERS exception for Bug:2662848
2867: WHEN OTHERS THEN
2868: RETCODE := FND_API.G_RET_STS_UNEXP_ERROR;
2869: X_Award_Project_Id := -1;
2870: X_Agreement_Id := -1;
2871: X_Bill_To_Address_Id_OUT := null;
2872: X_Ship_To_Address_Id_OUT := null;

Line 3146: X_Err_Code := FND_API.G_RET_STS_UNEXP_ERROR; --'U';

3142: X_Err_Code := 'S';
3143: EXCEPTION
3144: WHEN OTHERS THEN
3145:
3146: X_Err_Code := FND_API.G_RET_STS_UNEXP_ERROR; --'U';
3147: X_Err_Stage := SQLERRM;
3148: X_App_Short_Name := 'GMS';
3149: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
3150: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_MULTI_FUNDING: UPDATE_AWARD_PROJECT');

Line 3156: RAISE FND_API.G_EXC_ERROR;

3152: FND_MESSAGE.SET_TOKEN('OERRRM',SQLERRM);
3153: FND_MSG_PUB.add;
3154: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
3155: p_data => X_Err_Stage);
3156: RAISE FND_API.G_EXC_ERROR;
3157: END;
3158:
3159: X_Awd_Proj_Name := X_Project_Name;
3160: X_Awd_Proj_Number := X_Project_Number;

Line 3307: RAISE FND_API.G_EXC_ERROR;

3303: );
3304:
3305: --dbms_output.put_line('THEN I got here !!!');
3306: IF X_Err_Code <> 'S' THEN
3307: RAISE FND_API.G_EXC_ERROR;
3308: ELSE
3309: RETCODE := X_Err_Code;
3310: END IF;
3311: --Bug 3598343 : Commented

Line 3342: RAISE FND_API.G_EXC_ERROR;

3338: APP_SHORT_NAME => X_App_Short_Name,
3339: MESSAGE_NAME => X_Text
3340: );
3341:
3342: RAISE FND_API.G_EXC_ERROR;
3343: ELSE
3344: RETCODE := X_Err_Code;
3345: END IF;
3346: *****/

Line 3379: RAISE FND_API.G_EXC_ERROR;

3375: -- );
3376:
3377: --dbms_output.put_line('THEN I got here !!!');
3378: IF X_Err_Code <> 'S' THEN
3379: RAISE FND_API.G_EXC_ERROR;
3380: ELSE
3381: RETCODE := X_Err_Code;
3382: END IF;
3383: -----------------------------------------------------------------------------------------------

Line 3405: RAISE FND_API.G_EXC_ERROR;

3401: X_Err_Stage
3402: );
3403: IF X_Err_Code <> 'S' THEN
3404: X_App_Short_Name := 'GMS';
3405: RAISE FND_API.G_EXC_ERROR;
3406: ELSE
3407: RETCODE := X_Err_Code;
3408: END IF;
3409:

Line 3421: RAISE FND_API.G_EXC_ERROR;

3417: X_Err_Code,
3418: X_Err_Stage);
3419: IF X_Err_Code <> 'S' THEN
3420: X_App_Short_Name := 'GMS';
3421: RAISE FND_API.G_EXC_ERROR;
3422: ELSE
3423: RETCODE := X_Err_Code;
3424: END IF;
3425: --dbms_output.put_line('Successfully UPDATEd Key Members ');

Line 3459: RAISE FND_API.G_EXC_ERROR;

3455: X_Err_Code,
3456: X_Err_Stage);
3457: IF X_Err_Code <> 'S' THEN
3458: X_App_Short_Name := 'GMS';
3459: RAISE FND_API.G_EXC_ERROR;
3460: ELSE
3461: RETCODE := X_Err_Code;
3462: END IF;
3463:

Line 3500: RAISE FND_API.G_EXC_ERROR;

3496: X_Err_Code,
3497: X_Err_Stage);
3498: IF X_Err_Code <> 'S' THEN
3499: X_App_Short_Name := 'GMS';
3500: RAISE FND_API.G_EXC_ERROR;
3501: ELSE
3502: RETCODE := X_Err_Code;
3503: END IF;
3504: */

Line 3529: ,p_init_msg_list => FND_API.G_TRUE

3525: IF bill_to_contact_exists IS NULL THEN
3526:
3527: pa_customers_contacts_pub.create_customer_contact
3528: ( p_api_version => 1.0
3529: ,p_init_msg_list => FND_API.G_TRUE
3530: ,p_commit => FND_API.G_FALSE
3531: ,p_validate_only => FND_API.G_FALSE
3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3533: ,p_calling_module => 'FORM'

Line 3530: ,p_commit => FND_API.G_FALSE

3526:
3527: pa_customers_contacts_pub.create_customer_contact
3528: ( p_api_version => 1.0
3529: ,p_init_msg_list => FND_API.G_TRUE
3530: ,p_commit => FND_API.G_FALSE
3531: ,p_validate_only => FND_API.G_FALSE
3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3533: ,p_calling_module => 'FORM'
3534: ,p_debug_mode => 'N'

Line 3531: ,p_validate_only => FND_API.G_FALSE

3527: pa_customers_contacts_pub.create_customer_contact
3528: ( p_api_version => 1.0
3529: ,p_init_msg_list => FND_API.G_TRUE
3530: ,p_commit => FND_API.G_FALSE
3531: ,p_validate_only => FND_API.G_FALSE
3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3533: ,p_calling_module => 'FORM'
3534: ,p_debug_mode => 'N'
3535: ,p_max_msg_count => FND_API.G_MISS_NUM

Line 3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

3528: ( p_api_version => 1.0
3529: ,p_init_msg_list => FND_API.G_TRUE
3530: ,p_commit => FND_API.G_FALSE
3531: ,p_validate_only => FND_API.G_FALSE
3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3533: ,p_calling_module => 'FORM'
3534: ,p_debug_mode => 'N'
3535: ,p_max_msg_count => FND_API.G_MISS_NUM
3536: ,p_project_id => X_AWARD_PROJECT_ID

Line 3535: ,p_max_msg_count => FND_API.G_MISS_NUM

3531: ,p_validate_only => FND_API.G_FALSE
3532: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3533: ,p_calling_module => 'FORM'
3534: ,p_debug_mode => 'N'
3535: ,p_max_msg_count => FND_API.G_MISS_NUM
3536: ,p_project_id => X_AWARD_PROJECT_ID
3537: ,p_customer_id => X_CUSTOMER_ID
3538: ,p_bill_ship_customer_id => l_BILL_TO_CUSTOMER_ID
3539: ,p_contact_id => X_bill_to_contact_id

Line 3540: ,p_contact_name => FND_API.G_MISS_CHAR

3536: ,p_project_id => X_AWARD_PROJECT_ID
3537: ,p_customer_id => X_CUSTOMER_ID
3538: ,p_bill_ship_customer_id => l_BILL_TO_CUSTOMER_ID
3539: ,p_contact_id => X_bill_to_contact_id
3540: ,p_contact_name => FND_API.G_MISS_CHAR
3541: ,p_project_contact_type_code => 'BILLING'
3542: ,p_project_contact_type_name => FND_API.G_MISS_CHAR
3543: ,x_return_status => X_return_status
3544: ,x_msg_count => x_msg_count

Line 3542: ,p_project_contact_type_name => FND_API.G_MISS_CHAR

3538: ,p_bill_ship_customer_id => l_BILL_TO_CUSTOMER_ID
3539: ,p_contact_id => X_bill_to_contact_id
3540: ,p_contact_name => FND_API.G_MISS_CHAR
3541: ,p_project_contact_type_code => 'BILLING'
3542: ,p_project_contact_type_name => FND_API.G_MISS_CHAR
3543: ,x_return_status => X_return_status
3544: ,x_msg_count => x_msg_count
3545: ,x_msg_data => x_msg_data);
3546: END IF;

Line 3566: ,p_init_msg_list => FND_API.G_TRUE

3562: IF ship_to_contact_exists is NULL THEN
3563:
3564: pa_customers_contacts_pub.create_customer_contact
3565: (p_api_version => 1.0
3566: ,p_init_msg_list => FND_API.G_TRUE
3567: ,p_commit => FND_API.G_FALSE
3568: ,p_validate_only => FND_API.G_FALSE
3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3570: ,p_calling_module => 'FORM'

Line 3567: ,p_commit => FND_API.G_FALSE

3563:
3564: pa_customers_contacts_pub.create_customer_contact
3565: (p_api_version => 1.0
3566: ,p_init_msg_list => FND_API.G_TRUE
3567: ,p_commit => FND_API.G_FALSE
3568: ,p_validate_only => FND_API.G_FALSE
3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3570: ,p_calling_module => 'FORM'
3571: ,p_debug_mode => 'N'

Line 3568: ,p_validate_only => FND_API.G_FALSE

3564: pa_customers_contacts_pub.create_customer_contact
3565: (p_api_version => 1.0
3566: ,p_init_msg_list => FND_API.G_TRUE
3567: ,p_commit => FND_API.G_FALSE
3568: ,p_validate_only => FND_API.G_FALSE
3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3570: ,p_calling_module => 'FORM'
3571: ,p_debug_mode => 'N'
3572: ,p_max_msg_count => FND_API.G_MISS_NUM

Line 3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

3565: (p_api_version => 1.0
3566: ,p_init_msg_list => FND_API.G_TRUE
3567: ,p_commit => FND_API.G_FALSE
3568: ,p_validate_only => FND_API.G_FALSE
3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3570: ,p_calling_module => 'FORM'
3571: ,p_debug_mode => 'N'
3572: ,p_max_msg_count => FND_API.G_MISS_NUM
3573: ,p_project_id => X_AWARD_PROJECT_ID

Line 3572: ,p_max_msg_count => FND_API.G_MISS_NUM

3568: ,p_validate_only => FND_API.G_FALSE
3569: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
3570: ,p_calling_module => 'FORM'
3571: ,p_debug_mode => 'N'
3572: ,p_max_msg_count => FND_API.G_MISS_NUM
3573: ,p_project_id => X_AWARD_PROJECT_ID
3574: ,p_customer_id => X_CUSTOMER_ID
3575: ,p_bill_ship_customer_id => l_SHIP_TO_CUSTOMER_ID
3576: ,p_contact_id => X_ship_to_contact_id

Line 3577: ,p_contact_name => FND_API.G_MISS_CHAR

3573: ,p_project_id => X_AWARD_PROJECT_ID
3574: ,p_customer_id => X_CUSTOMER_ID
3575: ,p_bill_ship_customer_id => l_SHIP_TO_CUSTOMER_ID
3576: ,p_contact_id => X_ship_to_contact_id
3577: ,p_contact_name => FND_API.G_MISS_CHAR
3578: ,p_project_contact_type_code => 'SHIPPING'
3579: ,p_project_contact_type_name => FND_API.G_MISS_CHAR
3580: ,x_return_status => X_return_status
3581: ,x_msg_count => x_msg_count

Line 3579: ,p_project_contact_type_name => FND_API.G_MISS_CHAR

3575: ,p_bill_ship_customer_id => l_SHIP_TO_CUSTOMER_ID
3576: ,p_contact_id => X_ship_to_contact_id
3577: ,p_contact_name => FND_API.G_MISS_CHAR
3578: ,p_project_contact_type_code => 'SHIPPING'
3579: ,p_project_contact_type_name => FND_API.G_MISS_CHAR
3580: ,x_return_status => X_return_status
3581: ,x_msg_count => x_msg_count
3582: ,x_msg_data => x_msg_data);
3583:

Line 3598: RAISE FND_API.G_EXC_ERROR;

3594: X_Err_Stage);
3595:
3596: IF X_Err_Code <> 'S' THEN
3597: X_App_Short_Name := 'GMS';
3598: RAISE FND_API.G_EXC_ERROR;
3599: ELSE
3600: RETCODE := X_Err_Code;
3601: END IF;
3602:

Line 3613: RAISE FND_API.G_EXC_ERROR;

3609: X_Err_Code => X_Err_Code, -- UPDATE of Budget Type
3610: X_Err_Stage => X_Err_Stage) ;
3611: IF X_Err_Code <> 'S' THEN
3612: X_App_Short_Name := 'GMS';
3613: RAISE FND_API.G_EXC_ERROR;
3614: ELSE
3615: RETCODE := X_Err_Code;
3616: END IF;
3617: */

Line 3649: RAISE FND_API.G_EXC_ERROR;

3645:
3646: ELSE
3647:
3648: IF (( X_Revenue_Limit_Flag IS NOT NULL) AND (St_Revenue_Limit_Flag <> X_Revenue_Limit_Flag)) THEN
3649: RAISE FND_API.G_EXC_ERROR;
3650: ELSE
3651: RETCODE := X_Err_Code;
3652: END IF;
3653:

Line 3676: RAISE FND_API.G_EXC_ERROR;

3672: --dbms_output.put_line('After UPDATE Agreement - Code '||X_Err_Code);
3673:
3674: IF X_Err_Code <> 'S' THEN
3675: X_App_Short_Name := 'GMS';
3676: RAISE FND_API.G_EXC_ERROR;
3677: ELSE
3678: RETCODE := X_Err_Code;
3679: END IF;
3680:

Line 3682: WHEN FND_API.G_EXC_ERROR THEN

3678: RETCODE := X_Err_Code;
3679: END IF;
3680:
3681: EXCEPTION
3682: WHEN FND_API.G_EXC_ERROR THEN
3683: X_Msg_Count := p_msg_count;
3684: RETCODE := X_Err_Code;
3685: ERRBUF := X_Err_Stage||' at '||g_stage;
3686: -- Added when others exception for Bug:2662848

Line 3751: RAISE FND_API.G_EXC_ERROR;

3747: MESSAGE_NAME => X_Text );
3748:
3749: X_Err_Stage := X_Text;
3750: */
3751: RAISE FND_API.G_EXC_ERROR;
3752: ELSE
3753: RETCODE := X_Err_Code;
3754: END IF;
3755:

Line 3766: RAISE FND_API.G_EXC_ERROR;

3762: X_Err_Stage);
3763:
3764: IF X_Err_Code <> 'S' THEN
3765: X_App_Short_Name := 'GMS';
3766: RAISE FND_API.G_EXC_ERROR;
3767: ELSE
3768: RETCODE := X_Err_Code;
3769: END IF;
3770: */

Line 3782: RAISE FND_API.G_EXC_ERROR;

3778: X_Err_Stage);
3779:
3780: IF X_Err_Code <> 'S' THEN
3781: X_App_Short_Name := 'GMS';
3782: RAISE FND_API.G_EXC_ERROR;
3783: ELSE
3784: RETCODE := X_Err_Code;
3785: END IF;
3786:

Line 3788: WHEN FND_API.G_EXC_ERROR THEN

3784: RETCODE := X_Err_Code;
3785: END IF;
3786:
3787: EXCEPTION
3788: WHEN FND_API.G_EXC_ERROR THEN
3789: X_Msg_Count := p_msg_count;
3790: RETCODE := X_Err_Code;
3791: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
3792: WHEN OTHERS THEN

Line 3868: RAISE FND_API.G_EXC_ERROR;

3864: FND_MESSAGE.SET_NAME('GMS','GMS_AWD_RESL_RESLM_NOT_FOUND');
3865: FND_MSG_PUB.add;
3866: FND_MSG_PUB.Count_And_Get(p_count => p_msg_count,
3867: p_data => X_Err_Stage);
3868: RAISE FND_API.G_EXC_ERROR;
3869: END;
3870:
3871: --dbms_output.put_line('After Resource List and List Member Select');
3872: --dbms_output.put_line('The Resource List ID is : '||to_char(X_Resource_List_Id));

Line 3901: RAISE FND_API.G_EXC_ERROR;

3897: APP_SHORT_NAME => X_App_Short_Name,
3898: MESSAGE_NAME => X_Text );
3899: X_Err_Stage := X_Text;
3900: */
3901: RAISE FND_API.G_EXC_ERROR;
3902: ELSE
3903: RETCODE := X_Err_Code;
3904: END IF;
3905:

Line 3909: RAISE FND_API.G_EXC_ERROR;

3905:
3906: --dbms_output.put_line('Return Status After Delete is '||X_Err_Code);
3907: ELSE
3908: IF X_Err_Code <> 'S' THEN
3909: RAISE FND_API.G_EXC_ERROR;
3910: ELSE
3911: RETCODE := X_Err_Code;
3912: END IF;
3913:

Line 3963: RAISE FND_API.G_EXC_ERROR;

3959:
3960: X_Err_Stage := X_Text;
3961: */
3962:
3963: RAISE FND_API.G_EXC_ERROR;
3964: ELSE
3965: RETCODE := X_Err_Code;
3966: END IF;
3967:

Line 3993: RAISE FND_API.G_EXC_ERROR;

3989: MESSAGE_NAME => X_Text );
3990:
3991: X_Err_Stage := X_Text;
3992: */
3993: RAISE FND_API.G_EXC_ERROR;
3994: ELSE
3995: RETCODE := X_Err_Code;
3996: END IF;
3997:

Line 4006: WHEN FND_API.G_EXC_ERROR THEN

4002:
4003: --dbms_output.put_line('At the Very END of CREATE AWARD BUDGET');
4004: END;
4005: EXCEPTION
4006: WHEN FND_API.G_EXC_ERROR THEN
4007: RETCODE := X_Err_Code;
4008: ERRBUF := X_Err_Stage;
4009:
4010: -- Added when OTHERS exception for Bug:2662848

Line 4080: RAISE FND_API.G_EXC_ERROR;

4076: X_Err_Code,
4077: X_Err_Stage);
4078:
4079: IF X_Err_Code <> 'S' THEN
4080: RAISE FND_API.G_EXC_ERROR;
4081: ELSE
4082: RETCODE := X_Err_Code ;
4083: END IF;
4084: END;

Line 4105: RAISE FND_API.G_EXC_ERROR;

4101: RETCODE => X_Err_Code,
4102: ERRBUF => X_Err_Stage);
4103:
4104: IF X_Err_Code <> 'S' THEN
4105: RAISE FND_API.G_EXC_ERROR;
4106: ELSE
4107: RETCODE := X_Err_Code ;
4108: END IF;
4109: END;

Line 4124: RAISE FND_API.G_EXC_ERROR;

4120: X_Err_Code,
4121: X_Err_Stage);
4122:
4123: IF X_Err_Code <> 'S' THEN
4124: RAISE FND_API.G_EXC_ERROR;
4125: ELSE
4126: RETCODE := X_Err_Code ;
4127: END IF;
4128: END;

Line 4161: RAISE FND_API.G_EXC_ERROR;

4157: X_Total_Baselined_Amount,
4158: X_Err_Code,
4159: X_Err_Stage) ;
4160: IF X_Err_Code <> 'S' THEN
4161: RAISE FND_API.G_EXC_ERROR;
4162: ELSE
4163: RETCODE := X_Err_Code ;
4164: END IF;
4165: X_Total_Unbaselined_Amount := X_Total_Unbaselined_Amount + X_Allocated_Amount;

Line 4178: RAISE FND_API.G_EXC_ERROR;

4174: X_Total_Unbaselined_Amount,
4175: X_Err_Code,
4176: X_Err_Stage);
4177: IF X_Err_Code <> 'S' THEN
4178: RAISE FND_API.G_EXC_ERROR;
4179: ELSE
4180: RETCODE := X_Err_Code ;
4181: END IF;
4182: END;

Line 4199: RAISE FND_API.G_EXC_ERROR;

4195: X_Err_Code,
4196: X_Err_Stage);
4197:
4198: IF X_Err_Code <> 'S' THEN
4199: RAISE FND_API.G_EXC_ERROR;
4200: ELSE
4201: RETCODE := X_Err_Code ;
4202: END IF;
4203: ELSE

Line 4204: RAISE FND_API.G_EXC_ERROR;

4200: ELSE
4201: RETCODE := X_Err_Code ;
4202: END IF;
4203: ELSE
4204: RAISE FND_API.G_EXC_ERROR;
4205: END IF;
4206:
4207: END IF;
4208: END;

Line 4217: RAISE FND_API.G_EXC_ERROR;

4213: X_Total_Funding_Budget,
4214: X_Err_Code,
4215: X_Err_Stage);
4216: IF X_Err_Code <> 'S' THEN
4217: RAISE FND_API.G_EXC_ERROR;
4218: ELSE
4219: RETCODE := X_Err_Code ;
4220: END IF;
4221:

Line 4236: RAISE FND_API.G_EXC_ERROR;

4232: X_Err_Code,
4233: X_Err_Stage);
4234:
4235: IF X_Err_Code <> 'S' THEN
4236: RAISE FND_API.G_EXC_ERROR;
4237: ELSE
4238: RETCODE := X_Err_Code ;
4239: END IF;
4240:

Line 4245: WHEN FND_API.G_EXC_ERROR THEN

4241:
4242: END;
4243:
4244: EXCEPTION
4245: WHEN FND_API.G_EXC_ERROR THEN
4246: X_Msg_Count := p_msg_count;
4247: RETCODE := X_Err_Code;
4248: ERRBUF := X_Err_Stage;
4249: WHEN OTHERS THEN

Line 4305: RAISE FND_API.G_EXC_ERROR;

4301: X_Agreement_Id,
4302: X_Err_Code,
4303: X_Err_Stage);
4304: IF X_Err_Code <> 'S' THEN
4305: RAISE FND_API.G_EXC_ERROR;
4306: END IF;
4307: END;
4308:
4309: G_Stage := '(1110:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

Line 4327: RAISE FND_API.G_EXC_ERROR;

4323: RETCODE => X_Err_Code,
4324: ERRBUF => X_Err_Stage);
4325:
4326: IF X_Err_Code <> 'S' THEN
4327: RAISE FND_API.G_EXC_ERROR;
4328: END IF;
4329: END;
4330:
4331: G_Stage := '(1120:CALLING UPDATE_DETAIL_PROJECT_FUNDING)';

Line 4343: RAISE FND_API.G_EXC_ERROR;

4339: X_New_Date_Allocated,
4340: X_Err_Code,
4341: X_Err_Stage);
4342: IF X_Err_Code <> 'S' THEN
4343: RAISE FND_API.G_EXC_ERROR;
4344: END IF;
4345:
4346: G_Stage := '(1130:CALLING GET_TOTAL_FUNDING_AMOUNT)';
4347: GET_TOTAL_FUNDING_AMOUNT(X_Agreement_Id,

Line 4354: RAISE FND_API.G_EXC_ERROR;

4350: X_Total_Baselined_Amount,
4351: X_Err_Code,
4352: X_Err_Stage) ;
4353: IF X_Err_Code <> 'S' THEN
4354: RAISE FND_API.G_EXC_ERROR;
4355: END IF;
4356:
4357: X_Total_Unbaselined_Amount := X_Total_Unbaselined_Amount + (X_New_Allocated_Amount -
4358: X_Old_Allocated_Amount);

Line 4368: RAISE FND_API.G_EXC_ERROR;

4364: X_Total_Unbaselined_Amount,
4365: X_Err_Code,
4366: X_Err_Stage);
4367: IF X_Err_Code <> 'S' THEN
4368: RAISE FND_API.G_EXC_ERROR;
4369: END IF;
4370:
4371: G_Stage := '(1150:CALLING GET_TOTAL_FUNDING_BUDGET)';
4372: /* Getting the total Funding(Baselined + Unbaselined) for the Project */

Line 4378: RAISE FND_API.G_EXC_ERROR;

4374: X_Total_Funding_Budget,
4375: X_Err_Code,
4376: X_Err_Stage);
4377: IF X_Err_Code <> 'S' THEN
4378: RAISE FND_API.G_EXC_ERROR;
4379: END IF;
4380: --dbms_output.put_line('Total FUNDING BUDGET BEFORE CREATE_AWARD_PROJECT_BUDGET '||X_Total_Funding_Budget);
4381:
4382:

Line 4396: RAISE FND_API.G_EXC_ERROR;

4392:
4393: --dbms_output.put_line('Got OUT NOCOPY of the CREATE_AWARD_PROJECT_BUDGET');
4394:
4395: IF X_Err_Code <> 'S' THEN
4396: RAISE FND_API.G_EXC_ERROR;
4397: END IF;
4398:
4399: END;
4400: EXCEPTION

Line 4401: WHEN FND_API.G_EXC_ERROR THEN

4397: END IF;
4398:
4399: END;
4400: EXCEPTION
4401: WHEN FND_API.G_EXC_ERROR THEN
4402: X_Msg_Count := p_msg_count;
4403: ERRBUF := X_Err_Stage;
4404: RETCODE := X_Err_Code;
4405:

Line 4486: RAISE FND_API.G_EXC_ERROR;

4482: X_Agreement_Id,
4483: X_Err_Code,
4484: X_Err_Stage);
4485: IF X_Err_Code <> 'S' THEN
4486: RAISE FND_API.G_EXC_ERROR;
4487: END IF;
4488: END;
4489:
4490: G_Stage := '(810:CALLING GMS_MULTI_FUNDING.UPDATE_AGREEMENT)';

Line 4508: RAISE FND_API.G_EXC_ERROR;

4504: RETCODE => X_Err_Code,
4505: ERRBUF => X_Err_Stage);
4506:
4507: IF X_Err_Code <> 'S' THEN
4508: RAISE FND_API.G_EXC_ERROR;
4509: END IF;
4510: END;
4511: G_Stage := '(820:CALLING DELETE_DETAIL_PROJECT_FUNDING)';
4512: BEGIN

Line 4518: RAISE FND_API.G_EXC_ERROR;

4514: DELETE_DETAIL_PROJECT_FUNDING(X_Project_Funding_Id,
4515: X_Err_Code,
4516: X_Err_Stage);
4517: IF X_Err_Code <> 'S' THEN
4518: RAISE FND_API.G_EXC_ERROR;
4519: END IF;
4520:
4521: G_Stage := '(830:CALLING GET_TOTAL_FUNDING_AMOUNT)';
4522: GET_TOTAL_FUNDING_AMOUNT(X_Agreement_Id,

Line 4529: RAISE FND_API.G_EXC_ERROR;

4525: X_Total_Baselined_Amount,
4526: X_Err_Code,
4527: X_Err_Stage) ;
4528: IF X_Err_Code <> 'S' THEN
4529: RAISE FND_API.G_EXC_ERROR;
4530: END IF;
4531:
4532: X_Total_Unbaselined_Amount := X_Total_Unbaselined_Amount - X_Allocated_Amount;
4533:

Line 4545: RAISE FND_API.G_EXC_ERROR;

4541: X_Award_Project_Id,
4542: X_Err_Code,
4543: X_Err_Stage);
4544: IF X_Err_Code <> 'S' THEN
4545: RAISE FND_API.G_EXC_ERROR;
4546: END IF;
4547:
4548: G_Stage := '(860:CALLING GET_TOTAL_FUNDING_BUDGET)';
4549: /* Getting the total Funding(Baselined + Unbaselined) for the Project */

Line 4555: RAISE FND_API.G_EXC_ERROR;

4551: X_Total_Funding_Budget,
4552: X_Err_Code,
4553: X_Err_Stage);
4554: IF X_Err_Code <> 'S' THEN
4555: RAISE FND_API.G_EXC_ERROR;
4556: END IF;
4557:
4558: G_Stage := '(870:CALLING DRAFT_BUDGET_EXISTS)';
4559: IF X_Total_Funding_Budget = 0 THEN

Line 4581: RAISE FND_API.G_EXC_ERROR;

4577: APP_SHORT_NAME => X_App_Short_Name,
4578: MESSAGE_NAME => X_Text );
4579: X_Err_Stage := X_Text;
4580: */
4581: RAISE FND_API.G_EXC_ERROR;
4582: END IF;
4583: END IF;
4584:
4585: G_Stage := '(890:CALLING DELETE_BASELINED_VERSIONS)';

Line 4592: RAISE FND_API.G_EXC_ERROR;

4588: (X_Award_Project_Id,
4589: X_Err_Code,
4590: X_Err_Stage);
4591: IF X_Err_Code <> 'S' THEN
4592: RAISE FND_API.G_EXC_ERROR;
4593: END IF;
4594:
4595: END IF;
4596:

Line 4605: RAISE FND_API.G_EXC_ERROR;

4601: X_Total_Unbaselined_Amount,
4602: X_Err_Code,
4603: X_Err_Stage);
4604: IF X_Err_Code <> 'S' THEN
4605: RAISE FND_API.G_EXC_ERROR;
4606: END IF;
4607: G_Stage := '(910:CALLING UPDATE_PA_SUMM_PROJECT_FUNDING)';
4608: GET_TOTAL_FUNDING_BUDGET(X_Award_Project_Id,
4609: X_Total_Funding_Budget,

Line 4613: RAISE FND_API.G_EXC_ERROR;

4609: X_Total_Funding_Budget,
4610: X_Err_Code,
4611: X_Err_Stage);
4612: IF X_Err_Code <> 'S' THEN
4613: RAISE FND_API.G_EXC_ERROR;
4614: END IF;
4615: G_Stage := '(920:CALLING CREATE_AWARD_PROJECT_BUDGET)';
4616: CREATE_AWARD_PROJECT_BUDGET(X_Award_Project_Id,
4617: X_Total_Funding_Budget,

Line 4624: RAISE FND_API.G_EXC_ERROR;

4620: X_App_Short_Name,
4621: X_Err_Code,
4622: X_Err_Stage);
4623: IF X_Err_Code <> 'S' THEN
4624: RAISE FND_API.G_EXC_ERROR;
4625: END IF;
4626: END IF;
4627: END;
4628: EXCEPTION

Line 4629: WHEN FND_API.G_EXC_ERROR THEN

4625: END IF;
4626: END IF;
4627: END;
4628: EXCEPTION
4629: WHEN FND_API.G_EXC_ERROR THEN
4630: X_Msg_Count := p_msg_count;
4631: ERRBUF := 'At stage='||g_stage||' '||X_Err_Stage;
4632: RETCODE := X_Err_Code;
4633: -- Added when OTHERS exception for Bug:2662848