DBA Data[Home] [Help]

APPS.CSP_REPAIR_PO_PVT dependencies on FND_API

Line 150: l_Init_Msg_List VARCHAR2(1) := FND_API.G_TRUE;

146:
147: l_api_version_number CONSTANT NUMBER := 1.0;
148: l_api_name CONSTANT VARCHAR2(30) := 'RUN_REPAIR_EXECUTION';
149:
150: l_Init_Msg_List VARCHAR2(1) := FND_API.G_TRUE;
151: l_commit VARCHAR2(1) := FND_API.G_TRUE;
152: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
153:
154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

Line 151: l_commit VARCHAR2(1) := FND_API.G_TRUE;

147: l_api_version_number CONSTANT NUMBER := 1.0;
148: l_api_name CONSTANT VARCHAR2(30) := 'RUN_REPAIR_EXECUTION';
149:
150: l_Init_Msg_List VARCHAR2(1) := FND_API.G_TRUE;
151: l_commit VARCHAR2(1) := FND_API.G_TRUE;
152: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
153:
154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
155: x_msg_count NUMBER;

Line 152: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

148: l_api_name CONSTANT VARCHAR2(30) := 'RUN_REPAIR_EXECUTION';
149:
150: l_Init_Msg_List VARCHAR2(1) := FND_API.G_TRUE;
151: l_commit VARCHAR2(1) := FND_API.G_TRUE;
152: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
153:
154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
155: x_msg_count NUMBER;
156: x_msg_data VARCHAR2(2000);

Line 154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

150: l_Init_Msg_List VARCHAR2(1) := FND_API.G_TRUE;
151: l_commit VARCHAR2(1) := FND_API.G_TRUE;
152: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
153:
154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
155: x_msg_count NUMBER;
156: x_msg_data VARCHAR2(2000);
157:
158: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

Line 158: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

154: x_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
155: x_msg_count NUMBER;
156: x_msg_data VARCHAR2(2000);
157:
158: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
159: l_msg_count NUMBER;
160: l_msg_data VARCHAR2(2000);
161:
162: l_sqlcode NUMBER;

Line 222: l_po_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

218: l_changes PO_CHANGES_REC_TYPE;
219: l_po_release_id NUMBER;
220: l_po_header_id NUMBER;
221: lc_org_id NUMBER;
222: l_po_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
223: l_po_api_errors PO_API_ERRORS_REC_TYPE;
224:
225: poLineIdTbl po_tbl_number := po_tbl_number();
226: l_qtys po_tbl_number := po_tbl_number();

Line 252: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

248:
249: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
250:
251: /** Standard call to check for call compatibility **/
252: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
253: p_api_version_number,
254: l_api_name,
255: G_PKG_NAME)
256: THEN

Line 257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

253: p_api_version_number,
254: l_api_name,
255: G_PKG_NAME)
256: THEN
257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
258: END IF;
259:
260: /** Initialize message list **/
261: IF fnd_api.to_boolean(l_Init_Msg_List) THEN

Line 261: IF fnd_api.to_boolean(l_Init_Msg_List) THEN

257: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
258: END IF;
259:
260: /** Initialize message list **/
261: IF fnd_api.to_boolean(l_Init_Msg_List) THEN
262: FND_MSG_PUB.initialize;
263: END IF;
264:
265: /** Initialize return status **/

Line 266: x_return_status := FND_API.G_RET_STS_SUCCESS;

262: FND_MSG_PUB.initialize;
263: END IF;
264:
265: /** Initialize return status **/
266: x_return_status := FND_API.G_RET_STS_SUCCESS;
267:
268: /** User and login information **/
269: SELECT Sysdate INTO l_today FROM dual;
270: l_user_id := fnd_global.user_id;

Line 445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

441: ,x_msg_data
442: ,x_msg_count
443: );
444:
445: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
446: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_RESERVED_LINES_rec.defective_organization_id);
447: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_DEFECTITEM_AT_DEFECTORG');
448: FND_MESSAGE.SET_TOKEN ('DEFECTIVE_ORG_NAME', L_ORG_NAME,TRUE);
449: FND_MSG_PUB.ADD;

Line 466: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

462: ,x_return_status => l_return_status
463: ,x_msg_data => l_msg_data );
464: */
465:
466: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
467: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
468: Add_Err_Msg;
469: g_retcode := 1;
470: errbuf := X_Msg_Data;

Line 467: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

463: ,x_msg_data => l_msg_data );
464: */
465:
466: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
467: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
468: Add_Err_Msg;
469: g_retcode := 1;
470: errbuf := X_Msg_Data;
471: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 473: Elsif (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

469: g_retcode := 1;
470: errbuf := X_Msg_Data;
471: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;
472:
473: Elsif (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
474: l_line_rec.line_num := I; -- 1;
475: l_line_rec.inventory_item_id := CSP_RESERVED_LINES_rec.inventory_item_id;
476: --l_line_rec.item_description := 'Sentinel Standard Desktop';
477: l_line_rec.sourced_from := 'INVENTORY';

Line 551: ,p_Init_Msg_List => FND_API.G_FALSE

547:
548: csp_parts_order.process_order
549: (
550: p_api_version => 1.0
551: ,p_Init_Msg_List => FND_API.G_FALSE
552: ,p_commit => FND_API.G_FALSE
553: ,px_header_rec => l_header_rec
554: ,px_line_table => l_line_tbl
555: --,p_process_type => 'BOTH'(Default value is 'BOTH')

Line 552: ,p_commit => FND_API.G_FALSE

548: csp_parts_order.process_order
549: (
550: p_api_version => 1.0
551: ,p_Init_Msg_List => FND_API.G_FALSE
552: ,p_commit => FND_API.G_FALSE
553: ,px_header_rec => l_header_rec
554: ,px_line_table => l_line_tbl
555: --,p_process_type => 'BOTH'(Default value is 'BOTH')
556: ,x_return_status => x_return_status

Line 561: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

557: ,x_msg_count => x_msg_count
558: ,x_msg_data => x_msg_data
559: );
560:
561: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
562: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
563: Add_Err_Msg;
564: g_retcode := 1;
565: errbuf := X_Msg_Data;

Line 562: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

558: ,x_msg_data => x_msg_data
559: );
560:
561: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
562: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
563: Add_Err_Msg;
564: g_retcode := 1;
565: errbuf := X_Msg_Data;
566: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 567: Elsif (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

563: Add_Err_Msg;
564: g_retcode := 1;
565: errbuf := X_Msg_Data;
566: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;
567: Elsif (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
568: /* STATUS = 6 => INTERNAL_ORDER CREATED */
569:
570: UPDATE CSP_REPAIR_PO_HEADERS
571: SET INTERNAL_ORDER_HEADER_ID = l_header_rec.order_header_id,

Line 620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

616: ,x_msg_data
617: ,x_msg_count
618: );
619:
620: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
621: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);
622: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_DEFECTITEM_AT_REPAIRORG');
623: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_ORG_NAME,TRUE);
624: FND_MSG_PUB.ADD;

Line 703: p_init_msg_list => FND_API.G_TRUE,

699:
700: --Call to this API will change the Quantity in the PO
701: PO_DOCUMENT_UPDATE_GRP.update_document (
702: p_api_version => 1.0,
703: p_init_msg_list => FND_API.G_TRUE,
704: x_return_status => l_po_return_status,
705: p_changes => l_changes,
706: p_run_submission_checks => FND_API.G_TRUE,
707: p_launch_approvals_flag => FND_API.G_TRUE,

Line 706: p_run_submission_checks => FND_API.G_TRUE,

702: p_api_version => 1.0,
703: p_init_msg_list => FND_API.G_TRUE,
704: x_return_status => l_po_return_status,
705: p_changes => l_changes,
706: p_run_submission_checks => FND_API.G_TRUE,
707: p_launch_approvals_flag => FND_API.G_TRUE,
708: p_buyer_id => NULL,
709: p_update_source => NULL,
710: p_override_date => NULL,

Line 707: p_launch_approvals_flag => FND_API.G_TRUE,

703: p_init_msg_list => FND_API.G_TRUE,
704: x_return_status => l_po_return_status,
705: p_changes => l_changes,
706: p_run_submission_checks => FND_API.G_TRUE,
707: p_launch_approvals_flag => FND_API.G_TRUE,
708: p_buyer_id => NULL,
709: p_update_source => NULL,
710: p_override_date => NULL,
711: x_api_errors => l_po_api_errors

Line 714: IF l_po_return_status <> fnd_api.g_ret_sts_success

710: p_override_date => NULL,
711: x_api_errors => l_po_api_errors
712: );
713:
714: IF l_po_return_status <> fnd_api.g_ret_sts_success
715: THEN
716:
717: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
718: /*

Line 717: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

713:
714: IF l_po_return_status <> fnd_api.g_ret_sts_success
715: THEN
716:
717: --RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
718: /*
719: FOR i IN 1..l_po_api_errors.message_text.COUNT LOOP
720: insert into PO_UPDATE_ERROR_TABLE(l_po_api_errors.message_text(i));
721: END LOOP;

Line 853: , p_init_msg_list => FND_API.G_FALSE

849: /** Create Wip component issue transaction to the wip job **/
850:
851: csp_transactions_pub.transact_material
852: ( p_api_version => 1.0
853: , p_init_msg_list => FND_API.G_FALSE
854: , p_commit => FND_API.G_FALSE
855: , px_transaction_header_id => px_transaction_header_id
856: , px_transaction_id => t_transaction_id
857: , p_inventory_item_id => IO_QTY_RECEIVED_CHECK_REC.item_id

Line 854: , p_commit => FND_API.G_FALSE

850:
851: csp_transactions_pub.transact_material
852: ( p_api_version => 1.0
853: , p_init_msg_list => FND_API.G_FALSE
854: , p_commit => FND_API.G_FALSE
855: , px_transaction_header_id => px_transaction_header_id
856: , px_transaction_id => t_transaction_id
857: , p_inventory_item_id => IO_QTY_RECEIVED_CHECK_REC.item_id
858: , p_organization_id => IO_QTY_RECEIVED_CHECK_REC.DESTINATION_ORGANIZATION_ID

Line 890: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

886: , x_msg_count => l_msg_count
887: , x_msg_data => l_msg_data
888: );
889:
890: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
891: -- Raise FND_API.G_EXC_UNEXPECTED_ERROR;
892: Add_Err_Msg;
893: g_retcode := 1;
894: errbuf := l_Msg_Data;

Line 891: -- Raise FND_API.G_EXC_UNEXPECTED_ERROR;

887: , x_msg_data => l_msg_data
888: );
889:
890: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
891: -- Raise FND_API.G_EXC_UNEXPECTED_ERROR;
892: Add_Err_Msg;
893: g_retcode := 1;
894: errbuf := l_Msg_Data;
895: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 1000: , p_init_msg_list => FND_API.G_FALSE

996: If nvl(l_wib_issue_qty,0) > 0 then
997:
998: csp_transactions_pub.transact_material
999: ( p_api_version => 1.0
1000: , p_init_msg_list => FND_API.G_FALSE
1001: , p_commit => FND_API.G_FALSE
1002: , px_transaction_header_id => px_transaction_header_id
1003: , px_transaction_id => t_transaction_id
1004: , p_inventory_item_id => IO_QTY_RECEIVED_CHECK_REC.item_id

Line 1001: , p_commit => FND_API.G_FALSE

997:
998: csp_transactions_pub.transact_material
999: ( p_api_version => 1.0
1000: , p_init_msg_list => FND_API.G_FALSE
1001: , p_commit => FND_API.G_FALSE
1002: , px_transaction_header_id => px_transaction_header_id
1003: , px_transaction_id => t_transaction_id
1004: , p_inventory_item_id => IO_QTY_RECEIVED_CHECK_REC.item_id
1005: , p_organization_id => IO_QTY_RECEIVED_CHECK_REC.DESTINATION_ORGANIZATION_ID

Line 1037: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1033: , x_msg_count => l_msg_count
1034: , x_msg_data => l_msg_data
1035: );
1036:
1037: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1038: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1039: Add_Err_Msg;
1040: g_retcode := 1;
1041: errbuf := l_Msg_Data;

Line 1038: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1034: , x_msg_data => l_msg_data
1035: );
1036:
1037: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1038: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1039: Add_Err_Msg;
1040: g_retcode := 1;
1041: errbuf := l_Msg_Data;
1042: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 1128: p_init_msg_list => FND_API.G_TRUE,

1124: );
1125:
1126: --Call to this API will change the Quantity in the PO
1127: PO_DOCUMENT_UPDATE_GRP.update_document (p_api_version => 1.0,
1128: p_init_msg_list => FND_API.G_TRUE,
1129: x_return_status => l_po_return_status,
1130: p_changes => l_changes,
1131: p_run_submission_checks => FND_API.G_TRUE,
1132: p_launch_approvals_flag => FND_API.G_TRUE,

Line 1131: p_run_submission_checks => FND_API.G_TRUE,

1127: PO_DOCUMENT_UPDATE_GRP.update_document (p_api_version => 1.0,
1128: p_init_msg_list => FND_API.G_TRUE,
1129: x_return_status => l_po_return_status,
1130: p_changes => l_changes,
1131: p_run_submission_checks => FND_API.G_TRUE,
1132: p_launch_approvals_flag => FND_API.G_TRUE,
1133: p_buyer_id => NULL,
1134: p_update_source => NULL,
1135: p_override_date => NULL,

Line 1132: p_launch_approvals_flag => FND_API.G_TRUE,

1128: p_init_msg_list => FND_API.G_TRUE,
1129: x_return_status => l_po_return_status,
1130: p_changes => l_changes,
1131: p_run_submission_checks => FND_API.G_TRUE,
1132: p_launch_approvals_flag => FND_API.G_TRUE,
1133: p_buyer_id => NULL,
1134: p_update_source => NULL,
1135: p_override_date => NULL,
1136: x_api_errors => l_po_api_errors

Line 1139: If l_po_return_status <> fnd_api.g_ret_sts_success then

1135: p_override_date => NULL,
1136: x_api_errors => l_po_api_errors
1137: );
1138:
1139: If l_po_return_status <> fnd_api.g_ret_sts_success then
1140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1141: End if;
1142:
1143: End if;

Line 1140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1136: x_api_errors => l_po_api_errors
1137: );
1138:
1139: If l_po_return_status <> fnd_api.g_ret_sts_success then
1140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1141: End if;
1142:
1143: End if;
1144: */

Line 1220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1216: ,x_msg_data
1217: ,x_msg_count
1218: );
1219:
1220: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1221: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);
1222: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_REPAIRITEM_AT_REPAIRORG');
1223: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_ORG_NAME,TRUE);
1224: FND_MSG_PUB.ADD;

Line 1239: , p_init_msg_list => FND_API.G_FALSE

1235: END IF;
1236:
1237: csp_transactions_pub.transact_material
1238: ( p_api_version => 1.0
1239: , p_init_msg_list => FND_API.G_FALSE
1240: , p_commit => FND_API.G_FALSE
1241: , px_transaction_header_id => px_transaction_header_id
1242: , px_transaction_id => t_transaction_id
1243: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID

Line 1240: , p_commit => FND_API.G_FALSE

1236:
1237: csp_transactions_pub.transact_material
1238: ( p_api_version => 1.0
1239: , p_init_msg_list => FND_API.G_FALSE
1240: , p_commit => FND_API.G_FALSE
1241: , px_transaction_header_id => px_transaction_header_id
1242: , px_transaction_id => t_transaction_id
1243: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID
1244: , p_organization_id => CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

Line 1277: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1273: , x_msg_count => l_msg_count
1274: , x_msg_data => l_msg_data
1275: );
1276:
1277: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1278: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: Add_Err_Msg;
1280: g_retcode := 1;
1281: errbuf := l_msg_Data;

Line 1278: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1274: , x_msg_data => l_msg_data
1275: );
1276:
1277: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1278: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: Add_Err_Msg;
1280: g_retcode := 1;
1281: errbuf := l_msg_Data;
1282: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 1384: , p_init_msg_list => FND_API.G_FALSE

1380: **/
1381:
1382: csp_transactions_pub.transact_material
1383: ( p_api_version => 1.0
1384: , p_init_msg_list => FND_API.G_FALSE
1385: , p_commit => FND_API.G_FALSE
1386: , px_transaction_header_id => px_transaction_header_id
1387: , px_transaction_id => t_transaction_id
1388: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID

Line 1385: , p_commit => FND_API.G_FALSE

1381:
1382: csp_transactions_pub.transact_material
1383: ( p_api_version => 1.0
1384: , p_init_msg_list => FND_API.G_FALSE
1385: , p_commit => FND_API.G_FALSE
1386: , px_transaction_header_id => px_transaction_header_id
1387: , px_transaction_id => t_transaction_id
1388: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID
1389: , p_organization_id => CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

Line 1421: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and nvl(l_msg_count, 0) > 0 THEN

1417: , x_msg_count => l_msg_count
1418: , x_msg_data => l_msg_data
1419: );
1420:
1421: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and nvl(l_msg_count, 0) > 0 THEN
1422: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1423: Add_Err_Msg;
1424: g_retcode := 1;
1425: errbuf := l_msg_Data;

Line 1422: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1418: , x_msg_data => l_msg_data
1419: );
1420:
1421: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and nvl(l_msg_count, 0) > 0 THEN
1422: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1423: Add_Err_Msg;
1424: g_retcode := 1;
1425: errbuf := l_msg_Data;
1426: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;

Line 1463: IF FND_API.to_Boolean(l_commit) THEN

1459:
1460: Call REP_PO_SCRAP_ADJUST_TRANSACT(); ----> SCRAP/ADJUSTMENT transaction
1461: **/
1462:
1463: IF FND_API.to_Boolean(l_commit) THEN
1464: COMMIT WORK;
1465: END IF;
1466:
1467: /** Standard call to get message count and if count is 1, get message info. **/

Line 1479: WHEN FND_API.G_EXC_ERROR THEN

1475: errbuf := X_Msg_Data;
1476: retcode := g_retcode;
1477:
1478: EXCEPTION
1479: WHEN FND_API.G_EXC_ERROR THEN
1480: Add_Err_Msg;
1481: retcode := 2;
1482: errbuf := X_Msg_Data;
1483:

Line 1494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1490: ,X_MSG_COUNT => X_MSG_COUNT
1491: ,X_MSG_DATA => X_MSG_DATA
1492: ,X_RETURN_STATUS => X_RETURN_STATUS);
1493:
1494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1495: Add_Err_Msg;
1496: retcode := 2;
1497: errbuf := X_Msg_Data;
1498:

Line 1547: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE

1543: /** REPAIR_PO SCRAP/ADJUSTMENT TRANSACTION **/
1544:
1545: PROCEDURE REP_PO_SCRAP_ADJUST_TRANSACT
1546: (p_Api_Version_Number IN NUMBER
1547: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1548: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1549: ,p_REPAIR_PO_HEADER_ID IN NUMBER
1550: ,p_SCRAP_ADJUST_FLAG IN VARCHAR2
1551: ,p_SCRAP_ADJUST_ITEM_ID IN NUMBER

Line 1548: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1544:
1545: PROCEDURE REP_PO_SCRAP_ADJUST_TRANSACT
1546: (p_Api_Version_Number IN NUMBER
1547: ,p_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE
1548: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1549: ,p_REPAIR_PO_HEADER_ID IN NUMBER
1550: ,p_SCRAP_ADJUST_FLAG IN VARCHAR2
1551: ,p_SCRAP_ADJUST_ITEM_ID IN NUMBER
1552: ,p_SCRAP_ADJUST_QTY IN NUMBER

Line 1588: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1584:
1585: l_api_version_number CONSTANT NUMBER := 1.0;
1586: l_api_name CONSTANT VARCHAR2(20) := 'REPAIR_PO_SCRAP';
1587:
1588: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1589: l_msg_count NUMBER;
1590: l_msg_data VARCHAR2(2000);
1591: l_Rollback VARCHAR2(1) := 'Y';
1592:

Line 1624: l_po_con_doc_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1620: t_transaction_id NUMBER;
1621: l_transaction_type_id NUMBER;
1622: l_wip_status_type NUMBER;
1623:
1624: l_po_con_doc_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1625:
1626: l_po_line_changes po_lines_rec_type;
1627: l_shipment_changes PO_SHIPMENTS_REC_TYPE;
1628: l_distribution_changes PO_DISTRIBUTIONS_REC_TYPE;

Line 1633: l_po_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1629: l_changes PO_CHANGES_REC_TYPE;
1630: l_po_release_id NUMBER;
1631: l_po_header_id NUMBER;
1632: l_org_id NUMBER;
1633: l_po_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1634: l_po_api_errors PO_API_ERRORS_REC_TYPE;
1635:
1636: poLineIdTbl po_tbl_number := po_tbl_number();
1637: l_qtys po_tbl_number := po_tbl_number();

Line 1684: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1680:
1681: SAVEPOINT REPAIR_PO_SCRAP_PVT;
1682:
1683: /** Standard call to check for call compatibility **/
1684: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1685: p_api_version_number,
1686: l_api_name,
1687: G_PKG_NAME)
1688: THEN

Line 1689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1685: p_api_version_number,
1686: l_api_name,
1687: G_PKG_NAME)
1688: THEN
1689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1690: END IF;
1691:
1692: /** Initialize message list **/
1693: IF fnd_api.to_boolean(P_Init_Msg_List) THEN

Line 1693: IF fnd_api.to_boolean(P_Init_Msg_List) THEN

1689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1690: END IF;
1691:
1692: /** Initialize message list **/
1693: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
1694: FND_MSG_PUB.initialize;
1695: END IF;
1696:
1697: /** Initialize return status **/

Line 1698: x_return_status := FND_API.G_RET_STS_SUCCESS;

1694: FND_MSG_PUB.initialize;
1695: END IF;
1696:
1697: /** Initialize return status **/
1698: x_return_status := FND_API.G_RET_STS_SUCCESS;
1699:
1700: /** User and login information **/
1701: SELECT Sysdate INTO l_today FROM dual;
1702: l_user_id := fnd_global.user_id;

Line 1726: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1722: ,x_return_status
1723: ,x_msg_data
1724: ,x_msg_count
1725: );
1726: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1727: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_SCRAP_rec.repair_supplier_org_id);
1728: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_DEFECTITEM_AT_REPAIRORG');
1729: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG_NAME', L_ORG_NAME,TRUE);
1730: FND_MSG_PUB.ADD;

Line 1768: , p_init_msg_list => FND_API.G_FALSE

1764: l_account_id := Get_CSP_Acccount_ID (CSP_REPAIR_PO_SCRAP_rec.repair_supplier_org_id, p_SCRAP_ADJUST_FLAG,Prof_val );
1765: End if;
1766: csp_transactions_pub.transact_material
1767: ( p_api_version => 1.0
1768: , p_init_msg_list => FND_API.G_FALSE
1769: , p_commit => FND_API.G_FALSE
1770: , px_transaction_header_id => px_transaction_header_id
1771: , px_transaction_id => t_transaction_id
1772: , p_inventory_item_id => CSP_REPAIR_PO_SCRAP_rec.defect_item_id

Line 1769: , p_commit => FND_API.G_FALSE

1765: End if;
1766: csp_transactions_pub.transact_material
1767: ( p_api_version => 1.0
1768: , p_init_msg_list => FND_API.G_FALSE
1769: , p_commit => FND_API.G_FALSE
1770: , px_transaction_header_id => px_transaction_header_id
1771: , px_transaction_id => t_transaction_id
1772: , p_inventory_item_id => CSP_REPAIR_PO_SCRAP_rec.defect_item_id
1773: , p_organization_id => CSP_REPAIR_PO_SCRAP_rec.repair_supplier_org_id

Line 1806: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and l_msg_count <> 0 THEN

1802: , x_msg_count => l_msg_count
1803: , x_msg_data => l_msg_data
1804: );
1805:
1806: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and l_msg_count <> 0 THEN
1807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1808: End if;
1809:
1810: /**

Line 1807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1803: , x_msg_data => l_msg_data
1804: );
1805:
1806: IF l_return_status <> FND_API.G_RET_STS_SUCCESS and l_msg_count <> 0 THEN
1807: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1808: End if;
1809:
1810: /**
1811: After WIP_JOB qty is returned from WIP JOB to Repair Supplier Org's Defect subinv

Line 1827: , p_init_msg_list => FND_API.G_FALSE

1823: End if;
1824:
1825: csp_transactions_pub.transact_material
1826: ( p_api_version => 1.0
1827: , p_init_msg_list => FND_API.G_FALSE
1828: , p_commit => FND_API.G_FALSE
1829: , px_transaction_header_id => px_transaction_header_id
1830: , px_transaction_id => t_transaction_id
1831: , p_inventory_item_id => CSP_REPAIR_PO_SCRAP_rec.defect_item_id

Line 1828: , p_commit => FND_API.G_FALSE

1824:
1825: csp_transactions_pub.transact_material
1826: ( p_api_version => 1.0
1827: , p_init_msg_list => FND_API.G_FALSE
1828: , p_commit => FND_API.G_FALSE
1829: , px_transaction_header_id => px_transaction_header_id
1830: , px_transaction_id => t_transaction_id
1831: , p_inventory_item_id => CSP_REPAIR_PO_SCRAP_rec.defect_item_id
1832: , p_organization_id => CSP_REPAIR_PO_SCRAP_rec.repair_supplier_org_id

Line 1864: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1860: , x_msg_count => l_msg_count
1861: , x_msg_data => l_msg_data
1862: );
1863:
1864: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1866: End if;
1867:
1868: /** FINAL_COMPLETION_FLAG = 'Y' => Repair PO is Closed, WIP_JOB is Complete and ready to close

Line 1865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1861: , x_msg_data => l_msg_data
1862: );
1863:
1864: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1866: End if;
1867:
1868: /** FINAL_COMPLETION_FLAG = 'Y' => Repair PO is Closed, WIP_JOB is Complete and ready to close
1869: FINAL_COMPLETION_FLAG = 'N' => Repair PO is not Closed, WIP_JOB is still open in released status_type

Line 2028: p_init_msg_list =>fnd_api.g_true,

2024: */
2025:
2026: po_document_control_pub.control_document
2027: (p_api_version =>1.0,
2028: p_init_msg_list =>fnd_api.g_true,
2029: p_commit =>fnd_api.g_true,
2030: x_return_status =>l_po_con_doc_return_status,
2031: p_doc_type =>'PO',
2032: p_doc_subtype =>'STANDARD',

Line 2029: p_commit =>fnd_api.g_true,

2025:
2026: po_document_control_pub.control_document
2027: (p_api_version =>1.0,
2028: p_init_msg_list =>fnd_api.g_true,
2029: p_commit =>fnd_api.g_true,
2030: x_return_status =>l_po_con_doc_return_status,
2031: p_doc_type =>'PO',
2032: p_doc_subtype =>'STANDARD',
2033: p_doc_id =>CSP_REPAIR_PO_SCRAP_rec.PURCHASE_ORDER_HEADER_ID,

Line 2052: If l_po_con_doc_return_status <> fnd_api.g_ret_sts_success then

2048: --p_org_id =>6748 -- < Bug#4581621
2049: );
2050:
2051:
2052: If l_po_con_doc_return_status <> fnd_api.g_ret_sts_success then
2053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2054: End if;
2055:
2056: Else

Line 2053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2049: );
2050:
2051:
2052: If l_po_con_doc_return_status <> fnd_api.g_ret_sts_success then
2053: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2054: End if;
2055:
2056: Else
2057:

Line 2100: p_init_msg_list => FND_API.G_TRUE,

2096: );
2097:
2098: --Call to this API will change the Quantity in the PO
2099: PO_DOCUMENT_UPDATE_GRP.update_document (p_api_version => 1.0,
2100: p_init_msg_list => FND_API.G_TRUE,
2101: x_return_status => l_po_return_status,
2102: p_changes => l_changes,
2103: p_run_submission_checks => FND_API.G_TRUE,
2104: p_launch_approvals_flag => FND_API.G_TRUE,

Line 2103: p_run_submission_checks => FND_API.G_TRUE,

2099: PO_DOCUMENT_UPDATE_GRP.update_document (p_api_version => 1.0,
2100: p_init_msg_list => FND_API.G_TRUE,
2101: x_return_status => l_po_return_status,
2102: p_changes => l_changes,
2103: p_run_submission_checks => FND_API.G_TRUE,
2104: p_launch_approvals_flag => FND_API.G_TRUE,
2105: p_buyer_id => NULL,
2106: p_update_source => NULL,
2107: p_override_date => NULL,

Line 2104: p_launch_approvals_flag => FND_API.G_TRUE,

2100: p_init_msg_list => FND_API.G_TRUE,
2101: x_return_status => l_po_return_status,
2102: p_changes => l_changes,
2103: p_run_submission_checks => FND_API.G_TRUE,
2104: p_launch_approvals_flag => FND_API.G_TRUE,
2105: p_buyer_id => NULL,
2106: p_update_source => NULL,
2107: p_override_date => NULL,
2108: x_api_errors => l_po_api_errors

Line 2111: If l_po_return_status <> fnd_api.g_ret_sts_success then

2107: p_override_date => NULL,
2108: x_api_errors => l_po_api_errors
2109: );
2110:
2111: If l_po_return_status <> fnd_api.g_ret_sts_success then
2112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2113: /*
2114: FOR i IN 1..l_po_api_errors.message_text.COUNT LOOP
2115: insert into PO_UPDATE_ERROR_TABLE(l_po_api_errors.message_text(i));

Line 2112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2108: x_api_errors => l_po_api_errors
2109: );
2110:
2111: If l_po_return_status <> fnd_api.g_ret_sts_success then
2112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2113: /*
2114: FOR i IN 1..l_po_api_errors.message_text.COUNT LOOP
2115: insert into PO_UPDATE_ERROR_TABLE(l_po_api_errors.message_text(i));
2116: END LOOP;

Line 2126: IF FND_API.to_Boolean(p_commit) THEN

2122:
2123: End if;
2124: End loop;
2125:
2126: IF FND_API.to_Boolean(p_commit) THEN
2127: COMMIT WORK;
2128: END IF;
2129:
2130: x_return_status := l_return_status;

Line 2153: x_return_status := FND_API.G_RET_STS_ERROR;

2149: WHEN EXCP_USER_DEFINED THEN
2150: Rollback to REPAIR_PO_SCRAP_PVT;
2151:
2152: /** This returns 'E' as status **/
2153: x_return_status := FND_API.G_RET_STS_ERROR;
2154:
2155: fnd_msg_pub.count_and_get
2156: (p_count => x_msg_count
2157: ,p_data => x_msg_data);

Line 2159: WHEN FND_API.G_EXC_ERROR THEN

2155: fnd_msg_pub.count_and_get
2156: (p_count => x_msg_count
2157: ,p_data => x_msg_data);
2158:
2159: WHEN FND_API.G_EXC_ERROR THEN
2160: /** This returns 'E' as status **/
2161:
2162: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2163: P_API_NAME => L_API_NAME

Line 2172: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2168: ,X_MSG_COUNT => X_MSG_COUNT
2169: ,X_MSG_DATA => X_MSG_DATA
2170: ,X_RETURN_STATUS => X_RETURN_STATUS);
2171:
2172: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2173: /** This returns 'U' as status **/
2174:
2175: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2176: P_API_NAME => L_API_NAME

Line 2199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2195: (p_count => x_msg_count
2196: ,p_data => x_msg_data);
2197:
2198: /** This returns 'U' as status **/
2199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2200:
2201: END REP_PO_SCRAP_ADJUST_TRANSACT;
2202: --Vidya added this function 12/3/2013
2203: Function Get_CSP_Acccount_ID (p_organization_id NUMBER , p_SCRAP_ADJUST_FLAG varchar2 , Prof_val varchar2) Return NUMBER