[Home] [Help]
63: , X_basis_type NUMBER DEFAULT NULL
64: ) IS
65: CURSOR C IS
66: SELECT *
67: FROM BOM_INVENTORY_COMPONENTS
68: WHERE rowid = X_Rowid
69: FOR UPDATE of Component_Sequence_Id NOWAIT;
70: Recinfo C%ROWTYPE;
71:
202: AND ( (Recinfo.basis_type = X_basis_type)
203: OR ( (Recinfo.basis_type IS NULL)
204: AND (X_basis_type IS NULL)))
205: /* Fixed bug 666081. Operation_Lead_Time_Percent (OLTP) is not part of the
206: view BOM_INVENTORY_COMPONENTS_V and is not selected from the base table in the
207: form. So if the user copies a bill which has some values for OLTP, then this
208: causes a lock_row error.
209:
210: AND ( (Recinfo.operation_lead_time_percent = X_Operation_Lead_Time_Percent)
331: l_created_by NUMBER;
332: l_creation_date DATE;
333:
334: BEGIN
335: UPDATE BOM_INVENTORY_COMPONENTS
336: SET
337: operation_seq_num = X_Operation_Seq_Num,
338: component_item_id = X_Component_Item_Id,
339: last_update_date = X_Last_Update_Date,
440: END Update_Row;
441:
442: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
443: BEGIN
444: DELETE FROM BOM_INVENTORY_COMPONENTS
445: WHERE rowid = X_Rowid;
446:
447: if (SQL%NOTFOUND) then
448: Raise NO_DATA_FOUND;
456: X_Err_Text IN OUT NOCOPY VARCHAR2
457: ) RETURN NUMBER
458: IS
459: BEGIN
460: INSERT INTO BOM_INVENTORY_COMPONENTS(
461: operation_seq_num,
462: component_item_id,
463: last_update_date,
464: last_updated_by,
515: NVL(bce.INCLUDE_ON_SHIP_DOCS,2),
516: NVL(bce.INCLUDE_ON_BILL_DOCS,2),
517: bce.LOW_QUANTITY,
518: bce.HIGH_QUANTITY,
519: BOM_INVENTORY_COMPONENTS_S.nextval,
520: X_BILL_SEQUENCE_ID,
521: decode(bce.bom_item_type, 2, 6, 1, 6, 1, nvl(msi.wip_supply_type,1)), /* wip_supply_type */
522: decode(bce.bom_item_type, 4, msi.wip_supply_subinventory,null),
523: decode(bce.bom_item_type, 4, msi.wip_supply_locator_id,null),