23: end if;
24: END Get_High_Rev_ECO;
25:
26:
27: Function Get_BOM_Lists_Seq_Id RETURN NUMBER IS
28: seq_id NUMBER;
29: BEGIN
30: select BOM_LISTS_S.nextval
31: into seq_id
26:
27: Function Get_BOM_Lists_Seq_Id RETURN NUMBER IS
28: seq_id NUMBER;
29: BEGIN
30: select BOM_LISTS_S.nextval
31: into seq_id
32: from DUAL;
33: return(seq_id);
34: END Get_BOM_Lists_Seq_Id;
30: select BOM_LISTS_S.nextval
31: into seq_id
32: from DUAL;
33: return(seq_id);
34: END Get_BOM_Lists_Seq_Id;
35:
36:
37: PROCEDURE Insert_BOM_Lists (x_revised_item_id NUMBER,
38: x_sequence_id NUMBER,
33: return(seq_id);
34: END Get_BOM_Lists_Seq_Id;
35:
36:
37: PROCEDURE Insert_BOM_Lists (x_revised_item_id NUMBER,
38: x_sequence_id NUMBER,
39: x_bill_sequence_id NUMBER) IS
40: BEGIN
41: insert into BOM_LISTS (sequence_id, assembly_item_id)
37: PROCEDURE Insert_BOM_Lists (x_revised_item_id NUMBER,
38: x_sequence_id NUMBER,
39: x_bill_sequence_id NUMBER) IS
40: BEGIN
41: insert into BOM_LISTS (sequence_id, assembly_item_id)
42: values (x_sequence_id, x_revised_item_id);
43:
44: insert into BOM_LISTS (sequence_id, assembly_item_id)
45: select distinct(x_sequence_id), component_item_id
40: BEGIN
41: insert into BOM_LISTS (sequence_id, assembly_item_id)
42: values (x_sequence_id, x_revised_item_id);
43:
44: insert into BOM_LISTS (sequence_id, assembly_item_id)
45: select distinct(x_sequence_id), component_item_id
46: from BOM_INVENTORY_COMPONENTS
47: where bill_sequence_id = x_bill_sequence_id;
48: END Insert_BOM_Lists;
44: insert into BOM_LISTS (sequence_id, assembly_item_id)
45: select distinct(x_sequence_id), component_item_id
46: from BOM_INVENTORY_COMPONENTS
47: where bill_sequence_id = x_bill_sequence_id;
48: END Insert_BOM_Lists;
49:
50:
51: PROCEDURE Delete_BOM_Lists (x_sequence_id NUMBER) IS
52: BEGIN
47: where bill_sequence_id = x_bill_sequence_id;
48: END Insert_BOM_Lists;
49:
50:
51: PROCEDURE Delete_BOM_Lists (x_sequence_id NUMBER) IS
52: BEGIN
53: delete from BOM_LISTS
54: where sequence_id = x_sequence_id;
55: END Delete_BOM_Lists;
49:
50:
51: PROCEDURE Delete_BOM_Lists (x_sequence_id NUMBER) IS
52: BEGIN
53: delete from BOM_LISTS
54: where sequence_id = x_sequence_id;
55: END Delete_BOM_Lists;
56:
57:
51: PROCEDURE Delete_BOM_Lists (x_sequence_id NUMBER) IS
52: BEGIN
53: delete from BOM_LISTS
54: where sequence_id = x_sequence_id;
55: END Delete_BOM_Lists;
56:
57:
58: PROCEDURE Delete_Details (x_organization_id NUMBER,
59: x_revised_item_id NUMBER,