1391:
1392:
1393: CURSOR c_CheckBillExists IS
1394: SELECT 1
1395: FROM sys.dual
1396: WHERE NOT EXISTS
1397: ( SELECT bill_sequence_id
1398: FROM bom_bill_of_materials
1399: WHERE assembly_item_id =
1406: );
1407: l_bill_sequence_id NUMBER;
1408: CURSOR GetBillSeqId IS
1409: SELECT bom_inventory_components_s.nextval bill_sequence_id
1410: FROM sys.dual;
1411:
1412: err_text varchar2(2000);
1413: err_code varchar2(100);
1414: BEGIN