61: RETURN NUMBER
62: IS
63: CURSOR Comp_Seq IS
64: SELECT Bom_Inventory_Components_S.NEXTVAL Component_Sequence
65: FROM SYS.DUAL;
66: BEGIN
67:
68: FOR c_Comp_Seq IN Comp_Seq LOOP
69: RETURN c_Comp_Seq.Component_Sequence;
429: IF l_Bill_Sequence_Id IS NULL
430: THEN
431: SELECT BOM_INVENTORY_COMPONENTS_S.NextVal
432: INTO l_Bill_Sequence_Id
433: FROM SYS.DUAL;
434:
435: RETURN l_Bill_Sequence_id;
436: ELSE
437: Return l_bill_sequence_id;