DBA Data[Home] [Help]

APPS.WIP_PICKING_PUB dependencies on WIP_PICKING_PUB

Line 1: package body wip_picking_pub as

1: package body wip_picking_pub as
2: /* $Header: wippckpb.pls 120.9.12020000.2 2013/01/22 08:17:24 sisankar ship $ */
3:
4: /* This procedure is callback for INV to set backorder qty in WRO, and should only be called
5: for all but flow */

Line 70: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.pre_allocate_material: ' || SQLERRM);

66: when others then
67: ROLLBACK TO WIP_PRE_ALLOC_MATERIAL_START;
68: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
69: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
70: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.pre_allocate_material: ' || SQLERRM);
71: x_msg_data := fnd_message.get;
72:
73: end pre_allocate_material;
74:

Line 97: nvl(wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,

93: WRO.ORGANIZATION_ID,
94: WRO.ROWID,
95: LEAST(GREATEST((WRO.REQUIRED_QUANTITY - WRO.QUANTITY_ISSUED), 0),
96: -- nvl(wro.quantity_allocated, 0)) open_quantity,
97: nvl(wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,
98: WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID, WRO.QUANTITY_ISSUED),0)) open_quantity,
99: -- wro.quantity_allocated
100: wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,
101: WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,WRO.QUANTITY_ISSUED) quantity_allocated

Line 100: wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,

96: -- nvl(wro.quantity_allocated, 0)) open_quantity,
97: nvl(wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,
98: WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID, WRO.QUANTITY_ISSUED),0)) open_quantity,
99: -- wro.quantity_allocated
100: wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM, WRO.ORGANIZATION_ID,
101: WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,WRO.QUANTITY_ISSUED) quantity_allocated
102: FROM WIP_REQUIREMENT_OPERATIONS WRO,
103: WIP_REPETITIVE_SCHEDULES WRS
104: WHERE WRO.WIP_ENTITY_ID = p_wip_entity_id

Line 235: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.issue_material: ' || SQLERRM);

231: when others then
232: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
234: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
235: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.issue_material: ' || SQLERRM);
236: x_msg_data := fnd_message.get;
237: end issue_material;
238:
239: procedure allocate_material(p_wip_entity_id in NUMBER,

Line 375: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.allocate_material: ' || SQLERRM);

371: when others then
372: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
373: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
374: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
375: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.allocate_material: ' || SQLERRM);
376: x_msg_data := fnd_message.get;
377: end allocate_material;
378:
379: procedure unallocate_material(p_wip_entity_id in NUMBER,

Line 552: wip_logger.log('Error occured in wip_picking_pub.quantity_allocated():', l_dummy2);

548: mtrl.INVENTORY_ITEM_ID = p_inventory_item_id and
549: rownum = 1;
550: exception
551: when TOO_MANY_ROWS then
552: wip_logger.log('Error occured in wip_picking_pub.quantity_allocated():', l_dummy2);
553: wip_logger.log(' Inconsistent transaction_type_id in rows of MTRL table!', l_dummy2);
554: -- Bug 5336791. saugupta 17th-Jun-2006
555: -- When calling wip_picking_pub.quantity_allocated for a newly released
556: -- repetitive schedule for which no component picking move order lines exist,

Line 555: -- When calling wip_picking_pub.quantity_allocated for a newly released

551: when TOO_MANY_ROWS then
552: wip_logger.log('Error occured in wip_picking_pub.quantity_allocated():', l_dummy2);
553: wip_logger.log(' Inconsistent transaction_type_id in rows of MTRL table!', l_dummy2);
554: -- Bug 5336791. saugupta 17th-Jun-2006
555: -- When calling wip_picking_pub.quantity_allocated for a newly released
556: -- repetitive schedule for which no component picking move order lines exist,
557: -- it is throwing a NO_DATA_FOUND exception.
558: when NO_DATA_FOUND then
559: wip_logger.log('Function wip_picking_pub.quantity_allocated(): No data found', l_dummy2);

Line 559: wip_logger.log('Function wip_picking_pub.quantity_allocated(): No data found', l_dummy2);

555: -- When calling wip_picking_pub.quantity_allocated for a newly released
556: -- repetitive schedule for which no component picking move order lines exist,
557: -- it is throwing a NO_DATA_FOUND exception.
558: when NO_DATA_FOUND then
559: wip_logger.log('Function wip_picking_pub.quantity_allocated(): No data found', l_dummy2);
560: return 0;
561: end;
562:
563: l_quantity_issued := p_quantity_issued;

Line 729: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Component_Pick_Released: ' || SQLERRM);

725:
726: EXCEPTION
727: when others then
728: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
729: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Component_Pick_Released: ' || SQLERRM);
730: raise fnd_api.g_exc_unexpected_error;
731:
732: End Is_Component_Pick_Released;
733:

Line 796: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Job_Pick_Released: ' || SQLERRM);

792: Return( l_dummy = 1);
793: EXCEPTION
794: when others then
795: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
796: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Job_Pick_Released: ' || SQLERRM);
797: raise fnd_api.g_exc_unexpected_error;
798: End Is_Job_Pick_Released;
799:
800: Procedure Update_Requirement_SubinvLoc(p_wip_entity_id number,

Line 884: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,

880: Update wip_requirement_operations wro
881: set quantity_backordered = GREATEST(p_new_component_qty
882: -- replaced wro.quantity_allocated with function quantity_allocated
883: -- - quantity_issued - quantity_allocated , 0)
884: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
885: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED) , 0)
886: where wip_entity_id = p_wip_entity_id
887: and operation_seq_num = p_operation_seq_num
888: and inventory_item_id = NVL(p_inventory_item_id, inventory_item_id)

Line 901: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,

897: Update wip_requirement_operations wro
898: set quantity_backordered = GREATEST(p_new_component_qty
899: -- replaced wro.quantity_allocated with function quantity_allocated
900: -- - quantity_issued - quantity_allocated , 0)
901: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
902: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED) , 0)
903: where wip_entity_id=p_wip_entity_id
904: and operation_seq_num=p_operation_seq_num
905: and p_repetitive_schedule_id = p_repetitive_schedule_id

Line 958: wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,

954: --for repetitive, lot-based and discrete
955: if (p_repetitive_schedule_id is null or p_repetitive_schedule_id = 0) then
956: Update wip_requirement_operations wro
957: set quantity_backordered = GREATEST(p_new_job_qty* quantity_per_assembly -
958: wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
959: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID, QUANTITY_ISSUED)
960: - quantity_issued, 0)
961: where wip_entity_id=p_wip_entity_id
962: and quantity_backordered is not null

Line 974: - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,

970: );
971: else
972: Update wip_requirement_operations wro
973: set quantity_backordered = GREATEST(p_new_job_qty* quantity_per_assembly
974: - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
975: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED)
976: - quantity_issued, 0)
977: where wip_entity_id=p_wip_entity_id
978: and repetitive_schedule_id = p_repetitive_schedule_id

Line 1005: end wip_picking_pub;

1001: || SQLERRM);
1002: x_msg_data := fnd_message.get;
1003: End Update_Job_BackOrdQty;
1004:
1005: end wip_picking_pub;