[Home] [Help]
130:
131: bill_rec get_bills%ROWTYPE;
132:
133: cursor get_comps (cp_ass_item_name varchar2, cp_org_code varchar2, cp_alt_des varchar2) is
134: select /*+ index(a BOM_INV_COMPS_INTERFACE_N6) */ * from BOM_INVENTORY_COMPS_INTERFACE A /*Bug 8213562: Added hint*/
135: where process_flag = 1
136: and (all_org = 1 or (all_org = 2 and organization_id = org_id))
137: and assembly_item_number = cp_ass_item_name
138: and organization_code = cp_org_code
149:
150: comp_rec get_comps%ROWTYPE;
151:
152: cursor get_orphan_comps is
153: select * from BOM_INVENTORY_COMPS_INTERFACE
154: where process_flag = 1
155: and all_org = 1
156: and transaction_id is not null
157: and change_notice is null --added for bug 9447664
161: or ( p_batch_id = batch_id )
162: )
163: and rownum = 1
164: UNION ALL
165: SELECT * FROM BOM_INVENTORY_COMPS_INTERFACE
166: WHERE process_flag = 1
167: AND all_org = 2 and organization_id = org_id
168: AND transaction_id is not null
169: and change_notice is null --added for bug 9447664
923: l_process_flag := 3;
924: l_ret_status := 1;
925: end if;
926:
927: Update bom_inventory_comps_interface
928: set process_flag = l_process_flag,
929: REQUEST_ID = Fnd_Global.Conc_Request_Id,
930: PROGRAM_ID = Fnd_Global.Conc_program_Id,
931: PROGRAM_APPLICATION_ID = Fnd_Global.prog_appl_id,
1035: end loop;
1036:
1037: stmt_num := 2;
1038: loop
1039: DELETE FROM BOM_INVENTORY_COMPS_INTERFACE
1040: WHERE PROCESS_FLAG = 7
1041: AND
1042: (
1043: ( (p_batch_id IS NULL) AND (BATCH_ID IS NULL) )