[Home] [Help]
247: BEGIN
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)
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';
478: l_line_rec.ordered_quantity := CSP_RESERVED_LINES_rec.quantity;
479: l_line_rec.unit_of_measure := l_primary_uom_code;
480: l_line_rec.dest_subinventory := FND_PROFILE.value(NAME => 'CSP_REPAIR_SUP_ORG_DEFECT_SUBINV');
742:
743: Begin
744: SELECT CLASS_CODE
745: INTO L_CLASS_CODE
746: FROM WIP_NON_STANDARD_CLASSES_VAL_V
747: WHERE ORGANIZATION_ID = CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id
748: AND CLASS_TYPE = 4
749: AND CLASS_CODE = 'Expense';
750: Exception
796: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID, --> (or) Pass CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
797: 2, --> 2 Validation, 4 Completion
798: 1, --> 1 Pending, 4 Complete
799: CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id,
800: 4, --> LOAD_TYPE: 4 Non-standard discrete jobs, 3 update discrete jobs, 1 standard discrete jobs
801: CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID,
802: nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0),--CSP_REPAIR_PO_HEADERS_rec.QUANTITY,
803: 3, --> Status type: 3 Released, 4 Complete, 12 closed
804: SYSDATE, --> FIRST_UNIT_START_DATE
1331: SOURCE_LINE_ID,
1332: decode(FINAL_COMPLETION_FLAG,'Y',4,2), --> 2 Validation, 4 Completion
1333: decode(FINAL_COMPLETION_FLAG,'Y',4,1), --> 1 Pending, 4 Complete
1334: ORGANIZATION_ID,
1335: 3, --> Load type: 4 Create non-standard wip job, 3 Update non-standard wip job
1336: PRIMARY_ITEM_ID,
1337: START_QUANTITY,
1338: decode(FINAL_COMPLETION_FLAG,'Y',4,3), --> Status type: 3 Released, 4 Complete
1339: --FIRST_UNIT_START_DATE,
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. **/
1468: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1469: p_data => x_msg_data
1470: );
1471: /** Errbuf returns error messages and
1679: **/
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)
1918: SOURCE_LINE_ID,
1919: decode(FINAL_COMPLETION_FLAG,'Y',4,2), --> 2 Validation, 4 Completion
1920: decode(FINAL_COMPLETION_FLAG,'Y',4,1), --> 1 Pending, 4 Complete
1921: ORGANIZATION_ID,
1922: 3, --> Load type: 4 Create non-standard wip job, 3 Update non-standard wip job
1923: PRIMARY_ITEM_ID,
1924: START_QUANTITY - L_SCRAP_ADJUST_QTY, --> reducing the WIP_JOB qty to (repair_po_qty - scrap or adjustment qty)
1925: decode(FINAL_COMPLETION_FLAG,'Y',4,3), --> Status type: 3 Released, 4 Complete
1926: --FIRST_UNIT_START_DATE,
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,
2034: p_doc_num =>null,
2035: p_release_id =>null,
2036: p_release_num =>null,
2128: END IF;
2129:
2130: x_return_status := l_return_status;
2131:
2132: /** Standard call to get message count and if count is 1, get message info */
2133: FND_MSG_PUB.Count_And_Get
2134: (p_count => x_msg_count,
2135: p_data => x_msg_data
2136: );