eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.CSP_REPAIR_PO_PVT dependencies on CSP_REPAIR_PO_HEADERS

Line 42: CURSOR C_CSP_REPAIR_PO_HEADERS(l_status NUMBER) IS

38: p_repair_po_header_id IN NUMBER default null
39: )
40: IS
41:
42: CURSOR C_CSP_REPAIR_PO_HEADERS(l_status NUMBER) IS
43: SELECT *
44: FROM CSP_REPAIR_PO_HEADERS
45: WHERE STATUS = l_status
46: ORDER BY REPAIR_PO_HEADER_ID

Line 44: FROM CSP_REPAIR_PO_HEADERS

40: IS
41:
42: CURSOR C_CSP_REPAIR_PO_HEADERS(l_status NUMBER) IS
43: SELECT *
44: FROM CSP_REPAIR_PO_HEADERS
45: WHERE STATUS = l_status
46: ORDER BY REPAIR_PO_HEADER_ID
47: FOR UPDATE OF STATUS;
48:

Line 50: CURSOR CSP_REPAIR_PO_HEADERS_ROW(l_status NUMBER) IS

46: ORDER BY REPAIR_PO_HEADER_ID
47: FOR UPDATE OF STATUS;
48:
49: /** Instead of FOR UPDATE selecting rowid which helps to update the current row and do commit inside the loop **/
50: CURSOR CSP_REPAIR_PO_HEADERS_ROW(l_status NUMBER) IS
51: SELECT rowid, CRPH.*
52: FROM CSP_REPAIR_PO_HEADERS CRPH
53: WHERE STATUS = l_status
54: ORDER BY REPAIR_PO_HEADER_ID;

Line 52: FROM CSP_REPAIR_PO_HEADERS CRPH

48:
49: /** Instead of FOR UPDATE selecting rowid which helps to update the current row and do commit inside the loop **/
50: CURSOR CSP_REPAIR_PO_HEADERS_ROW(l_status NUMBER) IS
51: SELECT rowid, CRPH.*
52: FROM CSP_REPAIR_PO_HEADERS CRPH
53: WHERE STATUS = l_status
54: ORDER BY REPAIR_PO_HEADER_ID;
55:
56: CURSOR PO_REQ_INTERFACE_ALL(l_requisition_number NUMBER,l_requisition_line_id NUMBER) IS

Line 80: FROM CSP_REPAIR_PO_HEADERS CRH, CSP_REPAIR_PO_LINES CRL

76: PLL.PO_HEADER_ID = POH.PO_HEADER_ID;
77:
78: CURSOR CSP_RESERVED_LINES(L_REPAIR_PO_HEADER_ID NUMBER) IS
79: SELECT CRL.*, CRH.dest_organization_id
80: FROM CSP_REPAIR_PO_HEADERS CRH, CSP_REPAIR_PO_LINES CRL
81: WHERE CRL.REPAIR_PO_HEADER_ID = L_REPAIR_PO_HEADER_ID
82: AND CRL.REPAIR_PO_HEADER_ID = CRH.REPAIR_PO_HEADER_ID;
83:
84: /*

Line 140: FROM CSP_REPAIR_PO_HEADERS CRPH, CSP_REPAIR_PO_LINES CRPL

136: CRPL.quantity defect_qty,
137: CRPL.received_qty defect_received_qty,
138: CRPL.SCRAP_QTY,
139: CRPL.ADJUSTED_QTY
140: FROM CSP_REPAIR_PO_HEADERS CRPH, CSP_REPAIR_PO_LINES CRPL
141: WHERE CRPH.REPAIR_PO_HEADER_ID = L_REPAIR_PO_HEADER_ID
142: AND CRPH.status = 8
143: AND CRPH.repair_po_header_id = CRPL.repair_po_header_id
144: AND CRPL.inventory_item_id = L_SCRAP_ITEM_ID;

Line 283: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(1)

279: If that is true or record is moved to PO_REQUISITION_HEADERS_ALL then update the status = 2
280: else keep status = 1 as it may be still 'IN PROCESS' (or) 'REJECTED' (or) other status
281: **/
282:
283: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(1)
284: LOOP
285: OPEN PO_REQ_INTERFACE_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID);
286: LOOP
287: FETCH PO_REQ_INTERFACE_ALL INTO L_authorization_status, L_req_number_segment1;

Line 285: OPEN PO_REQ_INTERFACE_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID);

281: **/
282:
283: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(1)
284: LOOP
285: OPEN PO_REQ_INTERFACE_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID);
286: LOOP
287: FETCH PO_REQ_INTERFACE_ALL INTO L_authorization_status, L_req_number_segment1;
288: IF (PO_REQ_INTERFACE_ALL%ROWCOUNT = 0) THEN
289: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2

Line 289: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2

285: OPEN PO_REQ_INTERFACE_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID);
286: LOOP
287: FETCH PO_REQ_INTERFACE_ALL INTO L_authorization_status, L_req_number_segment1;
288: IF (PO_REQ_INTERFACE_ALL%ROWCOUNT = 0) THEN
289: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2
290: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
291:
292: EXIT;
293: ELSIF PO_REQ_INTERFACE_ALL%FOUND and NVL(L_authorization_status,'APPROVED') = 'APPROVED' THEN

Line 290: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

286: LOOP
287: FETCH PO_REQ_INTERFACE_ALL INTO L_authorization_status, L_req_number_segment1;
288: IF (PO_REQ_INTERFACE_ALL%ROWCOUNT = 0) THEN
289: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2
290: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
291:
292: EXIT;
293: ELSIF PO_REQ_INTERFACE_ALL%FOUND and NVL(L_authorization_status,'APPROVED') = 'APPROVED' THEN
294: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2

Line 294: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2

290: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
291:
292: EXIT;
293: ELSIF PO_REQ_INTERFACE_ALL%FOUND and NVL(L_authorization_status,'APPROVED') = 'APPROVED' THEN
294: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2
295: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
296:
297: EXIT;
298: ELSE

Line 295: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

291:
292: EXIT;
293: ELSIF PO_REQ_INTERFACE_ALL%FOUND and NVL(L_authorization_status,'APPROVED') = 'APPROVED' THEN
294: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 2
295: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
296:
297: EXIT;
298: ELSE
299: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 1

Line 299: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 1

295: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
296:
297: EXIT;
298: ELSE
299: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 1
300: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
301:
302: EXIT;
303: END IF;

Line 300: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

296:
297: EXIT;
298: ELSE
299: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 1
300: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
301:
302: EXIT;
303: END IF;
304: END LOOP;

Line 323: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(2)

319: else keep status = 2 as it may be still in 'IN PROCESS' (or) 'REJECTED' (or) other status
320: **/
321: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
322:
323: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(2)
324: LOOP
325: FOR PO_REQ_HEADERS_ALL_rec IN PO_REQ_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
326: LOOP
327: If PO_REQ_HEADERS_ALL_rec.AUTHORIZATION_STATUS = 'APPROVED' then

Line 325: FOR PO_REQ_HEADERS_ALL_rec IN PO_REQ_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)

321: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
322:
323: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(2)
324: LOOP
325: FOR PO_REQ_HEADERS_ALL_rec IN PO_REQ_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
326: LOOP
327: If PO_REQ_HEADERS_ALL_rec.AUTHORIZATION_STATUS = 'APPROVED' then
328: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 3,REQUISITION_HEADER_ID = PO_REQ_HEADERS_ALL_rec.REQUISITION_HEADER_ID
329: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

Line 328: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 3,REQUISITION_HEADER_ID = PO_REQ_HEADERS_ALL_rec.REQUISITION_HEADER_ID

324: LOOP
325: FOR PO_REQ_HEADERS_ALL_rec IN PO_REQ_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
326: LOOP
327: If PO_REQ_HEADERS_ALL_rec.AUTHORIZATION_STATUS = 'APPROVED' then
328: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 3,REQUISITION_HEADER_ID = PO_REQ_HEADERS_ALL_rec.REQUISITION_HEADER_ID
329: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
330: End if;
331: END LOOP;
332: END LOOP;

Line 329: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

325: FOR PO_REQ_HEADERS_ALL_rec IN PO_REQ_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_NUMBER, CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
326: LOOP
327: If PO_REQ_HEADERS_ALL_rec.AUTHORIZATION_STATUS = 'APPROVED' then
328: UPDATE CSP_REPAIR_PO_HEADERS SET STATUS = 3,REQUISITION_HEADER_ID = PO_REQ_HEADERS_ALL_rec.REQUISITION_HEADER_ID
329: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
330: End if;
331: END LOOP;
332: END LOOP;
333:

Line 348: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(3)

344: **/
345:
346: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
347:
348: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(3)
349: LOOP
350: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
351: LOOP
352: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'OPEN'

Line 350: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)

346: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
347:
348: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(3)
349: LOOP
350: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
351: LOOP
352: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'OPEN'
353: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'OPEN' then
354: UPDATE CSP_REPAIR_PO_HEADERS

Line 354: UPDATE CSP_REPAIR_PO_HEADERS

350: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
351: LOOP
352: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'OPEN'
353: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'OPEN' then
354: UPDATE CSP_REPAIR_PO_HEADERS
355: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
356: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 4
357: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
358: Elsif NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'

Line 357: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

353: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'OPEN' then
354: UPDATE CSP_REPAIR_PO_HEADERS
355: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
356: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 4
357: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
358: Elsif NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'
359: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
360: UPDATE CSP_REPAIR_PO_HEADERS
361: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,

Line 360: UPDATE CSP_REPAIR_PO_HEADERS

356: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 4
357: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
358: Elsif NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'
359: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
360: UPDATE CSP_REPAIR_PO_HEADERS
361: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
362: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 5
363: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
364: End if;

Line 363: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

359: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
360: UPDATE CSP_REPAIR_PO_HEADERS
361: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
362: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 5
363: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
364: End if;
365: END LOOP;
366: END LOOP;
367:

Line 381: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(4)

377: **/
378:
379: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
380:
381: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(4)
382: LOOP
383: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
384: LOOP
385: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'

Line 383: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)

379: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
380:
381: FOR CSP_REPAIR_PO_HEADERS_rec IN C_CSP_REPAIR_PO_HEADERS(4)
382: LOOP
383: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
384: LOOP
385: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'
386: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
387: UPDATE CSP_REPAIR_PO_HEADERS

Line 387: UPDATE CSP_REPAIR_PO_HEADERS

383: FOR PO_HEADERS_ALL_rec IN PO_HEADERS_ALL(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
384: LOOP
385: If NVL(PO_HEADERS_ALL_rec.CLOSED_CODE,'OPEN') = 'APPROVED'
386: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
387: UPDATE CSP_REPAIR_PO_HEADERS
388: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
389: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 5
390: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
391: End if;

Line 390: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

386: OR NVL(PO_HEADERS_ALL_rec.AUTHORIZATION_STATUS,'OPEN') = 'APPROVED' then
387: UPDATE CSP_REPAIR_PO_HEADERS
388: SET PURCHASE_ORDER_HEADER_ID = PO_HEADERS_ALL_rec.PO_HEADER_ID,
389: PO_NUMBER = PO_HEADERS_ALL_rec.SEGMENT1, STATUS = 5
390: WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
391: End if;
392: END LOOP;
393: END LOOP;
394:

Line 420: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(5)

416: MO_GLOBAL.init('CSF');
417:
418: --SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
419:
420: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(5)
421: LOOP
422:
423: SAVEPOINT RUN_REPAIR_EXECUTION_PVT; /* Create this save point if the commit not exits the loop */
424:

Line 425: If (CSP_REPAIR_PO_HEADERS_rec.STATUS = 5 AND

421: LOOP
422:
423: SAVEPOINT RUN_REPAIR_EXECUTION_PVT; /* Create this save point if the commit not exits the loop */
424:
425: If (CSP_REPAIR_PO_HEADERS_rec.STATUS = 5 AND
426: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID IS NULL) Then
427: --AND CSP_REPAIR_PO_HEADERS_rec.REPAIR_PROGRAM ='3') Then -- 'Repair Return'
428:
429: I := 1;

Line 426: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID IS NULL) Then

422:
423: SAVEPOINT RUN_REPAIR_EXECUTION_PVT; /* Create this save point if the commit not exits the loop */
424:
425: If (CSP_REPAIR_PO_HEADERS_rec.STATUS = 5 AND
426: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID IS NULL) Then
427: --AND CSP_REPAIR_PO_HEADERS_rec.REPAIR_PROGRAM ='3') Then -- 'Repair Return'
428:
429: I := 1;
430:

Line 427: --AND CSP_REPAIR_PO_HEADERS_rec.REPAIR_PROGRAM ='3') Then -- 'Repair Return'

423: SAVEPOINT RUN_REPAIR_EXECUTION_PVT; /* Create this save point if the commit not exits the loop */
424:
425: If (CSP_REPAIR_PO_HEADERS_rec.STATUS = 5 AND
426: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID IS NULL) Then
427: --AND CSP_REPAIR_PO_HEADERS_rec.REPAIR_PROGRAM ='3') Then -- 'Repair Return'
428:
429: I := 1;
430:
431: FOR CSP_RESERVED_LINES_rec IN CSP_RESERVED_LINES(CSP_REPAIR_PO_HEADERS_rec.REPAIR_PO_HEADER_ID)

Line 431: FOR CSP_RESERVED_LINES_rec IN CSP_RESERVED_LINES(CSP_REPAIR_PO_HEADERS_rec.REPAIR_PO_HEADER_ID)

427: --AND CSP_REPAIR_PO_HEADERS_rec.REPAIR_PROGRAM ='3') Then -- 'Repair Return'
428:
429: I := 1;
430:
431: FOR CSP_RESERVED_LINES_rec IN CSP_RESERVED_LINES(CSP_REPAIR_PO_HEADERS_rec.REPAIR_PO_HEADER_ID)
432: LOOP
433:
434: CSP_REPAIR_PO_GRP.GET_ITEM_DETAILS
435: (CSP_RESERVED_LINES_rec.defective_organization_id

Line 493: l_dest_organization_id := CSP_REPAIR_PO_HEADERS_rec.REPAIR_SUPPLIER_ORG_ID;

489:
490: End if;
491: END LOOP;
492:
493: l_dest_organization_id := CSP_REPAIR_PO_HEADERS_rec.REPAIR_SUPPLIER_ORG_ID;
494: l_need_by_date := SYSDATE; /* CSP_REPAIR_PO_HEADERS_rec.need_by_date; */
495:
496: /** 1.( Need_by_date of repair-to_item at dest org ) -
497: (Transit time between repair supplier org to dest org)

Line 494: l_need_by_date := SYSDATE; /* CSP_REPAIR_PO_HEADERS_rec.need_by_date; */

490: End if;
491: END LOOP;
492:
493: l_dest_organization_id := CSP_REPAIR_PO_HEADERS_rec.REPAIR_SUPPLIER_ORG_ID;
494: l_need_by_date := SYSDATE; /* CSP_REPAIR_PO_HEADERS_rec.need_by_date; */
495:
496: /** 1.( Need_by_date of repair-to_item at dest org ) -
497: (Transit time between repair supplier org to dest org)
498: = Completion Date of repair-to_item at repair supplier org.

Line 570: UPDATE CSP_REPAIR_PO_HEADERS

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,
572: STATUS = 6
573: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
574: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

Line 573: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;

569:
570: UPDATE CSP_REPAIR_PO_HEADERS
571: SET INTERNAL_ORDER_HEADER_ID = l_header_rec.order_header_id,
572: STATUS = 6
573: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
574: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
575:
576: COMMIT; /* Do this commit if it is not exits the loop */
577:

Line 574: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

570: UPDATE CSP_REPAIR_PO_HEADERS
571: SET INTERNAL_ORDER_HEADER_ID = l_header_rec.order_header_id,
572: STATUS = 6
573: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
574: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
575:
576: COMMIT; /* Do this commit if it is not exits the loop */
577:
578: End if;

Line 598: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(I)

594: --SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
595:
596: For I in 6..8 Loop
597:
598: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(I)
599: LOOP
600: /**Loop through each IO Lines for the Internal_order created and
601: then check QTY_RECEIVED > 0
602: **/

Line 604: FOR IO_QTY_RECEIVED_CHECK_REC IN IO_QTY_RECEIVED_CHECK(CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID)

600: /**Loop through each IO Lines for the Internal_order created and
601: then check QTY_RECEIVED > 0
602: **/
603:
604: FOR IO_QTY_RECEIVED_CHECK_REC IN IO_QTY_RECEIVED_CHECK(CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID)
605: LOOP
606:
607: SAVEPOINT RUN_REPAIR_EXECUTION_PVT; /* Create this save point if the commit not exits the loop */
608:

Line 621: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);

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;
625: Add_Err_Msg;

Line 630: OR NVL (IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED, 0) > 0) and CSP_REPAIR_PO_HEADERS_rec.status = 6)

626: g_retcode := 1;
627: END IF;
628:
629: IF ((NVL (IO_QTY_RECEIVED_CHECK_REC.QUANTITY_DELIVERED, 0) > 0
630: OR NVL (IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED, 0) > 0) and CSP_REPAIR_PO_HEADERS_rec.status = 6)
631: THEN
632: SELECT PLL.quantity_received,
633: PRL.closed_code,
634: POH.po_header_id,

Line 651: CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID

647: PO_LINE_LOCATIONS_ALL PLL,
648: PO_LINES_ALL POL,
649: PO_HEADERS_ALL POH
650: WHERE PRL.REQUISITION_LINE_ID =
651: CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID
652: AND PRL.LINE_LOCATION_ID = PLL.LINE_LOCATION_ID
653: AND PLL.PO_LINE_ID = POL.PO_LINE_ID
654: AND PLL.PO_HEADER_ID = POH.PO_HEADER_ID;
655:

Line 660: CSP_REPAIR_PO_HEADERS_rec.PURCHASE_ORDER_HEADER_ID;

656: mo_global.init ('PO');
657: mo_global.set_policy_context ('S', lc_org_id);
658:
659: l_po_header_id :=
660: CSP_REPAIR_PO_HEADERS_rec.PURCHASE_ORDER_HEADER_ID;
661: l_po_release_id := NULL;
662:
663: poLineIdTbl.EXTEND;
664: poLineIdTbl (1) := L_po_line_id; --Plug in the appropriate PO Line Id here

Line 732: CSP_REPAIR_PO_HEADERS_rec.WIP_ID IS NULL THEN

728: END IF;
729: END IF;
730:
731: If nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) > 0 and
732: CSP_REPAIR_PO_HEADERS_rec.WIP_ID IS NULL THEN
733: /** Create a WIB_JOB if there is no WIB_JOB created for this INTERNAL_ORDER so far **/
734:
735: select WIP_JOB_SCHEDULE_INTERFACE_S.nextval
736: into l_WIP_BATCH_ID

Line 747: WHERE ORGANIZATION_ID = CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

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
751: WHEN NO_DATA_FOUND THEN

Line 756: L_ORGANIZATION_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);

752: L_CLASS_CODE := NULL;
753: End;
754:
755: If L_CLASS_CODE is null then
756: L_ORGANIZATION_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);
757: FND_MESSAGE.SET_NAME ('CSP','CSP_NO_WIP_CLASS_CODE');
758: FND_MESSAGE.SET_TOKEN ('REPAIR_SUPPLIER_ORG', L_ORGANIZATION_NAME, TRUE);
759: FND_MSG_PUB.ADD;
760: Add_Err_Msg;

Line 796: CSP_REPAIR_PO_HEADERS_rec.INTERNAL_ORDER_HEADER_ID, --> (or) Pass CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

792: sysdate,
793: l_user_id,
794: l_WIP_BATCH_ID,
795: 'CSP',
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

Line 799: CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id,

795: 'CSP',
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

Line 801: CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_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
805: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> FIRST_UNIT_COMPLETION_DATE,

Line 802: nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0),--CSP_REPAIR_PO_HEADERS_rec.QUANTITY,

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
805: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> FIRST_UNIT_COMPLETION_DATE,
806: SYSDATE, --> LAST_UNIT_START_DATE

Line 805: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> FIRST_UNIT_COMPLETION_DATE,

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
805: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> FIRST_UNIT_COMPLETION_DATE,
806: SYSDATE, --> LAST_UNIT_START_DATE
807: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> LAST_UNIT_COMPLETION_DATE
808: L_CLASS_CODE, --> 'Expense'
809: l_WIP_ENTITY_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"

Line 807: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> LAST_UNIT_COMPLETION_DATE

803: 3, --> Status type: 3 Released, 4 Complete, 12 closed
804: SYSDATE, --> FIRST_UNIT_START_DATE
805: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> FIRST_UNIT_COMPLETION_DATE,
806: SYSDATE, --> LAST_UNIT_START_DATE
807: CSP_REPAIR_PO_HEADERS_rec.NEED_BY_DATE, --> LAST_UNIT_COMPLETION_DATE
808: L_CLASS_CODE, --> 'Expense'
809: l_WIP_ENTITY_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"
810: 'REPAIR_EXECUTION'||l_WIP_ENTITY_ID --> Pass existing job name(WIP_ENTITY_NAME) for update job status to "Complete"
811: --1

Line 878: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_ISSUE'

874: , p_transfer_to_organization => null
875: , p_online_process_flag => TRUE
876: , p_transaction_source_id => l_WIP_ENTITY_ID
877: , p_trx_source_line_id => null
878: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_ISSUE'
879: , p_waybill_airbill => null
880: , p_shipment_number => null
881: , p_freight_code => null
882: , p_reason_id => null

Line 883: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

879: , p_waybill_airbill => null
880: , p_shipment_number => null
881: , p_freight_code => null
882: , p_reason_id => null
883: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
884: , p_expected_delivery_date => null
885: , x_return_status => l_return_status
886: , x_msg_count => l_msg_count
887: , x_msg_data => l_msg_data

Line 899: UPDATE CSP_REPAIR_PO_HEADERS

895: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;
896: End if;
897:
898: /* STATUS = 8 => 'WIP_JOB_CREATED' by WIP MASS LOAD PROGRAM */
899: UPDATE CSP_REPAIR_PO_HEADERS
900: SET WIP_ID = l_WIP_ENTITY_ID, STATUS = 8
901: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
902: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
903:

Line 901: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;

897:
898: /* STATUS = 8 => 'WIP_JOB_CREATED' by WIP MASS LOAD PROGRAM */
899: UPDATE CSP_REPAIR_PO_HEADERS
900: SET WIP_ID = l_WIP_ENTITY_ID, STATUS = 8
901: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
902: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
903:
904: UPDATE WIP_REQUIREMENT_OPERATIONS
905: SET QUANTITY_PER_ASSEMBLY = 1

Line 902: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

898: /* STATUS = 8 => 'WIP_JOB_CREATED' by WIP MASS LOAD PROGRAM */
899: UPDATE CSP_REPAIR_PO_HEADERS
900: SET WIP_ID = l_WIP_ENTITY_ID, STATUS = 8
901: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
902: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
903:
904: UPDATE WIP_REQUIREMENT_OPERATIONS
905: SET QUANTITY_PER_ASSEMBLY = 1
906: WHERE INVENTORY_ITEM_ID = IO_QTY_RECEIVED_CHECK_REC.item_id

Line 912: UPDATE CSP_REPAIR_PO_HEADERS

908: AND WIP_ENTITY_ID = l_WIP_ENTITY_ID ;
909:
910: Else
911: /* STATUS = 7 => Inserted into 'WIP_JOB_SCHEDULE_INTERFACE' */
912: UPDATE CSP_REPAIR_PO_HEADERS
913: SET WIP_ID = l_WIP_ENTITY_ID_INTERFACE, STATUS = 7
914: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
915: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
916: End if;

Line 914: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;

910: Else
911: /* STATUS = 7 => Inserted into 'WIP_JOB_SCHEDULE_INTERFACE' */
912: UPDATE CSP_REPAIR_PO_HEADERS
913: SET WIP_ID = l_WIP_ENTITY_ID_INTERFACE, STATUS = 7
914: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
915: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
916: End if;
917:
918: UPDATE CSP_REPAIR_PO_LINES

Line 915: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

911: /* STATUS = 7 => Inserted into 'WIP_JOB_SCHEDULE_INTERFACE' */
912: UPDATE CSP_REPAIR_PO_HEADERS
913: SET WIP_ID = l_WIP_ENTITY_ID_INTERFACE, STATUS = 7
914: -- WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
915: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
916: End if;
917:
918: UPDATE CSP_REPAIR_PO_LINES
919: SET RECEIVED_QTY = IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED

Line 920: where repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

916: End if;
917:
918: UPDATE CSP_REPAIR_PO_LINES
919: SET RECEIVED_QTY = IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED
920: where repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
921: and inventory_item_id = IO_QTY_RECEIVED_CHECK_REC.item_id;
922:
923: COMMIT; /* Do this commit if it is not exits the loop */
924:

Line 926: Elsif CSP_REPAIR_PO_HEADERS_rec.WIP_ID IS NOT NULL THEN

922:
923: COMMIT; /* Do this commit if it is not exits the loop */
924:
925: /** Elseif WIB_JOB already created **/
926: Elsif CSP_REPAIR_PO_HEADERS_rec.WIP_ID IS NOT NULL THEN
927: --> Check if more parts are received by the following condition
928:
929: Begin
930: SELECT RECEIVED_QTY

Line 933: WHERE repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

929: Begin
930: SELECT RECEIVED_QTY
931: INTO l_RECEIVED_QTY
932: FROM CSP_REPAIR_PO_LINES
933: WHERE repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
934: and inventory_item_id = IO_QTY_RECEIVED_CHECK_REC.item_id;
935: Exception
936: when no_data_found then
937: l_RECEIVED_QTY := Null;

Line 944: Where wip_entity_id = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;

940: Begin
941: Select wip_entity_id
942: into l_wip_entity_id
943: from WIP_ENTITIES
944: Where wip_entity_id = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
945: --and wip_entity_name = 'REPAIR_EXECUTION'||l_WIP_ENTITY_ID;
946: Exception
947: when no_data_found then
948: l_wip_entity_id := Null;

Line 953: and CSP_REPAIR_PO_HEADERS_rec.STATUS = 8

949: End;
950:
951: /*** Added for bug 12621761 ***/
952: If nvl(l_RECEIVED_QTY,0) <= nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0)
953: and CSP_REPAIR_PO_HEADERS_rec.STATUS = 8
954: and l_wip_entity_id is not null then
955:
956: Update WIP_DISCRETE_JOBS
957: set START_QUANTITY = IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,

Line 959: Where WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;

955:
956: Update WIP_DISCRETE_JOBS
957: set START_QUANTITY = IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,
958: LAST_UPDATE_DATE = SYSDATE
959: Where WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
960: End if;
961: /*** End for bug 12621761 ***/
962:
963: /** 1.Check if

Line 972: and CSP_REPAIR_PO_HEADERS_rec.STATUS = 7)

968:
969: If ( nvl(l_RECEIVED_QTY,0) < nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0)
970: or
971: (nvl(l_RECEIVED_QTY,0) <= nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0)
972: and CSP_REPAIR_PO_HEADERS_rec.STATUS = 7)
973: )
974: and l_wip_entity_id is not null then
975:
976: /** Create Wip component issue transaction to the job

Line 985: If CSP_REPAIR_PO_HEADERS_rec.STATUS = 7 then

981: */
982:
983: l_wib_issue_qty := 0;
984:
985: If CSP_REPAIR_PO_HEADERS_rec.STATUS = 7 then
986: If nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) > nvl(l_RECEIVED_QTY,0) then
987: l_wib_issue_qty := nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0);
988: Elsif nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) = nvl(l_RECEIVED_QTY,0) then
989: l_wib_issue_qty := nvl(l_RECEIVED_QTY,0);

Line 1025: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_ISSUE'

1021: , p_transfer_to_organization => null
1022: , p_online_process_flag => TRUE
1023: , p_transaction_source_id => l_WIP_ENTITY_ID
1024: , p_trx_source_line_id => null
1025: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_ISSUE'
1026: , p_waybill_airbill => null
1027: , p_shipment_number => null
1028: , p_freight_code => null
1029: , p_reason_id => null

Line 1030: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

1026: , p_waybill_airbill => null
1027: , p_shipment_number => null
1028: , p_freight_code => null
1029: , p_reason_id => null
1030: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
1031: , p_expected_delivery_date => null
1032: , x_return_status => l_return_status
1033: , x_msg_count => l_msg_count
1034: , x_msg_data => l_msg_data

Line 1053: If CSP_REPAIR_PO_HEADERS_rec.STATUS = 7 THEN

1049: AND WIP_ENTITY_ID = l_WIP_ENTITY_ID ;
1050:
1051: End if;
1052:
1053: If CSP_REPAIR_PO_HEADERS_rec.STATUS = 7 THEN
1054: If nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) > nvl(l_RECEIVED_QTY,0) then
1055: l_wib_issue_qty := nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) - nvl(l_RECEIVED_QTY,0);
1056: Elsif nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) = nvl(l_RECEIVED_QTY,0) then
1057: l_wib_issue_qty := 0;

Line 1060: UPDATE CSP_REPAIR_PO_HEADERS

1056: Elsif nvl(IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED,0) = nvl(l_RECEIVED_QTY,0) then
1057: l_wib_issue_qty := 0;
1058: End if;
1059:
1060: UPDATE CSP_REPAIR_PO_HEADERS
1061: SET STATUS = 8
1062: --WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
1063: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1064: End if;

Line 1062: --WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;

1058: End if;
1059:
1060: UPDATE CSP_REPAIR_PO_HEADERS
1061: SET STATUS = 8
1062: --WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
1063: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1064: End if;
1065:
1066: UPDATE CSP_REPAIR_PO_LINES

Line 1063: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

1059:
1060: UPDATE CSP_REPAIR_PO_HEADERS
1061: SET STATUS = 8
1062: --WHERE CURRENT OF CSP_REPAIR_PO_HEADERS;
1063: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1064: End if;
1065:
1066: UPDATE CSP_REPAIR_PO_LINES
1067: SET RECEIVED_QTY = NVL(RECEIVED_QTY,0) + nvl(l_wib_issue_qty,0)

Line 1069: where repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

1065:
1066: UPDATE CSP_REPAIR_PO_LINES
1067: SET RECEIVED_QTY = NVL(RECEIVED_QTY,0) + nvl(l_wib_issue_qty,0)
1068: --SET RECEIVED_QTY = NVL(RECEIVED_QTY,0) + IO_QTY_RECEIVED_CHECK_REC.QUANTITY_RECEIVED
1069: where repair_po_header_id = CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
1070: and inventory_item_id = IO_QTY_RECEIVED_CHECK_REC.item_id;
1071:
1072: COMMIT; /* Do this commit if it is not exits the loop */
1073:

Line 1085: WHERE PRL.REQUISITION_LINE_ID = CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID AND

1081:
1082: SELECT PLL.quantity_received, PRL.closed_code, POH.po_header_id, PRL.Quantity, PLL.line_location_id, PLL.po_line_id,poh.org_id
1083: into L_quantity_received, L_closed_code, LC_po_header_id, L_PO_Quantity, L_line_location_id, L_po_line_id,lc_org_id
1084: FROM PO_REQUISITION_LINES_ALL PRL, PO_LINE_LOCATIONS_ALL PLL, PO_HEADERS_ALL POH
1085: WHERE PRL.REQUISITION_LINE_ID = CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID AND
1086: PRL.LINE_LOCATION_ID = PLL.LINE_LOCATION_ID AND
1087: PLL.PO_HEADER_ID = POH.PO_HEADER_ID;
1088:
1089: mo_global.init('PO');

Line 1092: l_po_header_id := CSP_REPAIR_PO_HEADERS_rec.PURCHASE_ORDER_HEADER_ID;

1088:
1089: mo_global.init('PO');
1090: mo_global.set_policy_context('S',lc_org_id);
1091:
1092: l_po_header_id := CSP_REPAIR_PO_HEADERS_rec.PURCHASE_ORDER_HEADER_ID;
1093: l_po_release_id := NULL;
1094:
1095: poLineIdTbl.extend;
1096: poLineIdTbl(1) := L_po_line_id; --Plug in the appropriate PO Line Id here

Line 1167: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(8)

1163: **/
1164:
1165: --SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
1166:
1167: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(8)
1168: LOOP
1169:
1170: FOR PO_REQ_RECEIVED_QTY_rec IN PO_REQ_RECEIVED_QTY(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
1171: LOOP

Line 1170: FOR PO_REQ_RECEIVED_QTY_rec IN PO_REQ_RECEIVED_QTY(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)

1166:
1167: FOR CSP_REPAIR_PO_HEADERS_rec IN CSP_REPAIR_PO_HEADERS_ROW(8)
1168: LOOP
1169:
1170: FOR PO_REQ_RECEIVED_QTY_rec IN PO_REQ_RECEIVED_QTY(CSP_REPAIR_PO_HEADERS_rec.REQUISITION_LINE_ID)
1171: LOOP
1172:
1173: SAVEPOINT RUN_REPAIR_EXECUTION_PVT;
1174:

Line 1183: where REPAIR_PO_HEADER_ID = CSP_REPAIR_PO_HEADERS_rec.REPAIR_PO_HEADER_ID

1179: /*
1180: Select sum(nvl(scrap_qty,0) + nvl(adjusted_qty,0))
1181: into l_total_scrap_adjust_qty
1182: from CSP_REPAIR_PO_LINES
1183: where REPAIR_PO_HEADER_ID = CSP_REPAIR_PO_HEADERS_rec.REPAIR_PO_HEADER_ID
1184: group by REPAIR_PO_HEADER_ID;
1185: */
1186:
1187: SELECT START_QUANTITY,QUANTITY_SCRAPPED

Line 1190: WHERE CSP_REPAIR_PO_HEADERS_REC.WIP_ID = WIP_ENTITY_ID;

1186:
1187: SELECT START_QUANTITY,QUANTITY_SCRAPPED
1188: INTO L_WIP_START_QUANTITY, L_WIP_QUANTITY_SCRAPPED
1189: FROM WIP_DISCRETE_JOBS
1190: WHERE CSP_REPAIR_PO_HEADERS_REC.WIP_ID = WIP_ENTITY_ID;
1191:
1192: L_WIP_REMAIN_QTY := NVL(L_WIP_START_QUANTITY,0) - (NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0));
1193:
1194: l_usable_subinv := FND_PROFILE.value(NAME => 'CSP_REPAIR_SUP_ORG_USABLE_SUBINV');

Line 1192: L_WIP_REMAIN_QTY := NVL(L_WIP_START_QUANTITY,0) - (NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0));

1188: INTO L_WIP_START_QUANTITY, L_WIP_QUANTITY_SCRAPPED
1189: FROM WIP_DISCRETE_JOBS
1190: WHERE CSP_REPAIR_PO_HEADERS_REC.WIP_ID = WIP_ENTITY_ID;
1191:
1192: L_WIP_REMAIN_QTY := NVL(L_WIP_START_QUANTITY,0) - (NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0));
1193:
1194: l_usable_subinv := FND_PROFILE.value(NAME => 'CSP_REPAIR_SUP_ORG_USABLE_SUBINV');
1195:
1196: IF ( L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) <= 0 )

Line 1196: IF ( L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) <= 0 )

1192: L_WIP_REMAIN_QTY := NVL(L_WIP_START_QUANTITY,0) - (NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0));
1193:
1194: l_usable_subinv := FND_PROFILE.value(NAME => 'CSP_REPAIR_SUP_ORG_USABLE_SUBINV');
1195:
1196: IF ( L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) <= 0 )
1197: OR
1198: ( CSP_REPAIR_PO_HEADERS_rec.quantity - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0)) <= 0 )
1199: THEN
1200: -- PO_REQ_RECEIVED_QTY_rec.quantity_received >= CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty then

Line 1198: ( CSP_REPAIR_PO_HEADERS_rec.quantity - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0)) <= 0 )

1194: l_usable_subinv := FND_PROFILE.value(NAME => 'CSP_REPAIR_SUP_ORG_USABLE_SUBINV');
1195:
1196: IF ( L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) <= 0 )
1197: OR
1198: ( CSP_REPAIR_PO_HEADERS_rec.quantity - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0)) <= 0 )
1199: THEN
1200: -- PO_REQ_RECEIVED_QTY_rec.quantity_received >= CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty then
1201: -- nvl(CSP_REPAIR_PO_HEADERS_rec.received_qty,0) = PO_REQ_RECEIVED_QTY_rec.quantity_received
1202:

Line 1200: -- PO_REQ_RECEIVED_QTY_rec.quantity_received >= CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty then

1196: IF ( L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) <= 0 )
1197: OR
1198: ( CSP_REPAIR_PO_HEADERS_rec.quantity - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0)) <= 0 )
1199: THEN
1200: -- PO_REQ_RECEIVED_QTY_rec.quantity_received >= CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty then
1201: -- nvl(CSP_REPAIR_PO_HEADERS_rec.received_qty,0) = PO_REQ_RECEIVED_QTY_rec.quantity_received
1202:
1203: FINAL_COMPLETION_FLAG := 'Y';
1204: l_wip_status_type := 4;

Line 1201: -- nvl(CSP_REPAIR_PO_HEADERS_rec.received_qty,0) = PO_REQ_RECEIVED_QTY_rec.quantity_received

1197: OR
1198: ( CSP_REPAIR_PO_HEADERS_rec.quantity - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) + NVL(L_WIP_QUANTITY_SCRAPPED,0)) <= 0 )
1199: THEN
1200: -- PO_REQ_RECEIVED_QTY_rec.quantity_received >= CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty then
1201: -- nvl(CSP_REPAIR_PO_HEADERS_rec.received_qty,0) = PO_REQ_RECEIVED_QTY_rec.quantity_received
1202:
1203: FINAL_COMPLETION_FLAG := 'Y';
1204: l_wip_status_type := 4;
1205: Else

Line 1210: (CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

1206: FINAL_COMPLETION_FLAG := 'N';
1207: End if;
1208:
1209: CSP_REPAIR_PO_GRP.GET_ITEM_DETAILS
1210: (CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id
1211: ,CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID
1212: ,x_item_number
1213: ,x_item_description
1214: ,l_primary_uom_code

Line 1211: ,CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID

1207: End if;
1208:
1209: CSP_REPAIR_PO_GRP.GET_ITEM_DETAILS
1210: (CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id
1211: ,CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID
1212: ,x_item_number
1213: ,x_item_description
1214: ,l_primary_uom_code
1215: ,x_return_status

Line 1221: L_ORG_NAME := CSP_REPAIR_PO_GRP.GET_ORGANIZATION_NAME(CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id);

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;
1225: Add_Err_Msg;

Line 1229: IF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) > 0 THEN

1225: Add_Err_Msg;
1226: g_retcode := 1;
1227: END IF;
1228:
1229: IF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) > 0 THEN
1230: L_WIP_COMPLETE_QTY := NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0);
1231:
1232: ELSIF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) <= 0 THEN
1233: L_WIP_COMPLETE_QTY := L_WIP_REMAIN_QTY;

Line 1230: L_WIP_COMPLETE_QTY := NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0);

1226: g_retcode := 1;
1227: END IF;
1228:
1229: IF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) > 0 THEN
1230: L_WIP_COMPLETE_QTY := NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0);
1231:
1232: ELSIF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) <= 0 THEN
1233: L_WIP_COMPLETE_QTY := L_WIP_REMAIN_QTY;
1234:

Line 1232: ELSIF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) <= 0 THEN

1228:
1229: IF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) > 0 THEN
1230: L_WIP_COMPLETE_QTY := NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0);
1231:
1232: ELSIF (L_WIP_REMAIN_QTY - (NVL(PO_REQ_RECEIVED_QTY_REC.QUANTITY_RECEIVED,0) - NVL(CSP_REPAIR_PO_HEADERS_REC.RECEIVED_QTY,0)) ) <= 0 THEN
1233: L_WIP_COMPLETE_QTY := L_WIP_REMAIN_QTY;
1234:
1235: END IF;
1236:

Line 1243: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID

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
1245: , p_subinventory_code => l_usable_subinv
1246: , p_locator_id => null
1247: , p_lot_number => null

Line 1244: , p_organization_id => CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

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
1245: , p_subinventory_code => l_usable_subinv
1246: , p_locator_id => null
1247: , p_lot_number => null
1248: , p_lot_expiration_date => NULL

Line 1262: , p_transaction_source_id => CSP_REPAIR_PO_HEADERS_rec.wip_id

1258: , p_transfer_to_subinventory => null
1259: , p_transfer_to_locator => null
1260: , p_transfer_to_organization => null
1261: , p_online_process_flag => TRUE
1262: , p_transaction_source_id => CSP_REPAIR_PO_HEADERS_rec.wip_id
1263: , p_trx_source_line_id => null
1264: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_COMPLETE'
1265: , p_waybill_airbill => NULL
1266: , p_shipment_number => NULL

Line 1264: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_COMPLETE'

1260: , p_transfer_to_organization => null
1261: , p_online_process_flag => TRUE
1262: , p_transaction_source_id => CSP_REPAIR_PO_HEADERS_rec.wip_id
1263: , p_trx_source_line_id => null
1264: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_WIP_COMPLETE'
1265: , p_waybill_airbill => NULL
1266: , p_shipment_number => NULL
1267: , p_freight_code => NULL
1268: , p_reason_id => NULL

Line 1269: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

1265: , p_waybill_airbill => NULL
1266: , p_shipment_number => NULL
1267: , p_freight_code => NULL
1268: , p_reason_id => NULL
1269: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
1270: , p_expected_delivery_date => NULL
1271: , p_FINAL_COMPLETION_FLAG => 'N' --FINAL_COMPLETION_FLAG -- May need to add this parameter for wip complete
1272: , x_return_status => l_return_status
1273: , x_msg_count => l_msg_count

Line 1286: i.e PO_REQ_RECEIVED_QTY_rec.quantity_received = CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty

1282: ROLLBACK TO RUN_REPAIR_EXECUTION_PVT;
1283: End if;
1284:
1285: /** 1.We can do this insert (only) if FINAL_COMPLETION_FLAG = 'Y'
1286: i.e PO_REQ_RECEIVED_QTY_rec.quantity_received = CSP_REPAIR_PO_HEADERS_rec.quantity - l_total_scrap_adjust_qty
1287: But This Insert may not be needed if FINAL_COMPLETION_FLAG is passed as 'Y' in the above call
1288:
1289: 2.If we do this insert then we could use the WIP api to update the WIP_JOB
1290: instead of using WIP_MASS_LOAD program form

Line 1344: CSP_REPAIR_PO_HEADERS_rec.WIP_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"

1340: --FIRST_UNIT_COMPLETION_DATE,
1341: --LAST_UNIT_START_DATE,
1342: --LAST_UNIT_COMPLETION_DATE,
1343: CLASS_CODE,
1344: CSP_REPAIR_PO_HEADERS_rec.WIP_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"
1345: 'REPAIR_EXECUTION'||CSP_REPAIR_PO_HEADERS_rec.WIP_ID --> Pass existing job name(WIP_ENTITY_NAME) for update job status to "Complete"
1346: FROM WIP_DISCRETE_JOBS
1347: WHERE WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
1348:

Line 1345: 'REPAIR_EXECUTION'||CSP_REPAIR_PO_HEADERS_rec.WIP_ID --> Pass existing job name(WIP_ENTITY_NAME) for update job status to "Complete"

1341: --LAST_UNIT_START_DATE,
1342: --LAST_UNIT_COMPLETION_DATE,
1343: CLASS_CODE,
1344: CSP_REPAIR_PO_HEADERS_rec.WIP_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"
1345: 'REPAIR_EXECUTION'||CSP_REPAIR_PO_HEADERS_rec.WIP_ID --> Pass existing job name(WIP_ENTITY_NAME) for update job status to "Complete"
1346: FROM WIP_DISCRETE_JOBS
1347: WHERE WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
1348:
1349: Exception

Line 1347: WHERE WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;

1343: CLASS_CODE,
1344: CSP_REPAIR_PO_HEADERS_rec.WIP_ID, --> Pass existing Wip_Entity_Id for update job status to "Complete"
1345: 'REPAIR_EXECUTION'||CSP_REPAIR_PO_HEADERS_rec.WIP_ID --> Pass existing job name(WIP_ENTITY_NAME) for update job status to "Complete"
1346: FROM WIP_DISCRETE_JOBS
1347: WHERE WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
1348:
1349: Exception
1350: When others then
1351: l_sqlcode := SQLCODE;

Line 1375: Where WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;

1371: Update WIP_DISCRETE_JOBS
1372: set --QUANTITY_COMPLETED = nvl(QUANTITY_COMPLETED,0) + PO_REQ_RECEIVED_QTY_rec.quantity_received,
1373: LAST_UPDATE_DATE = SYSDATE, STATUS_TYPE = nvl(l_wip_status_type,STATUS_TYPE),
1374: DATE_COMPLETED = DECODE(FINAL_COMPLETION_FLAG,'Y',SYSDATE,DATE_COMPLETED)
1375: Where WIP_ENTITY_ID = CSP_REPAIR_PO_HEADERS_rec.WIP_ID;
1376: */
1377: /** "MISCELLANEOUS ISSUE" : MATERIAL TRANSACTION : TRANSACTION_TYPE_ID (32): ----
1378: When PO qty is received and wip job qty is transacted to Usable Subinv through WIP Assembly Completion then
1379: From Repair Supplier Org's Usable Subinv do this "MISCELLANEOUS_ISSUE" MATERIAL TRANSACTION

Line 1388: , p_inventory_item_id => CSP_REPAIR_PO_HEADERS_rec.INVENTORY_ITEM_ID

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
1390: , p_subinventory_code => l_usable_subinv
1391: , p_locator_id => null
1392: , p_lot_number => null

Line 1389: , p_organization_id => CSP_REPAIR_PO_HEADERS_rec.repair_supplier_org_id

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
1390: , p_subinventory_code => l_usable_subinv
1391: , p_locator_id => null
1392: , p_lot_number => null
1393: , p_lot_expiration_date => NULL

Line 1409: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_MISC_ISSUE'

1405: , p_transfer_to_organization => null
1406: , p_online_process_flag => TRUE
1407: , p_transaction_source_id => null
1408: , p_trx_source_line_id => null
1409: , p_transaction_source_name => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id ||'REPAIR_PO_MISC_ISSUE'
1410: , p_waybill_airbill => null
1411: , p_shipment_number => null
1412: , p_freight_code => null
1413: , p_reason_id => null

Line 1414: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id

1410: , p_waybill_airbill => null
1411: , p_shipment_number => null
1412: , p_freight_code => null
1413: , p_reason_id => null
1414: , p_transaction_reference => CSP_REPAIR_PO_HEADERS_rec.repair_po_header_id
1415: , p_expected_delivery_date => null
1416: , x_return_status => l_return_status
1417: , x_msg_count => l_msg_count
1418: , x_msg_data => l_msg_data

Line 1433: UPDATE CSP_REPAIR_PO_HEADERS

1429: /** FINAL_COMPLETION_FLAG = 'Y' => Repair PO is Closed, WIP_JOB is Complete and ready to close
1430: FINAL_COMPLETION_FLAG = 'N' => Repair PO is not Closed, WIP_JOB is still open in released status_type
1431: **/
1432:
1433: UPDATE CSP_REPAIR_PO_HEADERS
1434: SET received_qty = nvl(received_qty,0)+L_WIP_COMPLETE_QTY,
1435: STATUS = decode(FINAL_COMPLETION_FLAG,'Y',9,8)
1436: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1437: --WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

Line 1436: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;

1432:
1433: UPDATE CSP_REPAIR_PO_HEADERS
1434: SET received_qty = nvl(received_qty,0)+L_WIP_COMPLETE_QTY,
1435: STATUS = decode(FINAL_COMPLETION_FLAG,'Y',9,8)
1436: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1437: --WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
1438:
1439: COMMIT; /* Do this commit if it is not exits the loop */
1440: --End if;

Line 1437: --WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;

1433: UPDATE CSP_REPAIR_PO_HEADERS
1434: SET received_qty = nvl(received_qty,0)+L_WIP_COMPLETE_QTY,
1435: STATUS = decode(FINAL_COMPLETION_FLAG,'Y',9,8)
1436: WHERE ROWID = CSP_REPAIR_PO_HEADERS_rec.ROWID;
1437: --WHERE CURRENT OF C_CSP_REPAIR_PO_HEADERS;
1438:
1439: COMMIT; /* Do this commit if it is not exits the loop */
1440: --End if;
1441:

Line 1579: FROM CSP_REPAIR_PO_HEADERS CRPH, CSP_REPAIR_PO_LINES CRPL

1575: CRPL.quantity defect_qty,
1576: CRPL.received_qty defect_received_qty,
1577: CRPL.SCRAP_QTY,
1578: CRPL.ADJUSTED_QTY
1579: FROM CSP_REPAIR_PO_HEADERS CRPH, CSP_REPAIR_PO_LINES CRPL
1580: WHERE CRPH.REPAIR_PO_HEADER_ID = L_REPAIR_PO_HEADER_ID
1581: AND CRPH.status = 8 --> WIP_JOB created in WIP_ENTITIES table
1582: AND CRPH.repair_po_header_id = CRPL.repair_po_header_id
1583: AND CRPL.inventory_item_id = L_SCRAP_ADJUST_ITEM_ID;

Line 1874: i.e CSP_REPAIR_PO_SCRAP_rec.received_qty = CSP_REPAIR_PO_HEADERS_rec.quantity - (L_SCRAP_ADJUST_QTY + l_total_scrap_adjust_qty)

1870: **/
1871:
1872: /**
1873: 1.We can do this insert (only) if FINAL_COMPLETION_FLAG= 'Y'
1874: i.e CSP_REPAIR_PO_SCRAP_rec.received_qty = CSP_REPAIR_PO_HEADERS_rec.quantity - (L_SCRAP_ADJUST_QTY + l_total_scrap_adjust_qty)
1875: But This Insert may not be needed if FINAL_COMPLETION_FLAG is passed as 'Y' in the above call
1876:
1877: 2.If we do this insert then we could use the WIP api to update the WIP_JOB instead of using WIP_MASS_LOAD program form
1878: 3.If possible try to update quantity_scrapped column with l_scrap_quanity value instead of updating QUANTITY_COMPLETED column.

Line 1980: UPDATE CSP_REPAIR_PO_HEADERS

1976: End if;
1977: -------------------------------------------------------------------------
1978:
1979: /** Status 9 = Repair po is closed, 8 = Repair po is not closed and has a open WIP_JOB **/
1980: UPDATE CSP_REPAIR_PO_HEADERS
1981: SET STATUS = decode(FINAL_COMPLETION_FLAG,'Y',9,8)
1982: WHERE REPAIR_PO_HEADER_ID = L_REPAIR_PO_HEADER_ID;
1983:
1984: If L_SCRAP_ADJUST_FLAG = 'SCRAP' then