1: PACKAGE BODY PO_SHIPMENTS_SV1 as
2: /* $Header: POXPOS1B.pls 120.4 2006/06/16 11:30:50 nipagarw noship $*/
3: /*===========================================================================
4:
5: PROCEDURE NAME: get_shipment_num
305:
306: -- get the quantity released to date against the planned
307: -- purchase order shipment that is associated with
308: -- the release shipment that we are modifying.
309: X_quantity_released := po_shipments_sv1.get_sched_released_qty
310: (X_source_shipment_id,
311: 'SHIPMENT',
312: 'SCHEDULED');
313:
316: X_quantity_ordered_new := X_quantity_ordered;
317:
318: -- get the quantity released to date against the planned
319: -- purchase order shipment that we are currently modifying.
320: X_quantity_released := po_shipments_sv1.get_sched_released_qty
321: (X_line_location_id,
322: 'SHIPMENT',
323: 'SCHEDULED');
324:
330: X_quantity_ordered_new := X_quantity_ordered;
331:
332: -- get the quantity released to date against the planned
333: -- purchase order line.
334: X_quantity_released := po_shipments_sv1.get_sched_released_qty
335: (X_line_id,
336: 'LINE',
337: X_shipment_type);
338:
374: po_message_s.sql_error('val_sched_released_qty', X_progress, sqlcode);
375: raise;
376: END val_sched_released_qty;
377:
378: END PO_SHIPMENTS_SV1;