486: , p_replen_so_line_id
487: , l_qty_to_allocate
488: , l_primary_uom
489: , sysdate
490: , FND_GLOBAL.user_id
491: , sysdate
492: , FND_GLOBAL.user_id
493: , FND_GLOBAL.login_id
494: );
488: , l_primary_uom
489: , sysdate
490: , FND_GLOBAL.user_id
491: , sysdate
492: , FND_GLOBAL.user_id
493: , FND_GLOBAL.login_id
494: );
495:
496: -- If previous allocations have been created between the Subcontracting
489: , sysdate
490: , FND_GLOBAL.user_id
491: , sysdate
492: , FND_GLOBAL.user_id
493: , FND_GLOBAL.login_id
494: );
495:
496: -- If previous allocations have been created between the Subcontracting
497: -- Order Shipment and the Replenishment Order Line
500:
501: UPDATE jmf_shikyu_allocations
502: SET allocated_quantity = l_allocation_qty,
503: last_update_date = sysdate,
504: last_updated_by = FND_GLOBAL.user_id,
505: last_update_login = FND_GLOBAL.login_id
506: WHERE subcontract_po_shipment_id = p_subcontract_po_shipment_id
507: AND replenishment_so_line_id = p_replen_so_line_id
508: AND shikyu_component_id = p_component_id;
501: UPDATE jmf_shikyu_allocations
502: SET allocated_quantity = l_allocation_qty,
503: last_update_date = sysdate,
504: last_updated_by = FND_GLOBAL.user_id,
505: last_update_login = FND_GLOBAL.login_id
506: WHERE subcontract_po_shipment_id = p_subcontract_po_shipment_id
507: AND replenishment_so_line_id = p_replen_so_line_id
508: AND shikyu_component_id = p_component_id;
509:
576: UPDATE JMF_SHIKYU_REPLENISHMENTS
577: SET allocated_primary_uom_quantity = l_replen_allocated_primary_qty,
578: allocated_quantity = l_replen_allocated_qty,
579: last_update_date = sysdate,
580: last_updated_by = FND_GLOBAL.user_id,
581: last_update_login = FND_GLOBAL.login_id
582: WHERE replenishment_so_line_id = p_replen_so_line_id;
583:
584: IF (g_fnd_debug = 'Y' AND
577: SET allocated_primary_uom_quantity = l_replen_allocated_primary_qty,
578: allocated_quantity = l_replen_allocated_qty,
579: last_update_date = sysdate,
580: last_updated_by = FND_GLOBAL.user_id,
581: last_update_login = FND_GLOBAL.login_id
582: WHERE replenishment_so_line_id = p_replen_so_line_id;
583:
584: IF (g_fnd_debug = 'Y' AND
585: FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)
3096: SET allocated_quantity = allocated_quantity - l_deleted_primary_uom_qty,
3097: allocated_primary_uom_quantity
3098: = allocated_primary_uom_quantity - x_deleted_allocations_tbl(l_tbl_index).qty,
3099: last_update_date = sysdate,
3100: last_updated_by = FND_GLOBAL.user_id,
3101: last_update_login = FND_GLOBAL.login_id
3102: WHERE replenishment_so_line_id = x_deleted_allocations_tbl(l_tbl_index).replenishment_so_line_id;
3103:
3104: l_tbl_index := x_deleted_allocations_tbl.next(l_tbl_index);
3097: allocated_primary_uom_quantity
3098: = allocated_primary_uom_quantity - x_deleted_allocations_tbl(l_tbl_index).qty,
3099: last_update_date = sysdate,
3100: last_updated_by = FND_GLOBAL.user_id,
3101: last_update_login = FND_GLOBAL.login_id
3102: WHERE replenishment_so_line_id = x_deleted_allocations_tbl(l_tbl_index).replenishment_so_line_id;
3103:
3104: l_tbl_index := x_deleted_allocations_tbl.next(l_tbl_index);
3105: EXIT WHEN l_tbl_index IS NULL;
3262: SET allocable_quantity = l_closed_so_line_rec.qty,
3263: allocable_primary_uom_quantity = l_closed_so_line_rec.primary_uom_qty,
3264: status = 'CLOSED',
3265: last_update_date = sysdate,
3266: last_updated_by = FND_GLOBAL.user_id,
3267: last_update_login = FND_GLOBAL.login_id
3268: WHERE replenishment_so_line_id = l_closed_so_line_rec.replenishment_so_line_id;
3269:
3270: l_tbl_index := l_closed_so_line_tbl.next(l_tbl_index);
3263: allocable_primary_uom_quantity = l_closed_so_line_rec.primary_uom_qty,
3264: status = 'CLOSED',
3265: last_update_date = sysdate,
3266: last_updated_by = FND_GLOBAL.user_id,
3267: last_update_login = FND_GLOBAL.login_id
3268: WHERE replenishment_so_line_id = l_closed_so_line_rec.replenishment_so_line_id;
3269:
3270: l_tbl_index := l_closed_so_line_tbl.next(l_tbl_index);
3271: EXIT WHEN l_tbl_index IS NULL;
3547: UPDATE JMF_SHIKYU_REPLENISHMENTS
3548: SET allocable_quantity = l_allocable_qty,
3549: allocable_primary_uom_quantity = l_allocable_primary_qty,
3550: last_update_date = sysdate,
3551: last_updated_by = FND_GLOBAL.user_id,
3552: last_update_login = FND_GLOBAL.login_id
3553: WHERE replenishment_so_line_id = p_replen_order_line_id;
3554:
3555: OPEN c_subcontract_po_allocations;
3548: SET allocable_quantity = l_allocable_qty,
3549: allocable_primary_uom_quantity = l_allocable_primary_qty,
3550: last_update_date = sysdate,
3551: last_updated_by = FND_GLOBAL.user_id,
3552: last_update_login = FND_GLOBAL.login_id
3553: WHERE replenishment_so_line_id = p_replen_order_line_id;
3554:
3555: OPEN c_subcontract_po_allocations;
3556:
4748: , l_org_id
4749: , p_additional_supply
4750: , NULL
4751: , SYSDATE
4752: , FND_GLOBAL.user_id
4753: , SYSDATE
4754: , FND_GLOBAL.user_id
4755: , FND_GLOBAL.login_id
4756: );
4750: , NULL
4751: , SYSDATE
4752: , FND_GLOBAL.user_id
4753: , SYSDATE
4754: , FND_GLOBAL.user_id
4755: , FND_GLOBAL.login_id
4756: );
4757:
4758: IF (g_fnd_debug = 'Y' AND
4751: , SYSDATE
4752: , FND_GLOBAL.user_id
4753: , SYSDATE
4754: , FND_GLOBAL.user_id
4755: , FND_GLOBAL.login_id
4756: );
4757:
4758: IF (g_fnd_debug = 'Y' AND
4759: FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)