1284:
1285:
1286: CURSOR c_CheckBillExists IS
1287: SELECT 1
1288: FROM sys.dual
1289: WHERE NOT EXISTS
1290: ( SELECT bill_sequence_id
1291: FROM bom_bill_of_materials
1292: WHERE assembly_item_id =
1299: );
1300: l_bill_sequence_id NUMBER;
1301: CURSOR GetBillSeqId IS
1302: SELECT bom_inventory_components_s.nextval bill_sequence_id
1303: FROM sys.dual;
1304:
1305: err_text varchar2(2000);
1306: err_code varchar2(100);
1307: BEGIN