DBA Data[Home] [Help]

APPS.PA_CONTROL_API_PUB dependencies on PA_CONTROL_API_PUB

Line 1: package body PA_CONTROL_API_PUB as

1: package body PA_CONTROL_API_PUB as
2: /*$Header: PACIAMPB.pls 120.1 2006/11/24 09:05:31 vgottimu noship $*/
3:
4:
5: g_module_name VARCHAR2(100) := 'pa.plsql.PA_CONTROL_API_PUB';

Line 5: g_module_name VARCHAR2(100) := 'pa.plsql.PA_CONTROL_API_PUB';

1: package body PA_CONTROL_API_PUB as
2: /*$Header: PACIAMPB.pls 120.1 2006/11/24 09:05:31 vgottimu noship $*/
3:
4:
5: g_module_name VARCHAR2(100) := 'pa.plsql.PA_CONTROL_API_PUB';
6:
7:
8: l_debug_mode VARCHAR2(1);
9: l_debug_level3 CONSTANT NUMBER := 3;

Line 85: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Workplan_Impact';

81: l_msg_count NUMBER := 0;
82: l_data VARCHAR2(2000);
83: l_msg_data VARCHAR2(2000);
84: l_msg_index_out NUMBER;
85: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Workplan_Impact';
86: BEGIN
87:
88: x_return_status := FND_API.G_RET_STS_SUCCESS;
89: x_msg_count := 0;

Line 187: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

183:
184: IF p_commit = FND_API.G_TRUE THEN
185: ROLLBACK TO ADD_WORKPLAN_IMPACT_SVPT;
186: END IF;
187: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
188: p_procedure_name => 'Add_Workplan_Impact',
189: p_error_text => x_msg_data);
190: x_msg_count := FND_MSG_PUB.count_msg;
191: if l_debug_mode = 'Y' then

Line 217: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Staffing_Impact';

213: l_msg_count NUMBER := 0;
214: l_data VARCHAR2(2000);
215: l_msg_data VARCHAR2(2000);
216: l_msg_index_out NUMBER;
217: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Staffing_Impact';
218: BEGIN
219:
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
221: x_msg_count := 0;

Line 314: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

310: x_msg_data := substr(SQLERRM,1,240);
311: IF p_commit = FND_API.G_TRUE THEN
312: ROLLBACK TO ADD_STAFFING_IMPACT_SVPT;
313: END IF;
314: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
315: p_procedure_name => 'Add_Staffing_Impact',
316: p_error_text => x_msg_data);
317: x_msg_count := FND_MSG_PUB.count_msg;
318: if l_debug_mode = 'Y' then

Line 345: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Contract_Impact';

341: l_msg_count NUMBER := 0;
342: l_data VARCHAR2(2000);
343: l_msg_data VARCHAR2(2000);
344: l_msg_index_out NUMBER;
345: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Contract_Impact';
346: BEGIN
347:
348: x_return_status := FND_API.G_RET_STS_SUCCESS;
349: x_msg_count := 0;

Line 442: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

438:
439: IF p_commit = FND_API.G_TRUE THEN
440: ROLLBACK TO ADD_CONTRACT_IMPACT_SVPT;
441: END IF;
442: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
443: p_procedure_name => 'Add_Contract_Impact',
444: p_error_text => x_msg_data);
445: x_msg_count := FND_MSG_PUB.count_msg;
446: if l_debug_mode = 'Y' then

Line 470: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Other_Impact';

466: l_msg_count NUMBER := 0;
467: l_data VARCHAR2(2000);
468: l_msg_data VARCHAR2(2000);
469: l_msg_index_out NUMBER;
470: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Other_Impact';
471: BEGIN
472:
473: x_return_status := FND_API.G_RET_STS_SUCCESS;
474: x_msg_count := 0;

Line 567: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

563:
564: IF p_commit = FND_API.G_TRUE THEN
565: ROLLBACK TO ADD_OTHER_IMPACT_SVPT;
566: END IF;
567: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
568: p_procedure_name => 'Add_Other_Impact',
569: p_error_text => x_msg_data);
570: x_msg_count := FND_MSG_PUB.count_msg;
571:

Line 598: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Supplier_Impact';

594: l_msg_count NUMBER := 0;
595: l_data VARCHAR2(2000);
596: l_msg_data VARCHAR2(2000);
597: l_msg_index_out NUMBER;
598: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Add_Supplier_Impact';
599: l_any_error_flag VARCHAR2(1):= null;
600:
601: --Supplier Details
602: l_change_type VARCHAR2(100);

Line 731: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

727: x_msg_data := substr(SQLERRM,1,240);
728: IF p_commit = FND_API.G_TRUE THEN
729: ROLLBACK TO ADD_SUPPLIER_IMPACT_SVPT;
730: END IF;
731: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
732: p_procedure_name => 'Add_Supplier_Impact',
733: p_error_text => x_msg_data);
734: x_msg_count := FND_MSG_PUB.count_msg;
735: --Reset the stack

Line 762: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Workplan_Impact';

758: l_msg_count NUMBER := 0;
759: l_data VARCHAR2(2000);
760: l_msg_data VARCHAR2(2000);
761: l_msg_index_out NUMBER;
762: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Workplan_Impact';
763: BEGIN
764:
765: x_return_status := FND_API.G_RET_STS_SUCCESS;
766: x_msg_count := 0;

Line 863: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

859: ROLLBACK TO UPDATE_WORKPLAN_IMPACT_SVPT;
860: END IF;
861:
862:
863: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
864: p_procedure_name => 'UPDATE_WORKPLAN_IMPACT',
865: p_error_text => x_msg_data);
866: x_msg_count := FND_MSG_PUB.count_msg;
867: --Reset the stack

Line 893: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Staffing_Impact';

889: l_msg_count NUMBER := 0;
890: l_data VARCHAR2(2000);
891: l_msg_data VARCHAR2(2000);
892: l_msg_index_out NUMBER;
893: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Staffing_Impact';
894:
895: BEGIN
896:
897: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 996: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

992: ROLLBACK TO UPDATE_STAFFING_IMPACT_SVPT;
993: END IF;
994:
995:
996: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
997: p_procedure_name => 'UPDATE_STAFFING_IMPACT',
998: p_error_text => x_msg_data);
999: x_msg_count := FND_MSG_PUB.count_msg;
1000: --Reset the stack

Line 1027: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Contract_Impact';

1023: l_msg_count NUMBER := 0;
1024: l_data VARCHAR2(2000);
1025: l_msg_data VARCHAR2(2000);
1026: l_msg_index_out NUMBER;
1027: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Contract_Impact';
1028:
1029: BEGIN
1030:
1031: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1128: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

1124: IF p_commit = FND_API.G_TRUE THEN
1125: ROLLBACK TO UPDATE_CONTRACT_IMPACT_SVPT;
1126: END IF;
1127:
1128: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
1129: p_procedure_name => 'UPDATE_CONTRACT_IMPACT',
1130: p_error_text => x_msg_data);
1131: x_msg_count := FND_MSG_PUB.count_msg;
1132: --Reset the stack

Line 1159: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Other_Impact';

1155: l_msg_count NUMBER := 0;
1156: l_data VARCHAR2(2000);
1157: l_msg_data VARCHAR2(2000);
1158: l_msg_index_out NUMBER;
1159: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Other_Impact';
1160:
1161: BEGIN
1162:
1163: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1262: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

1258: ROLLBACK TO UPDATE_OTHER_IMPACT_SVPT;
1259: END IF;
1260:
1261:
1262: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
1263: p_procedure_name => 'Update_Other_Impact',
1264: p_error_text => x_msg_data);
1265: x_msg_count := FND_MSG_PUB.count_msg;
1266: --Reset the stack

Line 1290: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Supplier_Impact';

1286: l_msg_count NUMBER := 0;
1287: l_data VARCHAR2(2000);
1288: l_msg_data VARCHAR2(2000);
1289: l_msg_index_out NUMBER;
1290: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Supplier_Impact';
1291:
1292: BEGIN
1293:
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1390: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

1386: IF p_commit = FND_API.G_TRUE THEN
1387: ROLLBACK TO UPDATE_SUPPLIER_IMPACT_SVPT;
1388: END IF;
1389:
1390: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
1391: p_procedure_name => 'Update_Supplier_Impact',
1392: p_error_text => x_msg_data);
1393: x_msg_count := FND_MSG_PUB.count_msg;
1394: --Reset the stack

Line 1420: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Delete_Supplier_Impact_Details';

1416: l_Msg_Count NUMBER := 0;
1417: l_Data VARCHAR2(2000);
1418: l_Msg_Data VARCHAR2(2000);
1419: l_Msg_Index_Out NUMBER;
1420: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Delete_Supplier_Impact_Details';
1421: -- End: Local Variables.
1422:
1423: l_chk_status_ctrl VARCHAR2(1);
1424: l_ci_id pa_control_items.ci_id%type;

Line 1440: PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Supplier_Impact_Details');

1436: WHERE ci_id = c_ci_id;
1437:
1438: BEGIN
1439: -- Initialize the Error Stack.
1440: PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Supplier_Impact_Details');
1441:
1442: -- Initialize the Return Status to Success.
1443: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
1444: x_Msg_Count := 0;

Line 1567: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

1563:
1564: IF p_commit = FND_API.G_TRUE THEN
1565: ROLLBACK TO ADD_CONTRACT_IMPACT_SVPT;
1566: END IF;
1567: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
1568: p_procedure_name => 'Delete_Supplier_Impact_Details',
1569: p_error_text => x_msg_data);
1570: x_msg_count := FND_MSG_PUB.count_msg;
1571: if l_debug_mode = 'Y' then

Line 1649: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Progress';

1645:
1646: l_data VARCHAR2(2000);
1647: l_msg_data VARCHAR2(2000);
1648: l_msg_index_out NUMBER;
1649: l_module_name VARCHAR2(200):='PA_CONTROL_API_PUB.Update_Progress';
1650: l_msg_count NUMBER := 0;
1651:
1652: l_stmnt VARCHAR2(5000);
1653: l_sel_clause VARCHAR2(300);

Line 2331: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

2327: x_msg_data := substr(SQLERRM,1,240);
2328: IF p_commit = FND_API.G_TRUE THEN
2329: ROLLBACK TO UPDATE_PROGRESS_SVPT;
2330: END IF;
2331: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
2332: p_procedure_name => 'Update_Progress',
2333: p_error_text => x_msg_data);
2334: x_msg_count := FND_MSG_PUB.count_msg;
2335: --Reset the stack

Line 2482: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_issue', p_debug_mode => l_debug_mode);

2478: l_debug_mode := NVL(FND_PROFILE.VALUE_SPECIFIC('PA_DEBUG_MODE', fnd_global.user_id, fnd_global.resp_id, 275, null, null), 'N');
2479: l_module_name := 'create_issue' || g_module_name;
2480:
2481: if l_debug_mode = 'Y' then
2482: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_issue', p_debug_mode => l_debug_mode);
2483: end if;
2484:
2485: if fnd_api.to_boolean(nvl(p_init_msg_list, fnd_api.g_true)) then
2486: fnd_msg_pub.initialize;

Line 2963: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',

2959: --do a rollback;
2960: if p_commit = fnd_api.g_true then
2961: rollback to create_issue;
2962: end if;
2963: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',
2964: p_procedure_name => 'create_issue',
2965: p_error_text => substrb(sqlerrm,1,240));
2966: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2967: p_data => x_msg_data);

Line 3117: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_change_request', p_debug_mode => l_debug_mode);

3113: l_debug_mode := NVL(FND_PROFILE.VALUE_SPECIFIC('PA_DEBUG_MODE', fnd_global.user_id, fnd_global.resp_id, 275, null, null), 'N');
3114: l_module_name := 'create_change_request' || g_module_name;
3115:
3116: if l_debug_mode = 'Y' then
3117: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_change_request', p_debug_mode => l_debug_mode);
3118: end if;
3119:
3120: if fnd_api.to_boolean(nvl(p_init_msg_list, fnd_api.g_true)) then
3121: fnd_msg_pub.initialize;

Line 3598: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',

3594: --do a rollback;
3595: if p_commit = fnd_api.g_true then
3596: rollback to create_change_request;
3597: end if;
3598: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',
3599: p_procedure_name => 'create_change_request',
3600: p_error_text => substrb(sqlerrm,1,240));
3601: fnd_msg_pub.count_and_get(p_count => x_msg_count,
3602: p_data => x_msg_data);

Line 3752: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_change_order', p_debug_mode => l_debug_mode);

3748: l_debug_mode := NVL(FND_PROFILE.VALUE_SPECIFIC('PA_DEBUG_MODE', fnd_global.user_id, fnd_global.resp_id, 275, null, null), 'N');
3749: l_module_name := 'create_change_order' || g_module_name;
3750:
3751: if l_debug_mode = 'Y' then
3752: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_change_order', p_debug_mode => l_debug_mode);
3753: end if;
3754:
3755: if fnd_api.to_boolean(nvl(p_init_msg_list, fnd_api.g_true)) then
3756: fnd_msg_pub.initialize;

Line 4233: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',

4229: --do a rollback;
4230: if p_commit = fnd_api.g_true then
4231: rollback to create_change_order;
4232: end if;
4233: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',
4234: p_procedure_name => 'create_change_order',
4235: p_error_text => substrb(sqlerrm,1,240));
4236: fnd_msg_pub.count_and_get(p_count => x_msg_count,
4237: p_data => x_msg_data);

Line 4284: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_action', p_debug_mode => l_debug_mode);

4280: l_debug_mode := NVL(FND_PROFILE.VALUE_SPECIFIC('PA_DEBUG_MODE', fnd_global.user_id, fnd_global.resp_id, 275, null, null), 'N');
4281: l_module_name := 'create_action' || g_module_name;
4282:
4283: if l_debug_mode = 'Y' then
4284: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.create_action', p_debug_mode => l_debug_mode);
4285: end if;
4286:
4287: if fnd_api.to_boolean(nvl(p_init_msg_list, fnd_api.g_true)) then
4288: fnd_msg_pub.initialize;

Line 4411: fnd_msg_pub.add_exc_msg(p_pkg_name => 'pa_control_api_pub',

4407: rollback to create_action;
4408:
4409: end if;
4410:
4411: fnd_msg_pub.add_exc_msg(p_pkg_name => 'pa_control_api_pub',
4412: p_procedure_name => 'create_action',
4413: p_error_text => substrb(sqlerrm,1,240));
4414: fnd_msg_pub.count_and_get(p_count => x_msg_count,
4415: p_data => x_msg_data);

Line 4506: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.take_action', p_debug_mode => l_debug_mode);

4502: l_debug_mode := NVL(FND_PROFILE.VALUE_SPECIFIC('PA_DEBUG_MODE', fnd_global.user_id, fnd_global.resp_id, 275, null, null), 'N');
4503: l_module_name := 'take_action' || g_module_name;
4504:
4505: if l_debug_mode = 'Y' then
4506: pa_debug.set_curr_function(p_function => 'pa_control_api_pub.take_action', p_debug_mode => l_debug_mode);
4507: end if;
4508:
4509: if fnd_api.to_boolean(nvl(p_init_msg_list, fnd_api.g_true)) then
4510: fnd_msg_pub.initialize;

Line 4965: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',

4961: rollback to take_action;
4962: end if;
4963:
4964: x_return_status := fnd_api.g_ret_sts_unexp_error;
4965: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',
4966: p_procedure_name => 'take_action',
4967: p_error_text => substrb(sqlerrm,1,240));
4968: fnd_msg_pub.count_and_get(p_count => x_msg_count,
4969: p_data => x_msg_data);

Line 4986: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',

4982: rollback to take_action;
4983: end if;
4984:
4985: x_return_status := fnd_api.g_ret_sts_unexp_error;
4986: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CONTROL_API_PUB',
4987: p_procedure_name => 'take_action',
4988: p_error_text => substrb(sqlerrm,1,240));
4989: fnd_msg_pub.count_and_get(p_count => x_msg_count,
4990: p_data => x_msg_data);

Line 5029: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Cancel_Action';

5025: l_msg_count NUMBER := 0;
5026: l_data VARCHAR2(2000);
5027: l_msg_data VARCHAR2(2000);
5028: l_msg_index_out NUMBER;
5029: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Cancel_Action';
5030: l_assignee_id NUMBER := null;
5031: l_user_id NUMBER := 0;
5032: l_action_id pa_ci_actions.ci_action_id%type;
5033: l_ci_id pa_control_items.ci_id%type;

Line 5214: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',

5210: ROLLBACK TO CANCEL_ACTION_SVPT;
5211: END IF;
5212:
5213:
5214: fnd_msg_pub.add_exc_msg ( p_pkg_name => 'PA_CONTROL_API_PUB',
5215: p_procedure_name => 'CANCEL_ACTION',
5216: p_error_text => x_msg_data);
5217: x_msg_count := FND_MSG_PUB.count_msg;
5218: --Reset the stack

Line 5248: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Issue';

5244: l_Msg_Count NUMBER := 0;
5245: l_Data VARCHAR2(2000);
5246: l_Msg_Data VARCHAR2(2000);
5247: l_Msg_Index_Out NUMBER;
5248: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Issue';
5249: l_CiTypeClassCode VARCHAR2(30);
5250: l_Issue VARCHAR2(30) := 'ISSUE';
5251: -- End: Local Variables.
5252: BEGIN

Line 5273: -- PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Issue');

5269: IF l_debug_mode = 'Y' THEN
5270: pa_debug.write(l_module_name, 'Start of Delete_Issue', l_debug_level3);
5271: END IF;
5272: -- Initialize the Error Stack.
5273: -- PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Issue');
5274:
5275: -- Initialize the Return Status to Success.
5276: x_Return_Status := FND_API.g_Ret_Sts_Success;
5277: x_Msg_Count := 0;

Line 5364: p_Pkg_Name => 'PA_CONTROL_API_PUB',

5360: END IF;
5361:
5362: -- Add the message that is reported in SQL Error.
5363: FND_MSG_PUB.Add_Exc_Msg (
5364: p_Pkg_Name => 'PA_CONTROL_API_PUB',
5365: p_Procedure_Name => 'Delete_Issue',
5366: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
5367: );
5368:

Line 5401: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Change_Request';

5397: l_Msg_Count NUMBER := 0;
5398: l_Data VARCHAR2(2000);
5399: l_Msg_Data VARCHAR2(2000);
5400: l_Msg_Index_Out NUMBER;
5401: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Change_Request';
5402: l_CiTypeClassCode VARCHAR2(30);
5403: l_ChangeRequest VARCHAR2(30) := 'CHANGE_REQUEST';
5404: -- End: Local Variables.
5405: BEGIN

Line 5426: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Change_Request');

5422: pa_debug.write(l_module_name, 'Start of Delete_Change_Request', l_debug_level3);
5423: END IF;
5424:
5425: -- Initialize the Error Stack.
5426: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Change_Request');
5427:
5428: -- Initialize the Return Status to Success.
5429: x_Return_Status := FND_API.g_Ret_Sts_Success;
5430: x_Msg_Count := 0;

Line 5521: p_Pkg_Name => 'PA_CONTROL_API_PUB',

5517: END IF;
5518:
5519: -- Add the message that is reported in SQL Error.
5520: FND_MSG_PUB.Add_Exc_Msg (
5521: p_Pkg_Name => 'PA_CONTROL_API_PUB',
5522: p_Procedure_Name => 'Delete_Change_Request',
5523: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
5524: );
5525:

Line 5558: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Change_Order';

5554: l_Msg_Count NUMBER := 0;
5555: l_Data VARCHAR2(2000);
5556: l_Msg_Data VARCHAR2(2000);
5557: l_Msg_Index_Out NUMBER;
5558: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Change_Order';
5559: l_CiTypeClassCode VARCHAR2(30);
5560: l_ChangeOrder VARCHAR2(30) := 'CHANGE_ORDER';
5561: -- End: Local Variables.
5562: BEGIN

Line 5582: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Change_Order');

5578: IF l_debug_mode = 'Y' THEN
5579: pa_debug.write(l_module_name, 'Start of Delete_Change_Order', l_debug_level3);
5580: END IF;
5581: -- Initialize the Error Stack.
5582: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Change_Order');
5583:
5584: -- Initialize the Return Status to Success.
5585: x_Return_Status := FND_API.g_Ret_Sts_Success;
5586: x_Msg_Count := 0;

Line 5673: p_Pkg_Name => 'PA_CONTROL_API_PUB',

5669: END IF;
5670:
5671: -- Add the message that is reported in SQL Error.
5672: FND_MSG_PUB.Add_Exc_Msg (
5673: p_Pkg_Name => 'PA_CONTROL_API_PUB',
5674: p_Procedure_Name => 'Delete_Change_Order',
5675: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
5676: );
5677:

Line 5718: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Add_Comments';

5714: l_ProjectId NUMBER(15);
5715: l_CiTypeClassCode VARCHAR2(30);
5716: l_RecordVersionNumber NUMBER(15);
5717:
5718: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Add_Comments';
5719: l_Msg_Count NUMBER := 0;
5720: l_Data VARCHAR2(2000);
5721: l_Msg_Data VARCHAR2(2000);
5722: l_Msg_Index_Out NUMBER;

Line 5903: p_Pkg_Name => 'PA_CONTROL_API_PUB',

5899: x_Return_Status := FND_API.g_Ret_Sts_Unexp_Error;
5900:
5901: -- Add the message that is reported in SQL Error.
5902: FND_MSG_PUB.Add_Exc_Msg (
5903: p_Pkg_Name => 'PA_CONTROL_API_PUB',
5904: p_Procedure_Name => 'Add_Comments',
5905: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
5906: );
5907:

Line 5948: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Add_Related_Items';

5944: l_ProjectId NUMBER(15);
5945: l_CiTypeClassCode VARCHAR2(30);
5946: l_RecordVersionNumber NUMBER(15);
5947:
5948: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Add_Related_Items';
5949: l_AnyError VARCHAR2(1) := 'N';
5950: l_Msg_Count NUMBER := 0;
5951: l_Data VARCHAR2(2000);
5952: l_Msg_Data VARCHAR2(2000);

Line 5974: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Add_Related_Items');

5970: IF l_debug_mode = 'Y' THEN
5971: pa_debug.write(l_module_name, 'Start of Add_Related_Items', l_debug_level3);
5972: END IF;
5973: -- Initialize the Error Stack.
5974: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Add_Related_Items');
5975:
5976: -- Set the SavePoint if we have been requested to Commit the Data.
5977: IF (p_Commit = FND_API.G_TRUE) THEN
5978: SAVEPOINT ADD_RELATED_ITEMS_SVPT;

Line 6213: p_Pkg_Name => 'PA_CONTROL_API_PUB',

6209: x_Return_Status := FND_API.g_Ret_Sts_Unexp_Error;
6210:
6211: -- Add the message that is reported in SQL Error.
6212: FND_MSG_PUB.Add_Exc_Msg (
6213: p_Pkg_Name => 'PA_CONTROL_API_PUB',
6214: p_Procedure_Name => 'Add_Related_Items',
6215: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
6216: );
6217:

Line 6258: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Related_Item';

6254: l_RecordVersionNumber NUMBER(15);
6255:
6256: l_UpdateAccess VARCHAR2(1);
6257: l_UpdateAllowed VARCHAR2(1);
6258: l_module_name VARCHAR2(200):= 'PA_CONTROL_API_PUB.Delete_Related_Item';
6259: l_Msg_Count NUMBER := 0;
6260: l_Data VARCHAR2(2000);
6261: l_Msg_Data VARCHAR2(2000);
6262: l_Msg_Index_Out NUMBER;

Line 6286: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Related_Item');

6282: IF l_debug_mode = 'Y' THEN
6283: pa_debug.write(l_module_name, 'Start of Delete_Related_Item', l_debug_level3);
6284: END IF;
6285: -- Initialize the Error Stack.
6286: --PA_DEBUG.Init_Err_Stack ('PA_CONTROL_API_PUB.Delete_Related_Item');
6287:
6288: -- Initialize the Return Status to Success.
6289: x_Return_Status := FND_API.g_Ret_Sts_Success;
6290: x_Msg_Count := 0;

Line 6500: p_Pkg_Name => 'PA_CONTROL_API_PUB',

6496: END IF;
6497:
6498: -- Add the message that is reported in SQL Error.
6499: FND_MSG_PUB.Add_Exc_Msg (
6500: p_Pkg_Name => 'PA_CONTROL_API_PUB',
6501: p_Procedure_Name => 'Delete_Related_Item',
6502: p_Error_Text => SUBSTRB (sqlerrm, 1, 240)
6503: );
6504:

Line 6584: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_ISSUE';

6580: l_msg_count NUMBER := 0;
6581:
6582: l_check_update_access VARCHAR2(1) := 'F';
6583: l_chk_status_ctrl VARCHAR2(1) := 'N';
6584: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_ISSUE';
6585:
6586:
6587: l_curr_status_code pa_control_items.status_code%TYPE;
6588: l_ci_status_code pa_control_items.status_code%TYPE;

Line 7764: ( p_pkg_name => 'PA_CONTROL_API_PUB'

7760: ROLLBACK TO UPDATE_ISSUE_SVPT;
7761: END IF;
7762:
7763: FND_MSG_PUB.add_exc_msg
7764: ( p_pkg_name => 'PA_CONTROL_API_PUB'
7765: , p_procedure_name => 'UPDATE_ISSUE'
7766: , p_error_text => x_msg_data);
7767:
7768: x_msg_count := FND_MSG_PUB.count_msg;

Line 7844: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_CHANGE_REQUEST';

7840: l_msg_count NUMBER := 0;
7841:
7842: l_check_update_access VARCHAR2(1) := 'F';
7843: l_chk_status_ctrl VARCHAR2(1) := 'N';
7844: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_CHANGE_REQUEST';
7845:
7846:
7847: l_curr_status_code pa_control_items.status_code%TYPE;
7848: l_ci_status_code pa_control_items.status_code%TYPE;

Line 9021: ( p_pkg_name => 'PA_CONTROL_API_PUB'

9017: ROLLBACK TO UPDATE_CR_SVPT;
9018: END IF;
9019:
9020: FND_MSG_PUB.add_exc_msg
9021: ( p_pkg_name => 'PA_CONTROL_API_PUB'
9022: , p_procedure_name => 'UPDATE_CHANGE_REQUEST'
9023: , p_error_text => x_msg_data);
9024:
9025: x_msg_count := FND_MSG_PUB.count_msg;

Line 9102: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_CHANGE_ORDER';

9098: l_msg_count NUMBER := 0;
9099:
9100: l_check_update_access VARCHAR2(1) := 'F';
9101: l_chk_status_ctrl VARCHAR2(1) := 'N';
9102: l_module VARCHAR2(100) := 'PA_CONTROL_API_PUB.UPDATE_CHANGE_ORDER';
9103:
9104:
9105: l_curr_status_code pa_control_items.status_code%TYPE;
9106: l_ci_status_code pa_control_items.status_code%TYPE;

Line 10280: ( p_pkg_name => 'PA_CONTROL_API_PUB'

10276: ROLLBACK TO UPDATE_CO_SVPT;
10277: END IF;
10278:
10279: FND_MSG_PUB.add_exc_msg
10280: ( p_pkg_name => 'PA_CONTROL_API_PUB'
10281: , p_procedure_name => 'UPDATE_CHANGE_ORDER'
10282: , p_error_text => x_msg_data);
10283:
10284: x_msg_count := FND_MSG_PUB.count_msg;

Line 10295: END PA_CONTROL_API_PUB;

10291:
10292: END UPDATE_CHANGE_ORDER;
10293:
10294:
10295: END PA_CONTROL_API_PUB;