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.3.12000000.2 2007/04/19 23:59:41 kbavadek 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 368: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.allocate_material: ' || SQLERRM);

364: when others then
365: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
367: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
368: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.allocate_material: ' || SQLERRM);
369: x_msg_data := fnd_message.get;
370: end allocate_material;
371:
372: procedure unallocate_material(p_wip_entity_id in NUMBER,

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

539: mtrl.organization_id = p_organization_id and
540: mtrl.INVENTORY_ITEM_ID = p_inventory_item_id;
541: exception
542: when TOO_MANY_ROWS then
543: wip_logger.log('Error occured in wip_picking_pub.quantity_allocated():', l_dummy2);
544: wip_logger.log(' Inconsistent transaction_type_id in rows of MTRL table!', l_dummy2);
545: -- Bug 5336791. saugupta 17th-Jun-2006
546: -- When calling wip_picking_pub.quantity_allocated for a newly released
547: -- repetitive schedule for which no component picking move order lines exist,

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

542: when TOO_MANY_ROWS then
543: wip_logger.log('Error occured in wip_picking_pub.quantity_allocated():', l_dummy2);
544: wip_logger.log(' Inconsistent transaction_type_id in rows of MTRL table!', l_dummy2);
545: -- Bug 5336791. saugupta 17th-Jun-2006
546: -- When calling wip_picking_pub.quantity_allocated for a newly released
547: -- repetitive schedule for which no component picking move order lines exist,
548: -- it is throwing a NO_DATA_FOUND exception.
549: when NO_DATA_FOUND then
550: wip_logger.log('Function wip_picking_pub.quantity_allocated(): No data found', l_dummy2);

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

546: -- When calling wip_picking_pub.quantity_allocated for a newly released
547: -- repetitive schedule for which no component picking move order lines exist,
548: -- it is throwing a NO_DATA_FOUND exception.
549: when NO_DATA_FOUND then
550: wip_logger.log('Function wip_picking_pub.quantity_allocated(): No data found', l_dummy2);
551: return 0;
552: end;
553:
554: l_quantity_issued := p_quantity_issued;

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

690:
691: EXCEPTION
692: when others then
693: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
694: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Component_Pick_Released: ' || SQLERRM);
695: raise fnd_api.g_exc_unexpected_error;
696:
697: End Is_Component_Pick_Released;
698:

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

735: Return( l_dummy = 1);
736: EXCEPTION
737: when others then
738: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
739: fnd_message.set_token('ERROR_TEXT', 'wip_picking_pub.Is_Job_Pick_Released: ' || SQLERRM);
740: raise fnd_api.g_exc_unexpected_error;
741: End Is_Job_Pick_Released;
742:
743: Procedure Update_Requirement_SubinvLoc(p_wip_entity_id number,

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

823: Update wip_requirement_operations wro
824: set quantity_backordered = GREATEST(p_new_component_qty
825: -- replaced wro.quantity_allocated with function quantity_allocated
826: -- - quantity_issued - quantity_allocated , 0)
827: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
828: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED) , 0)
829: where wip_entity_id = p_wip_entity_id
830: and operation_seq_num = p_operation_seq_num
831: and inventory_item_id = NVL(p_inventory_item_id, inventory_item_id)

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

840: Update wip_requirement_operations wro
841: set quantity_backordered = GREATEST(p_new_component_qty
842: -- replaced wro.quantity_allocated with function quantity_allocated
843: -- - quantity_issued - quantity_allocated , 0)
844: - quantity_issued - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
845: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED) , 0)
846: where wip_entity_id=p_wip_entity_id
847: and operation_seq_num=p_operation_seq_num
848: and p_repetitive_schedule_id = p_repetitive_schedule_id

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

897: --for repetitive, lot-based and discrete
898: if (p_repetitive_schedule_id is null or p_repetitive_schedule_id = 0) then
899: Update wip_requirement_operations wro
900: set quantity_backordered = GREATEST(p_new_job_qty* quantity_per_assembly -
901: 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)
903: - quantity_issued, 0)
904: where wip_entity_id=p_wip_entity_id
905: and quantity_backordered is not null

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

913: );
914: else
915: Update wip_requirement_operations wro
916: set quantity_backordered = GREATEST(p_new_job_qty* quantity_per_assembly
917: - wip_picking_pub.quantity_allocated(WRO.WIP_ENTITY_ID, WRO.OPERATION_SEQ_NUM,
918: WRO.ORGANIZATION_ID, WRO.INVENTORY_ITEM_ID, WRO.REPETITIVE_SCHEDULE_ID,QUANTITY_ISSUED)
919: - quantity_issued, 0)
920: where wip_entity_id=p_wip_entity_id
921: and repetitive_schedule_id = p_repetitive_schedule_id

Line 948: end wip_picking_pub;

944: || SQLERRM);
945: x_msg_data := fnd_message.get;
946: End Update_Job_BackOrdQty;
947:
948: end wip_picking_pub;