[Home] [Help]
114: l_api_version CONSTANT NUMBER := 1.0;
115:
116: -- vmutyala changed the cursor get_rcv_transactions to fetch transactions from
117: -- rcv_transactions and rcv_staging_table only if the Shipment_ID of the
118: -- transaction in RCV_STAGING_TABLE exists in jmf_subcontract_orders Bug 4670527
119:
120:
121:
122: CURSOR get_rcv_transactions_case1 IS
130: AND rst.transaction_group_id = p_group_id
131: AND rst.team = g_team_name
132: AND EXISTS(
133: SELECT 1
134: FROM jmf_subcontract_orders jso
135: WHERE rt.SOURCE_DOCUMENT_CODE = 'PO'
136: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = rt.PO_LINE_LOCATION_ID
137: UNION
138: SELECT 1
154: AND rst.transaction_request_id = p_request_id
155: AND rst.team = g_team_name
156: AND EXISTS(
157: SELECT 1
158: FROM jmf_subcontract_orders jso
159: WHERE rt.SOURCE_DOCUMENT_CODE = 'PO'
160: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = rt.PO_LINE_LOCATION_ID
161: UNION
162: SELECT 1
177: AND rst.transaction_group_id = p_group_id
178: AND rst.team = g_team_name
179: AND EXISTS(
180: SELECT 1
181: FROM jmf_subcontract_orders jso
182: WHERE rt.SOURCE_DOCUMENT_CODE = 'PO'
183: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = rt.PO_LINE_LOCATION_ID
184: UNION
185: SELECT 1
199: WHERE rst.transaction_id = rt.transaction_id
200: AND rst.team = g_team_name
201: AND EXISTS(
202: SELECT 1
203: FROM jmf_subcontract_orders jso
204: WHERE rt.SOURCE_DOCUMENT_CODE = 'PO'
205: AND jso.SUBCONTRACT_PO_SHIPMENT_ID = rt.PO_LINE_LOCATION_ID
206: UNION
207: SELECT 1
630: -- Perform Misc Recceipt
631: --3. If Transaction Type is 'RECEIVE' or 'DELIVER'
632: -- Perform WIP Completion and back flush
633: -- Perform Misc Issue
634: --4. Update Interlock_status in JMF_SUBCONTRACT_ORDERS with either 'C' or 'E'
635: -- in case of success or error respectively.
636: --========================================================================
637: PROCEDURE Process_Osa_Receipt
638: ( p_api_version IN NUMBER
699:
700: -- Get primary UOM of OSA item.
701: select JSO.OSA_ITEM_ID, JMF_SHIKYU_UTIL.Get_Primary_Uom_Code(JSO.OSA_ITEM_ID, JSO.OEM_ORGANIZATION_ID)
702: into l_osa_item_id, l_osa_item_primary_uom
703: from JMF_SUBCONTRACT_ORDERS JSO
704: where JSO.SUBCONTRACT_PO_SHIPMENT_ID = p_po_shipment_id;
705:
706: -- Convert received quantity into primary UOM
707: IF (l_osa_item_primary_uom <> p_uom) THEN
833: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
834: raise FND_API.G_EXC_ERROR;
835: END IF;
836:
837: -- Update Interlock Shikyu status as Completed in JMF_SUBCONTRACT_ORDERS
838: UPDATE JMF_SUBCONTRACT_ORDERS SET interlock_status = 'C'
839: , LAST_UPDATE_DATE = sysdate
840: , LAST_UPDATED_BY = FND_GLOBAL.user_id
841: , LAST_UPDATE_LOGIN = FND_GLOBAL.login_id
834: raise FND_API.G_EXC_ERROR;
835: END IF;
836:
837: -- Update Interlock Shikyu status as Completed in JMF_SUBCONTRACT_ORDERS
838: UPDATE JMF_SUBCONTRACT_ORDERS SET interlock_status = 'C'
839: , LAST_UPDATE_DATE = sysdate
840: , LAST_UPDATED_BY = FND_GLOBAL.user_id
841: , LAST_UPDATE_LOGIN = FND_GLOBAL.login_id
842: WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_po_shipment_id;
1598:
1599: -- cursor definitions
1600: cursor c_subcontract_po_shikyu_comp is
1601: select jsc.SHIKYU_COMPONENT_ID shikyu_component_id, jso.TP_ORGANIZATION_ID tp_organization_id, jsc.PRIMARY_UOM primary_uom
1602: from JMF_SHIKYU_COMPONENTS jsc, JMF_SUBCONTRACT_ORDERS jso
1603: where jsc.SUBCONTRACT_PO_SHIPMENT_ID = p_po_shipment_id
1604: and jso.subcontract_po_shipment_id = jsc.SUBCONTRACT_PO_SHIPMENT_ID;
1605:
1606: BEGIN
1609: x_return_flag := 0;
1610:
1611: SELECT interlock_status
1612: into l_interlock_status
1613: FROM JMF_SUBCONTRACT_ORDERS
1614: WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_po_shipment_id;
1615:
1616: -- AND NVL(project_id, -1)= NVL(p_project_id, -1)
1617: -- AND NVL(task_id, -1)= NVL(p_task_id, -1);