60: exception
61: when RECORDS_LOCKED then
62: ROLLBACK TO WIP_PRE_ALLOC_MATERIAL_START;
63: x_return_status := 'L';
64: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
65: x_msg_data := fnd_message.get;
66: when others then
67: ROLLBACK TO WIP_PRE_ALLOC_MATERIAL_START;
68: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
61: when RECORDS_LOCKED then
62: ROLLBACK TO WIP_PRE_ALLOC_MATERIAL_START;
63: x_return_status := 'L';
64: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
65: x_msg_data := fnd_message.get;
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');
65: x_msg_data := fnd_message.get;
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;
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:
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:
75: procedure issue_material(p_wip_entity_id in NUMBER,
214: exception
215: when NO_DATA_FOUND then
216: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
217: x_return_status := FND_API.G_RET_STS_ERROR;
218: fnd_message.set_name('WIP', 'WIP_NO_PUSH_REQUIREMENT');
219: x_msg_data := fnd_message.get;
220: when RECORDS_LOCKED then
221: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
222: x_return_status := 'L';
215: when NO_DATA_FOUND then
216: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
217: x_return_status := FND_API.G_RET_STS_ERROR;
218: fnd_message.set_name('WIP', 'WIP_NO_PUSH_REQUIREMENT');
219: x_msg_data := fnd_message.get;
220: when RECORDS_LOCKED then
221: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
222: x_return_status := 'L';
223: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
219: x_msg_data := fnd_message.get;
220: when RECORDS_LOCKED then
221: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
222: x_return_status := 'L';
223: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
224: x_msg_data := fnd_message.get;
225: when FND_API.G_EXC_UNEXPECTED_ERROR then
226: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
220: when RECORDS_LOCKED then
221: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
222: x_return_status := 'L';
223: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
224: x_msg_data := fnd_message.get;
225: when FND_API.G_EXC_UNEXPECTED_ERROR then
226: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228: fnd_message.set_name('WIP', 'WIP_PICKING_STATUS_ERROR');
224: x_msg_data := fnd_message.get;
225: when FND_API.G_EXC_UNEXPECTED_ERROR then
226: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228: fnd_message.set_name('WIP', 'WIP_PICKING_STATUS_ERROR');
229: fnd_message.set_token('STATUS', l_statusCode);
230: x_msg_data := fnd_message.get;
231: when others then
232: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
225: when FND_API.G_EXC_UNEXPECTED_ERROR then
226: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228: fnd_message.set_name('WIP', 'WIP_PICKING_STATUS_ERROR');
229: fnd_message.set_token('STATUS', l_statusCode);
230: x_msg_data := fnd_message.get;
231: when others then
232: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
233: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
226: ROLLBACK TO WIP_ISSUE_MATERIAL_START;
227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
228: fnd_message.set_name('WIP', 'WIP_PICKING_STATUS_ERROR');
229: fnd_message.set_token('STATUS', l_statusCode);
230: x_msg_data := fnd_message.get;
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');
230: x_msg_data := fnd_message.get;
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:
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,
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,
240: p_operation_seq_num in NUMBER,
353: when NO_DATA_FOUND then
354: x_quantity_allocated := 0;
355: when fnd_api.G_EXC_UNEXPECTED_ERROR then
356: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
357: fnd_message.set_name('WIP', 'WIP_PICKING_DEALLOCATE_ERROR');
358: x_msg_data := fnd_message.get;
359: when RECORDS_LOCKED then
360: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
361: x_return_status := 'L';
354: x_quantity_allocated := 0;
355: when fnd_api.G_EXC_UNEXPECTED_ERROR then
356: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
357: fnd_message.set_name('WIP', 'WIP_PICKING_DEALLOCATE_ERROR');
358: x_msg_data := fnd_message.get;
359: when RECORDS_LOCKED then
360: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
361: x_return_status := 'L';
362: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
358: x_msg_data := fnd_message.get;
359: when RECORDS_LOCKED then
360: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
361: x_return_status := 'L';
362: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
363: x_msg_data := fnd_message.get;
364: when others then
365: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
366: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
359: when RECORDS_LOCKED then
360: ROLLBACK TO WIP_ALLOCATE_MATERIAL_START;
361: x_return_status := 'L';
362: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
363: x_msg_data := fnd_message.get;
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');
363: x_msg_data := fnd_message.get;
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:
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,
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,
373: p_operation_seq_num in NUMBER,
689: return (l_dummy = 1);
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;
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:
734: End if;
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:
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,
781: null;
782: when RECORDS_LOCKED then
783: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
784: x_return_status := 'L';
785: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
786: x_msg_data := fnd_message.get;
787: when others then
788: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: when RECORDS_LOCKED then
783: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
784: x_return_status := 'L';
785: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
786: x_msg_data := fnd_message.get;
787: when others then
788: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
786: x_msg_data := fnd_message.get;
787: when others then
788: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
791: fnd_message.set_token('ERROR_TEXT',
792: 'wip_utilities.Update_Requirement_SubinvLoc: ' || SQLERRM);
793: x_msg_data := fnd_message.get;
794: End Update_Requirement_SubinvLoc;
787: when others then
788: ROLLBACK TO WIP_UPDATE_REQ_SUBINVLOC_START;
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
791: fnd_message.set_token('ERROR_TEXT',
792: 'wip_utilities.Update_Requirement_SubinvLoc: ' || SQLERRM);
793: x_msg_data := fnd_message.get;
794: End Update_Requirement_SubinvLoc;
795:
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
791: fnd_message.set_token('ERROR_TEXT',
792: 'wip_utilities.Update_Requirement_SubinvLoc: ' || SQLERRM);
793: x_msg_data := fnd_message.get;
794: End Update_Requirement_SubinvLoc;
795:
796: Procedure Update_Component_BackOrdQty(p_wip_entity_id number,
797: p_repetitive_schedule_id in NUMBER DEFAULT NULL,
860: exception
861: when RECORDS_LOCKED then
862: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
863: x_return_status := 'L';
864: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
865: x_msg_data := fnd_message.get;
866: when others then
867: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
861: when RECORDS_LOCKED then
862: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
863: x_return_status := 'L';
864: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
865: x_msg_data := fnd_message.get;
866: when others then
867: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
865: x_msg_data := fnd_message.get;
866: when others then
867: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
870: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Component_BackOrdQty: '
871: || SQLERRM);
872: x_msg_data := fnd_message.get;
873: End Update_Component_BackOrdQty;
866: when others then
867: ROLLBACK TO WIP_COMP_BACKORDQTY_START;
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
870: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Component_BackOrdQty: '
871: || SQLERRM);
872: x_msg_data := fnd_message.get;
873: End Update_Component_BackOrdQty;
874:
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
870: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Component_BackOrdQty: '
871: || SQLERRM);
872: x_msg_data := fnd_message.get;
873: End Update_Component_BackOrdQty;
874:
875: Procedure Update_Job_BackOrdQty(p_wip_entity_id number,
876: p_repetitive_schedule_id in NUMBER DEFAULT NULL,
933: exception
934: when RECORDS_LOCKED then
935: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
936: x_return_status := 'L';
937: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
938: x_msg_data := fnd_message.get;
939: when others then
940: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
934: when RECORDS_LOCKED then
935: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
936: x_return_status := 'L';
937: fnd_message.set_name('FND', 'FORM_UNABLE_TO_RESERVE_RECORD');
938: x_msg_data := fnd_message.get;
939: when others then
940: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
938: x_msg_data := fnd_message.get;
939: when others then
940: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
943: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Job_BackOrdQty: '
944: || SQLERRM);
945: x_msg_data := fnd_message.get;
946: End Update_Job_BackOrdQty;
939: when others then
940: ROLLBACK TO WIP_JOB_BACKORDQTY_START;
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
943: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Job_BackOrdQty: '
944: || SQLERRM);
945: x_msg_data := fnd_message.get;
946: End Update_Job_BackOrdQty;
947:
941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
942: fnd_message.set_name('WIP', 'WIP_UNEXPECTED_ERROR');
943: fnd_message.set_token('ERROR_TEXT', 'wip_picking_private.Update_Job_BackOrdQty: '
944: || SQLERRM);
945: x_msg_data := fnd_message.get;
946: End Update_Job_BackOrdQty;
947:
948: end wip_picking_pub;