1: PACKAGE BODY MSC_CL_CONT_COLL_FW AS -- body
2: /* $Header:*/
3:
4: v_cont_coll_thresh number;
5: v_process_org_present NUMBER := MSC_UTIL.SYS_NO;
6:
7: TSK_RM_ASSIGNMENT_SETS NUMBER := 1;
8: TSK_RM_ATP_RULES NUMBER := 1;
9: TSK_RM_BILL_OF_RESOURCES NUMBER := 1;
88: TSK_RM_FISCAL_CALENDAR NUMBER := 1;
89: TSK_RM_INTERNAL_REPAIR NUMBER := 1;
90: TSK_RM_EXTERNAL_REPAIR NUMBER := 1;
91:
92: lv_is_item_refresh_type_target NUMBER := MSC_UTIL.SYS_NO;
93:
94:
95: PROCEDURE check_entity_cont_ref_type(p_entity_name in varchar2,
96: p_entity_lrn in number,
99: p_coll_thresh in number,
100: p_last_tgt_cont_coll_time in date)
101: IS
102: v_sql_stmt Varchar2(2000);
103: lv_status number := MSC_UTIL.G_SUCCESS;
104: lv_msg varchar2(500);
105: lv_last_coll_time date;
106: BEGIN
107:
104: lv_msg varchar2(500);
105: lv_last_coll_time date;
106: BEGIN
107:
108: IF ( lv_is_item_refresh_type_target = MSC_UTIL.SYS_YES AND
109: p_entity_name <> 'FCST' AND p_entity_name <> 'WSH') THEN
110: entity_flag := MSC_UTIL.SYS_TGT;
111: RETURN;
112: END IF;
106: BEGIN
107:
108: IF ( lv_is_item_refresh_type_target = MSC_UTIL.SYS_YES AND
109: p_entity_name <> 'FCST' AND p_entity_name <> 'WSH') THEN
110: entity_flag := MSC_UTIL.SYS_TGT;
111: RETURN;
112: END IF;
113:
114: IF p_last_tgt_cont_coll_time IS NULL THEN
140: IN lv_last_coll_time,
141: OUT lv_status,
142: OUT lv_msg;
143:
144: IF lv_status <> MSC_UTIL.G_SUCCESS THEN
145: --entity_flag := MSC_UTIL.SYS_TGT;
146: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Error while deciding the collection type for Entity ' || p_entity_name);
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
141: OUT lv_status,
142: OUT lv_msg;
143:
144: IF lv_status <> MSC_UTIL.G_SUCCESS THEN
145: --entity_flag := MSC_UTIL.SYS_TGT;
146: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Error while deciding the collection type for Entity ' || p_entity_name);
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
149:
142: OUT lv_msg;
143:
144: IF lv_status <> MSC_UTIL.G_SUCCESS THEN
145: --entity_flag := MSC_UTIL.SYS_TGT;
146: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Error while deciding the collection type for Entity ' || p_entity_name);
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
149:
150: END IF;
143:
144: IF lv_status <> MSC_UTIL.G_SUCCESS THEN
145: --entity_flag := MSC_UTIL.SYS_TGT;
146: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Error while deciding the collection type for Entity ' || p_entity_name);
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
149:
150: END IF;
151: lv_status :=MSC_UTIL.G_SUCCESS;
144: IF lv_status <> MSC_UTIL.G_SUCCESS THEN
145: --entity_flag := MSC_UTIL.SYS_TGT;
146: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Error while deciding the collection type for Entity ' || p_entity_name);
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
149:
150: END IF;
151: lv_status :=MSC_UTIL.G_SUCCESS;
152: lv_msg := '';
147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Assumed incremental collection for following MVs');
148: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_msg);
149:
150: END IF;
151: lv_status :=MSC_UTIL.G_SUCCESS;
152: lv_msg := '';
153: END;
154:
155: FUNCTION get_refresh_type (p_param1 in number:=0,
168:
169: if ( (p_param1 + p_param2) <> 0 ) THEN
170:
171: if (( (p_param1 + p_param2) /p_param3)*100 <= p_coll_thresh) then
172: lv_refresh_type := MSC_UTIL.SYS_INCR; -- do incremental refresh
173: else
174: lv_refresh_type := MSC_UTIL.SYS_TGT; -- do targeted refresh
175: end if;
176:
170:
171: if (( (p_param1 + p_param2) /p_param3)*100 <= p_coll_thresh) then
172: lv_refresh_type := MSC_UTIL.SYS_INCR; -- do incremental refresh
173: else
174: lv_refresh_type := MSC_UTIL.SYS_TGT; -- do targeted refresh
175: end if;
176:
177: else
178: lv_refresh_type := MSC_UTIL.SYS_NO;
174: lv_refresh_type := MSC_UTIL.SYS_TGT; -- do targeted refresh
175: end if;
176:
177: else
178: lv_refresh_type := MSC_UTIL.SYS_NO;
179: end if;
180:
181: ELSE
182: if ( p_param1 <> 0 ) THEN
179: end if;
180:
181: ELSE
182: if ( p_param1 <> 0 ) THEN
183: lv_refresh_type := MSC_UTIL.SYS_TGT;
184: else
185: lv_refresh_type := MSC_UTIL.SYS_NO;
186: end if ;
187: END IF;
181: ELSE
182: if ( p_param1 <> 0 ) THEN
183: lv_refresh_type := MSC_UTIL.SYS_TGT;
184: else
185: lv_refresh_type := MSC_UTIL.SYS_NO;
186: end if ;
187: END IF;
188:
189:
190: RETURN lv_refresh_type;
191:
192: EXCEPTION
193: when others then
194: lv_refresh_type := MSC_UTIL.SYS_NO;
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
196: RETURN lv_refresh_type;
197:
198: END get_refresh_type;
191:
192: EXCEPTION
193: when others then
194: lv_refresh_type := MSC_UTIL.SYS_NO;
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
196: RETURN lv_refresh_type;
197:
198: END get_refresh_type;
199:
205: p_coll_freq in number,
206: p_last_tgt_cont_coll_time in date,
207: p_dblink in varchar2,
208: p_instance_id in number,
209: prec in MSC_UTIL.CollParamREC,
210: p_org_group in varchar2,
211: p_bom_sn_flag out NOCOPY number,
212: p_bor_sn_flag out NOCOPY number,
213: p_item_sn_flag out NOCOPY number,
256: lv_param7 number;
257: lv_param8 number;
258: lv_param9 number;
259:
260: lv_bom1 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
257: lv_param8 number;
258: lv_param9 number;
259:
260: lv_bom1 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
258: lv_param9 number;
259:
260: lv_bom1 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
259:
260: lv_bom1 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
260: lv_bom1 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
261: lv_bom2 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
262: lv_bom3 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
263: lv_bom4 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
264: lv_bom5 number := MSC_UTIL.SYS_NO;
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
265: lv_bom6 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
266: lv_bom7 number := MSC_UTIL.SYS_NO;
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
274:
267: lv_bom8 number := MSC_UTIL.SYS_NO;
268: lv_bom9 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
274:
275: lv_item1 number := MSC_UTIL.SYS_NO;
269: lv_bom10 number := MSC_UTIL.SYS_NO;
270: lv_bom11 number := MSC_UTIL.SYS_NO;
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
274:
275: lv_item1 number := MSC_UTIL.SYS_NO;
276: lv_item2 number := MSC_UTIL.SYS_NO;
277:
271: lv_bom12 number := MSC_UTIL.SYS_NO;
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
274:
275: lv_item1 number := MSC_UTIL.SYS_NO;
276: lv_item2 number := MSC_UTIL.SYS_NO;
277:
278: lv_oh1 number := MSC_UTIL.SYS_NO;
279:
272:
273: lv_bor1 number := MSC_UTIL.SYS_NO;
274:
275: lv_item1 number := MSC_UTIL.SYS_NO;
276: lv_item2 number := MSC_UTIL.SYS_NO;
277:
278: lv_oh1 number := MSC_UTIL.SYS_NO;
279:
280: lv_usup1 number := MSC_UTIL.SYS_NO;
274:
275: lv_item1 number := MSC_UTIL.SYS_NO;
276: lv_item2 number := MSC_UTIL.SYS_NO;
277:
278: lv_oh1 number := MSC_UTIL.SYS_NO;
279:
280: lv_usup1 number := MSC_UTIL.SYS_NO;
281: lv_udmd1 number := MSC_UTIL.SYS_NO;
282:
276: lv_item2 number := MSC_UTIL.SYS_NO;
277:
278: lv_oh1 number := MSC_UTIL.SYS_NO;
279:
280: lv_usup1 number := MSC_UTIL.SYS_NO;
281: lv_udmd1 number := MSC_UTIL.SYS_NO;
282:
283: lv_so1 number := MSC_UTIL.SYS_NO;
284:
277:
278: lv_oh1 number := MSC_UTIL.SYS_NO;
279:
280: lv_usup1 number := MSC_UTIL.SYS_NO;
281: lv_udmd1 number := MSC_UTIL.SYS_NO;
282:
283: lv_so1 number := MSC_UTIL.SYS_NO;
284:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
279:
280: lv_usup1 number := MSC_UTIL.SYS_NO;
281: lv_udmd1 number := MSC_UTIL.SYS_NO;
282:
283: lv_so1 number := MSC_UTIL.SYS_NO;
284:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
286:
287: lv_wip1 number := MSC_UTIL.SYS_NO;
281: lv_udmd1 number := MSC_UTIL.SYS_NO;
282:
283: lv_so1 number := MSC_UTIL.SYS_NO;
284:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
286:
287: lv_wip1 number := MSC_UTIL.SYS_NO;
288: lv_wip2 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
283: lv_so1 number := MSC_UTIL.SYS_NO;
284:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
286:
287: lv_wip1 number := MSC_UTIL.SYS_NO;
288: lv_wip2 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
290:
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
284:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
286:
287: lv_wip1 number := MSC_UTIL.SYS_NO;
288: lv_wip2 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
290:
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
292:
285: lv_fcst1 number := MSC_UTIL.SYS_NO;
286:
287: lv_wip1 number := MSC_UTIL.SYS_NO;
288: lv_wip2 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
290:
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
292:
293: lv_po1 number := MSC_UTIL.SYS_NO;
287: lv_wip1 number := MSC_UTIL.SYS_NO;
288: lv_wip2 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
290:
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
292:
293: lv_po1 number := MSC_UTIL.SYS_NO;
294:
295: lv_mds1 number := MSC_UTIL.SYS_NO;
289: lv_wip3 number := MSC_UTIL.SYS_NO;
290:
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
292:
293: lv_po1 number := MSC_UTIL.SYS_NO;
294:
295: lv_mds1 number := MSC_UTIL.SYS_NO;
296:
297: lv_mps1 number := MSC_UTIL.SYS_NO;
291: lv_supcap1 number := MSC_UTIL.SYS_NO;
292:
293: lv_po1 number := MSC_UTIL.SYS_NO;
294:
295: lv_mds1 number := MSC_UTIL.SYS_NO;
296:
297: lv_mps1 number := MSC_UTIL.SYS_NO;
298:
299: lv_trip1 number := MSC_UTIL.SYS_NO;
293: lv_po1 number := MSC_UTIL.SYS_NO;
294:
295: lv_mds1 number := MSC_UTIL.SYS_NO;
296:
297: lv_mps1 number := MSC_UTIL.SYS_NO;
298:
299: lv_trip1 number := MSC_UTIL.SYS_NO;
300: lv_trip2 number := MSC_UTIL.SYS_NO;
301:
295: lv_mds1 number := MSC_UTIL.SYS_NO;
296:
297: lv_mps1 number := MSC_UTIL.SYS_NO;
298:
299: lv_trip1 number := MSC_UTIL.SYS_NO;
300: lv_trip2 number := MSC_UTIL.SYS_NO;
301:
302: lv_in_org_str VARCHAR2(10240):='NULL';
303:
296:
297: lv_mps1 number := MSC_UTIL.SYS_NO;
298:
299: lv_trip1 number := MSC_UTIL.SYS_NO;
300: lv_trip2 number := MSC_UTIL.SYS_NO;
301:
302: lv_in_org_str VARCHAR2(10240):='NULL';
303:
304: lv_sql_stmt VARCHAR2(15000);
304: lv_sql_stmt VARCHAR2(15000);
305:
306: lv_sn_flag number;
307:
308: lv_status_decided_bom NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
305:
306: lv_sn_flag number;
307:
308: lv_status_decided_bom NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
306: lv_sn_flag number;
307:
308: lv_status_decided_bom NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
307:
308: lv_status_decided_bom NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
308: lv_status_decided_bom NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
309: lv_status_decided_bor NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
310: lv_status_decided_item NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
311: lv_status_decided_oh NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
312: lv_status_decided_usup NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
313: lv_status_decided_udem NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
321: lv_status_decided_trip NUMBER := MSC_UTIL.SYS_NO;
314: lv_status_decided_so NUMBER := MSC_UTIL.SYS_NO;
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
321: lv_status_decided_trip NUMBER := MSC_UTIL.SYS_NO;
322:
315: lv_status_decided_fcst NUMBER := MSC_UTIL.SYS_NO;
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
321: lv_status_decided_trip NUMBER := MSC_UTIL.SYS_NO;
322:
323: lv_cond_str_enabled_flag VARCHAR2(64);
316: lv_status_decided_wip NUMBER := MSC_UTIL.SYS_NO;
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
321: lv_status_decided_trip NUMBER := MSC_UTIL.SYS_NO;
322:
323: lv_cond_str_enabled_flag VARCHAR2(64);
324: lv_cond_str_org_grp VARCHAR2(100);
317: lv_status_decided_app_supp_cap NUMBER := MSC_UTIL.SYS_NO;
318: lv_status_decided_po NUMBER := MSC_UTIL.SYS_NO;
319: lv_status_decided_mds NUMBER := MSC_UTIL.SYS_NO;
320: lv_status_decided_mps NUMBER := MSC_UTIL.SYS_NO;
321: lv_status_decided_trip NUMBER := MSC_UTIL.SYS_NO;
322:
323: lv_cond_str_enabled_flag VARCHAR2(64);
324: lv_cond_str_org_grp VARCHAR2(100);
325: lv_application_name VARCHAR2(240):= NULL;
327:
328:
329: begin
330:
331: IF (msc_cl_pull.v_is_cont_refresh = MSC_UTIL.SYS_YES) THEN
332:
333: IF (MSC_CL_PULL.v_instance_type = MSC_UTIL.G_INS_MIXED) THEN
334:
335: SELECT FND_GLOBAL.APPLICATION_NAME
329: begin
330:
331: IF (msc_cl_pull.v_is_cont_refresh = MSC_UTIL.SYS_YES) THEN
332:
333: IF (MSC_CL_PULL.v_instance_type = MSC_UTIL.G_INS_MIXED) THEN
334:
335: SELECT FND_GLOBAL.APPLICATION_NAME
336: INTO lv_application_name
337: FROM dual;
340: INTO lv_application_id
341: FROM FND_APPLICATION_VL
342: WHERE APPLICATION_NAME = lv_application_name;
343:
344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'app id - ' || lv_application_id);
345: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'app name- ' || lv_application_name);
346:
347: IF lv_application_id = 722 THEN
348: lv_cond_str_enabled_flag:=' nvl(mio.dp_enabled_flag,1) = 1 ';
341: FROM FND_APPLICATION_VL
342: WHERE APPLICATION_NAME = lv_application_name;
343:
344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'app id - ' || lv_application_id);
345: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'app name- ' || lv_application_name);
346:
347: IF lv_application_id = 722 THEN
348: lv_cond_str_enabled_flag:=' nvl(mio.dp_enabled_flag,1) = 1 ';
349: ELSE
349: ELSE
350: lv_cond_str_enabled_flag:=' mio.enabled_flag= 1 ';
351: END IF;
352:
353: IF p_org_group = MSC_UTIL.G_ALL_ORGANIZATIONS THEN
354: lv_cond_str_org_grp := ' ';
355: ELSE
356: lv_cond_str_org_grp := ' AND mio.org_group= ''' || p_org_group ||''' ';
357: END IF;
355: ELSE
356: lv_cond_str_org_grp := ' AND mio.org_group= ''' || p_org_group ||''' ';
357: END IF;
358:
359: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' --Discrete and Process Instance--');
360: BEGIN
361: lv_sql_stmt:=' SELECT 1 '
362: ||' FROM mtl_parameters'||p_dblink||' mp,'
363: ||' msc_instance_orgs mio'
367: ||' AND mp.process_enabled_flag='||'''Y'''
368: || lv_cond_str_org_grp
369: ||' AND ROWNUM <2 ';
370:
371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_sql_stmt );
372:
373: EXECUTE IMMEDIATE lv_sql_stmt
374: INTO v_process_org_present
375: USING p_instance_id;
375: USING p_instance_id;
376:
377: EXCEPTION
378: WHEN NO_DATA_FOUND THEN
379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' No Data Found');
380: v_process_org_present := MSC_UTIL.SYS_NO;
381: WHEN OTHERS THEN
382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
383: RETURN;
376:
377: EXCEPTION
378: WHEN NO_DATA_FOUND THEN
379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' No Data Found');
380: v_process_org_present := MSC_UTIL.SYS_NO;
381: WHEN OTHERS THEN
382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
383: RETURN;
384: END;
378: WHEN NO_DATA_FOUND THEN
379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' No Data Found');
380: v_process_org_present := MSC_UTIL.SYS_NO;
381: WHEN OTHERS THEN
382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
383: RETURN;
384: END;
385: END IF;
386: END IF;
383: RETURN;
384: END;
385: END IF;
386: END IF;
387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' v_process_org_present: ' || v_process_org_present);
388: IF (v_process_org_present = MSC_UTIL.SYS_YES) THEN
389:
390: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
391: lv_bom1 := MSC_UTIL.SYS_TGT;
384: END;
385: END IF;
386: END IF;
387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' v_process_org_present: ' || v_process_org_present);
388: IF (v_process_org_present = MSC_UTIL.SYS_YES) THEN
389:
390: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
391: lv_bom1 := MSC_UTIL.SYS_TGT;
392: lv_bom9 := MSC_UTIL.SYS_TGT;
386: END IF;
387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' v_process_org_present: ' || v_process_org_present);
388: IF (v_process_org_present = MSC_UTIL.SYS_YES) THEN
389:
390: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
391: lv_bom1 := MSC_UTIL.SYS_TGT;
392: lv_bom9 := MSC_UTIL.SYS_TGT;
393: END IF;
394:
387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' v_process_org_present: ' || v_process_org_present);
388: IF (v_process_org_present = MSC_UTIL.SYS_YES) THEN
389:
390: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
391: lv_bom1 := MSC_UTIL.SYS_TGT;
392: lv_bom9 := MSC_UTIL.SYS_TGT;
393: END IF;
394:
395: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
388: IF (v_process_org_present = MSC_UTIL.SYS_YES) THEN
389:
390: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
391: lv_bom1 := MSC_UTIL.SYS_TGT;
392: lv_bom9 := MSC_UTIL.SYS_TGT;
393: END IF;
394:
395: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
396: lv_bor1 := MSC_UTIL.SYS_TGT;
391: lv_bom1 := MSC_UTIL.SYS_TGT;
392: lv_bom9 := MSC_UTIL.SYS_TGT;
393: END IF;
394:
395: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
396: lv_bor1 := MSC_UTIL.SYS_TGT;
397: END IF;
398:
399: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
392: lv_bom9 := MSC_UTIL.SYS_TGT;
393: END IF;
394:
395: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
396: lv_bor1 := MSC_UTIL.SYS_TGT;
397: END IF;
398:
399: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
400: lv_item1 := MSC_UTIL.SYS_TGT;
395: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
396: lv_bor1 := MSC_UTIL.SYS_TGT;
397: END IF;
398:
399: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
400: lv_item1 := MSC_UTIL.SYS_TGT;
401: END IF;
402:
403: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
396: lv_bor1 := MSC_UTIL.SYS_TGT;
397: END IF;
398:
399: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
400: lv_item1 := MSC_UTIL.SYS_TGT;
401: END IF;
402:
403: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
404: lv_oh1 := MSC_UTIL.SYS_TGT;
399: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
400: lv_item1 := MSC_UTIL.SYS_TGT;
401: END IF;
402:
403: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
404: lv_oh1 := MSC_UTIL.SYS_TGT;
405: END IF;
406:
407: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
400: lv_item1 := MSC_UTIL.SYS_TGT;
401: END IF;
402:
403: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
404: lv_oh1 := MSC_UTIL.SYS_TGT;
405: END IF;
406:
407: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
408: lv_usup1 := MSC_UTIL.SYS_TGT;
403: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
404: lv_oh1 := MSC_UTIL.SYS_TGT;
405: END IF;
406:
407: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
408: lv_usup1 := MSC_UTIL.SYS_TGT;
409: lv_udmd1 := MSC_UTIL.SYS_TGT;
410: END IF;
411:
404: lv_oh1 := MSC_UTIL.SYS_TGT;
405: END IF;
406:
407: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
408: lv_usup1 := MSC_UTIL.SYS_TGT;
409: lv_udmd1 := MSC_UTIL.SYS_TGT;
410: END IF;
411:
412: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
405: END IF;
406:
407: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
408: lv_usup1 := MSC_UTIL.SYS_TGT;
409: lv_udmd1 := MSC_UTIL.SYS_TGT;
410: END IF;
411:
412: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
413: lv_so1 := MSC_UTIL.SYS_TGT;
408: lv_usup1 := MSC_UTIL.SYS_TGT;
409: lv_udmd1 := MSC_UTIL.SYS_TGT;
410: END IF;
411:
412: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
413: lv_so1 := MSC_UTIL.SYS_TGT;
414: END IF;
415:
416: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
409: lv_udmd1 := MSC_UTIL.SYS_TGT;
410: END IF;
411:
412: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
413: lv_so1 := MSC_UTIL.SYS_TGT;
414: END IF;
415:
416: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
417: lv_fcst1 := MSC_UTIL.SYS_TGT;
412: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
413: lv_so1 := MSC_UTIL.SYS_TGT;
414: END IF;
415:
416: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
417: lv_fcst1 := MSC_UTIL.SYS_TGT;
418: END IF;
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
413: lv_so1 := MSC_UTIL.SYS_TGT;
414: END IF;
415:
416: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
417: lv_fcst1 := MSC_UTIL.SYS_TGT;
418: END IF;
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
421: lv_wip1 := MSC_UTIL.SYS_TGT;
416: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
417: lv_fcst1 := MSC_UTIL.SYS_TGT;
418: END IF;
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
421: lv_wip1 := MSC_UTIL.SYS_TGT;
422: lv_bom9 := MSC_UTIL.SYS_TGT;
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
417: lv_fcst1 := MSC_UTIL.SYS_TGT;
418: END IF;
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
421: lv_wip1 := MSC_UTIL.SYS_TGT;
422: lv_bom9 := MSC_UTIL.SYS_TGT;
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
425:
418: END IF;
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
421: lv_wip1 := MSC_UTIL.SYS_TGT;
422: lv_bom9 := MSC_UTIL.SYS_TGT;
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
425:
426: IF prec.app_supp_cap_flag = MSC_UTIL.ASL_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
419:
420: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
421: lv_wip1 := MSC_UTIL.SYS_TGT;
422: lv_bom9 := MSC_UTIL.SYS_TGT;
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
425:
426: IF prec.app_supp_cap_flag = MSC_UTIL.ASL_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
427: lv_supcap1 := MSC_UTIL.SYS_TGT;
422: lv_bom9 := MSC_UTIL.SYS_TGT;
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
425:
426: IF prec.app_supp_cap_flag = MSC_UTIL.ASL_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
427: lv_supcap1 := MSC_UTIL.SYS_TGT;
428: END IF;
429:
430: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
423: lv_bom10 := MSC_UTIL.SYS_TGT;
424: END IF;
425:
426: IF prec.app_supp_cap_flag = MSC_UTIL.ASL_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
427: lv_supcap1 := MSC_UTIL.SYS_TGT;
428: END IF;
429:
430: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
431: lv_po1 := MSC_UTIL.SYS_TGT;
426: IF prec.app_supp_cap_flag = MSC_UTIL.ASL_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
427: lv_supcap1 := MSC_UTIL.SYS_TGT;
428: END IF;
429:
430: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
431: lv_po1 := MSC_UTIL.SYS_TGT;
432: END IF;
433:
434: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
427: lv_supcap1 := MSC_UTIL.SYS_TGT;
428: END IF;
429:
430: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
431: lv_po1 := MSC_UTIL.SYS_TGT;
432: END IF;
433:
434: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
435: lv_mds1 := MSC_UTIL.SYS_TGT;
430: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
431: lv_po1 := MSC_UTIL.SYS_TGT;
432: END IF;
433:
434: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
435: lv_mds1 := MSC_UTIL.SYS_TGT;
436: END IF;
437:
438: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
431: lv_po1 := MSC_UTIL.SYS_TGT;
432: END IF;
433:
434: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
435: lv_mds1 := MSC_UTIL.SYS_TGT;
436: END IF;
437:
438: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
439: lv_mps1 := MSC_UTIL.SYS_TGT;
434: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
435: lv_mds1 := MSC_UTIL.SYS_TGT;
436: END IF;
437:
438: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
439: lv_mps1 := MSC_UTIL.SYS_TGT;
440: END IF;
441:
442: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
435: lv_mds1 := MSC_UTIL.SYS_TGT;
436: END IF;
437:
438: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
439: lv_mps1 := MSC_UTIL.SYS_TGT;
440: END IF;
441:
442: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
443: lv_trip1 := MSC_UTIL.SYS_TGT;
438: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
439: lv_mps1 := MSC_UTIL.SYS_TGT;
440: END IF;
441:
442: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
443: lv_trip1 := MSC_UTIL.SYS_TGT;
444: END IF;
445: ELSIF MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS121 THEN
446:
439: lv_mps1 := MSC_UTIL.SYS_TGT;
440: END IF;
441:
442: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
443: lv_trip1 := MSC_UTIL.SYS_TGT;
444: END IF;
445: ELSIF MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS121 THEN
446:
447: lv_in_org_str:= MSC_CL_PULL.GET_ORG_STR(p_instance_id,2);
441:
442: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
443: lv_trip1 := MSC_UTIL.SYS_TGT;
444: END IF;
445: ELSIF MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS121 THEN
446:
447: lv_in_org_str:= MSC_CL_PULL.GET_ORG_STR(p_instance_id,2);
448:
449: select apps_lrn
490: lv_uom_lrn,
491: lv_calendar_lrn,
492: lv_trip_lrn
493: from msc_instance_orgs
494: WHERE ((p_org_group =MSC_UTIL.G_ALL_ORGANIZATIONS) or (org_group=p_org_group))
495: AND sr_instance_id = p_instance_id;
496:
497:
498:
498:
499: /*Check for each entity*/
500:
501: -- p_item_sn_flag
502: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
503: check_entity_cont_ref_type('ITEM', lv_item_lrn, p_item_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
504: IF p_item_sn_flag = MSC_UTIL.SYS_TGT THEN
505: lv_is_item_refresh_type_target := MSC_UTIL.SYS_YES;
506: END IF;
500:
501: -- p_item_sn_flag
502: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
503: check_entity_cont_ref_type('ITEM', lv_item_lrn, p_item_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
504: IF p_item_sn_flag = MSC_UTIL.SYS_TGT THEN
505: lv_is_item_refresh_type_target := MSC_UTIL.SYS_YES;
506: END IF;
507: END IF;
508:
501: -- p_item_sn_flag
502: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
503: check_entity_cont_ref_type('ITEM', lv_item_lrn, p_item_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
504: IF p_item_sn_flag = MSC_UTIL.SYS_TGT THEN
505: lv_is_item_refresh_type_target := MSC_UTIL.SYS_YES;
506: END IF;
507: END IF;
508:
509: -- p_bom_sn_flag
506: END IF;
507: END IF;
508:
509: -- p_bom_sn_flag
510: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
511: check_entity_cont_ref_type('BOM', lv_bom_lrn, p_bom_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
512: END IF;
513:
514: -- p_bor_sn_flag
511: check_entity_cont_ref_type('BOM', lv_bom_lrn, p_bom_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
512: END IF;
513:
514: -- p_bor_sn_flag
515: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
516: check_entity_cont_ref_type('ITEM', lv_bor_lrn, p_bor_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
517: END IF;
518:
519: --p_oh_sn_flag
516: check_entity_cont_ref_type('ITEM', lv_bor_lrn, p_bor_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
517: END IF;
518:
519: --p_oh_sn_flag
520: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
521: check_entity_cont_ref_type('OH', lv_oh_lrn, p_oh_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
522: END IF;
523:
524:
522: END IF;
523:
524:
525: --p_usup_sn_flag
526: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
527: check_entity_cont_ref_type('USUD', lv_usd_lrn, p_usup_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
528: END IF;
529:
530: --p_so_sn_flag
527: check_entity_cont_ref_type('USUD', lv_usd_lrn, p_usup_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
528: END IF;
529:
530: --p_so_sn_flag
531: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
532: check_entity_cont_ref_type('ONT', lv_so_lrn, p_so_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
533: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
534: check_entity_cont_ref_type('RES', lv_so_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
535: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
529:
530: --p_so_sn_flag
531: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
532: check_entity_cont_ref_type('ONT', lv_so_lrn, p_so_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
533: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
534: check_entity_cont_ref_type('RES', lv_so_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
535: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
536: p_so_sn_flag := lv_sn_flag;
537: END IF;
531: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
532: check_entity_cont_ref_type('ONT', lv_so_lrn, p_so_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
533: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
534: check_entity_cont_ref_type('RES', lv_so_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
535: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
536: p_so_sn_flag := lv_sn_flag;
537: END IF;
538: END IF;
539: END IF;
538: END IF;
539: END IF;
540:
541: -- p_wip_sn_flag
542: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
543: check_entity_cont_ref_type('WIP', lv_wip_lrn, p_wip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
544: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
545: check_entity_cont_ref_type('EAM', lv_wip_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
546: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
540:
541: -- p_wip_sn_flag
542: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
543: check_entity_cont_ref_type('WIP', lv_wip_lrn, p_wip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
544: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
545: check_entity_cont_ref_type('EAM', lv_wip_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
546: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
547: p_wip_sn_flag := lv_sn_flag;
548: END IF;
542: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
543: check_entity_cont_ref_type('WIP', lv_wip_lrn, p_wip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
544: IF p_so_sn_flag <> MSC_UTIL.SYS_TGT THEN
545: check_entity_cont_ref_type('EAM', lv_wip_lrn, lv_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
546: IF lv_sn_flag = MSC_UTIL.SYS_TGT THEN
547: p_wip_sn_flag := lv_sn_flag;
548: END IF;
549: END IF;
550:
550:
551: END IF; -- wip_flag
552:
553: --p_supcap_sn_flag
554: IF prec.app_supp_cap_flag = MSC_UTIL.SYS_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
555: --check_entity_cont_ref_type('SCAP', lv_sup_cap_lrn, p_supcap_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
556: --Using the old logic
557: lv_status_decided_app_supp_cap := MSC_UTIL.SYS_NO;
558:
553: --p_supcap_sn_flag
554: IF prec.app_supp_cap_flag = MSC_UTIL.SYS_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
555: --check_entity_cont_ref_type('SCAP', lv_sup_cap_lrn, p_supcap_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
556: --Using the old logic
557: lv_status_decided_app_supp_cap := MSC_UTIL.SYS_NO;
558:
559: --lv_supcap1
560: IF lv_status_decided_app_supp_cap = MSC_UTIL.SYS_NO THEN
561: lv_sql_stmt:= 'select count(*) from MRP_AD_SUPPLIER_CAPACITIES_V'||p_dblink
556: --Using the old logic
557: lv_status_decided_app_supp_cap := MSC_UTIL.SYS_NO;
558:
559: --lv_supcap1
560: IF lv_status_decided_app_supp_cap = MSC_UTIL.SYS_NO THEN
561: lv_sql_stmt:= 'select count(*) from MRP_AD_SUPPLIER_CAPACITIES_V'||p_dblink
562: ||' where RN > :lv_sup_cap_lrn '
563: ||' and organization_id '|| lv_in_org_str;
564:
582: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
583:
584: lv_supcap1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
585: ELSE
586: lv_supcap1 := MSC_UTIL.SYS_TGT;
587: END IF;
588: p_supcap_sn_flag := lv_supcap1;
589: END IF;
590:
588: p_supcap_sn_flag := lv_supcap1;
589: END IF;
590:
591: --p_po_sn_flag
592: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
593: --check_entity_cont_ref_type('PO', lv_po_lrn, p_po_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
594: --Using the old logic
595: lv_status_decided_po := MSC_UTIL.SYS_NO;
596: --lv_po1
591: --p_po_sn_flag
592: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
593: --check_entity_cont_ref_type('PO', lv_po_lrn, p_po_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
594: --Using the old logic
595: lv_status_decided_po := MSC_UTIL.SYS_NO;
596: --lv_po1
597: IF lv_status_decided_po = MSC_UTIL.SYS_NO THEN
598: lv_sql_stmt:= 'select count(*) from MRP_AD_PO_SUPPLIES_V'||p_dblink
599: ||' where RN > :lv_po_lrn'
593: --check_entity_cont_ref_type('PO', lv_po_lrn, p_po_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
594: --Using the old logic
595: lv_status_decided_po := MSC_UTIL.SYS_NO;
596: --lv_po1
597: IF lv_status_decided_po = MSC_UTIL.SYS_NO THEN
598: lv_sql_stmt:= 'select count(*) from MRP_AD_PO_SUPPLIES_V'||p_dblink
599: ||' where RN > :lv_po_lrn'
600: ||' and organization_id '|| lv_in_org_str;
601:
697: lv_param3:=lv_param3 + lv_param4 + lv_param5 + lv_param6 + lv_param7 + lv_param8;
698:
699: lv_po1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
700: ELSE
701: lv_po1 := MSC_UTIL.SYS_TGT;
702: END IF;
703: p_po_sn_flag := lv_po1;
704: END IF;
705:
703: p_po_sn_flag := lv_po1;
704: END IF;
705:
706: --p_mds_sn_flag
707: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
708: check_entity_cont_ref_type('MRP', lv_mds_lrn, p_mds_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
709: END IF;
710:
711: --p_fcst_sn_flag **
708: check_entity_cont_ref_type('MRP', lv_mds_lrn, p_mds_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
709: END IF;
710:
711: --p_fcst_sn_flag **
712: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
713: check_entity_cont_ref_type('FCST', lv_forecast_lrn, p_oh_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
714: END IF;
715:
716: --p_trip_sn_flag**
713: check_entity_cont_ref_type('FCST', lv_forecast_lrn, p_oh_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
714: END IF;
715:
716: --p_trip_sn_flag**
717: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
718: --check_entity_cont_ref_type('WSH', lv_trip_lrn, p_trip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
719: --Using the old logic
720: lv_status_decided_trip := MSC_UTIL.SYS_NO;
721: --lv_trip1
716: --p_trip_sn_flag**
717: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
718: --check_entity_cont_ref_type('WSH', lv_trip_lrn, p_trip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
719: --Using the old logic
720: lv_status_decided_trip := MSC_UTIL.SYS_NO;
721: --lv_trip1
722: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
723: lv_sql_stmt:= 'select count(*) from MRP_AD_TRIPS_V'||p_dblink
724: ||' where RN > :lv_trip_lrn ';
718: --check_entity_cont_ref_type('WSH', lv_trip_lrn, p_trip_sn_flag, lv_in_org_str, p_coll_thresh, p_last_tgt_cont_coll_time);
719: --Using the old logic
720: lv_status_decided_trip := MSC_UTIL.SYS_NO;
721: --lv_trip1
722: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
723: lv_sql_stmt:= 'select count(*) from MRP_AD_TRIPS_V'||p_dblink
724: ||' where RN > :lv_trip_lrn ';
725:
726:
739:
740: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
741:
742: lv_trip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
743: IF lv_trip1 = MSC_UTIL.SYS_TGT THEN
744: lv_status_decided_trip := MSC_UTIL.SYS_YES;
745: END IF;
746:
747: ELSE
740: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
741:
742: lv_trip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
743: IF lv_trip1 = MSC_UTIL.SYS_TGT THEN
744: lv_status_decided_trip := MSC_UTIL.SYS_YES;
745: END IF;
746:
747: ELSE
748: lv_trip1 := MSC_UTIL.SYS_TGT;
744: lv_status_decided_trip := MSC_UTIL.SYS_YES;
745: END IF;
746:
747: ELSE
748: lv_trip1 := MSC_UTIL.SYS_TGT;
749: END IF;
750:
751: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
752: --lv_trip2
747: ELSE
748: lv_trip1 := MSC_UTIL.SYS_TGT;
749: END IF;
750:
751: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
752: --lv_trip2
753: lv_sql_stmt:= 'select count(*) from MRP_AD_TRIP_STOPS_V'||p_dblink
754: ||' where RN > :lv_trip_lrn ';
755:
770: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
771:
772: lv_trip2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
773: END IF;
774: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
771:
772: lv_trip2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
773: END IF;
774: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
772: lv_trip2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
773: END IF;
774: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
780: else
773: END IF;
774: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
780: else
781: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
774: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
780: else
781: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
782: end if;
775: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
776: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
780: else
781: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
782: end if;
783: END IF ;
777: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
778: (lv_trip2 = MSC_UTIL.SYS_NO)) then
779: p_trip_sn_flag := MSC_UTIL.SYS_NO;
780: else
781: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
782: end if;
783: END IF ;
784: ELSE --For backward compatbility IF version <121
785: ------ set lv_in_org_str ----------
829: lv_uom_lrn,
830: lv_calendar_lrn,
831: lv_trip_lrn
832: from msc_instance_orgs
833: WHERE ((p_org_group =MSC_UTIL.G_ALL_ORGANIZATIONS) or (org_group=p_org_group))
834: AND sr_instance_id = p_instance_id;
835:
836: -- p_bom_sn_flag
837:
834: AND sr_instance_id = p_instance_id;
835:
836: -- p_bom_sn_flag
837:
838: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
839:
840: BEGIN
841: SELECT MSC_UTIL.SYS_YES
842: INTO lv_status_decided_bom
837:
838: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
839:
840: BEGIN
841: SELECT MSC_UTIL.SYS_YES
842: INTO lv_status_decided_bom
843: FROM fnd_lookup_values
844: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
845: enabled_flag = 'Y' AND
853: attribute13 = 'COMPLETE' AND
854: rownum = 1;
855: EXCEPTION
856: WHEN NO_DATA_FOUND THEN
857: lv_status_decided_bom := MSC_UTIL.SYS_NO;
858: END;
859:
860: --lv_bom1
861: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
857: lv_status_decided_bom := MSC_UTIL.SYS_NO;
858: END;
859:
860: --lv_bom1
861: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
862: lv_sql_stmt:= ' select count(*) from MRP_AD_BOM_COMPONENTS_V'||p_dblink
863: ||' where RN > :lv_bom_lrn '
864: ||' and organization_id '|| lv_in_org_str;
865:
887: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
888:
889: lv_bom1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
890:
891: IF lv_bom1 = MSC_UTIL.SYS_TGT THEN
892: lv_status_decided_bom := MSC_UTIL.SYS_YES;
893: END IF;
894: ELSE
895: lv_bom1 := MSC_UTIL.SYS_TGT;
888:
889: lv_bom1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
890:
891: IF lv_bom1 = MSC_UTIL.SYS_TGT THEN
892: lv_status_decided_bom := MSC_UTIL.SYS_YES;
893: END IF;
894: ELSE
895: lv_bom1 := MSC_UTIL.SYS_TGT;
896: END IF;
891: IF lv_bom1 = MSC_UTIL.SYS_TGT THEN
892: lv_status_decided_bom := MSC_UTIL.SYS_YES;
893: END IF;
894: ELSE
895: lv_bom1 := MSC_UTIL.SYS_TGT;
896: END IF;
897:
898:
899: --lv_bom2
896: END IF;
897:
898:
899: --lv_bom2
900: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
901: lv_sql_stmt:= 'select count(*) from MRP_AD_BOMS_V'||p_dblink
902: ||' where RN > :lv_bom_lrn'
903: ||' and organization_id '|| lv_in_org_str;
904:
921: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
922:
923:
924: lv_bom2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
925: IF lv_bom2 = MSC_UTIL.SYS_TGT THEN
926: lv_status_decided_bom := MSC_UTIL.SYS_YES;
927: END IF;
928: END IF;
929:
922:
923:
924: lv_bom2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
925: IF lv_bom2 = MSC_UTIL.SYS_TGT THEN
926: lv_status_decided_bom := MSC_UTIL.SYS_YES;
927: END IF;
928: END IF;
929:
930: --lv_bom3
927: END IF;
928: END IF;
929:
930: --lv_bom3
931: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
932: lv_sql_stmt:= 'select count(*) from MRP_AD_SUB_COMPS_V'||p_dblink
933: ||' where RN > :lv_bom_lrn'
934: ||' and organization_id '|| lv_in_org_str;
935:
955: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
956:
957:
958: lv_bom3 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
959: IF lv_bom3 = MSC_UTIL.SYS_TGT THEN
960: lv_status_decided_bom := MSC_UTIL.SYS_YES;
961: END IF;
962: END IF;
963:
956:
957:
958: lv_bom3 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
959: IF lv_bom3 = MSC_UTIL.SYS_TGT THEN
960: lv_status_decided_bom := MSC_UTIL.SYS_YES;
961: END IF;
962: END IF;
963:
964: --lv_bom4
961: END IF;
962: END IF;
963:
964: --lv_bom4
965: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
966: lv_sql_stmt:= 'select count(*) from MRP_AD_ROUTINGS_V'||p_dblink
967: ||' where RN > :lv_bom_lrn '
968: ||' and organization_id '|| lv_in_org_str;
969:
985:
986: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
987:
988: lv_bom4 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
989: IF lv_bom4 = MSC_UTIL.SYS_TGT THEN
990: lv_status_decided_bom := MSC_UTIL.SYS_YES;
991: END IF;
992: END IF;
993:
986: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
987:
988: lv_bom4 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
989: IF lv_bom4 = MSC_UTIL.SYS_TGT THEN
990: lv_status_decided_bom := MSC_UTIL.SYS_YES;
991: END IF;
992: END IF;
993:
994: --lv_bom5
991: END IF;
992: END IF;
993:
994: --lv_bom5
995: /* IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
996: lv_sql_stmt:= 'select count(*) from MRP_AD_OPER_NETWORKS_V'||p_dblink
997: ||' where RN > :lv_bom_lrn '
998: ||' and organization_id '|| lv_in_org_str;
999:
1022: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
1023:
1024:
1025: lv_bom5 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1026: IF lv_bom5 = MSC_UTIL.SYS_TGT THEN
1027: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1028: END IF;
1029: END IF;
1030:
1023:
1024:
1025: lv_bom5 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1026: IF lv_bom5 = MSC_UTIL.SYS_TGT THEN
1027: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1028: END IF;
1029: END IF;
1030:
1031: */
1029: END IF;
1030:
1031: */
1032: --lv_bom6
1033: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1034: lv_sql_stmt:= 'select count(*) from MRP_AD_ROUTING_OPERATIONS_V'||p_dblink
1035: ||' where RN > :lv_bom_lrn '
1036: ||' and organization_id '|| lv_in_org_str;
1037:
1057: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
1058:
1059:
1060: lv_bom6 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1061: IF lv_bom6 = MSC_UTIL.SYS_TGT THEN
1062: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1063: END IF;
1064: END IF;
1065:
1058:
1059:
1060: lv_bom6 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1061: IF lv_bom6 = MSC_UTIL.SYS_TGT THEN
1062: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1063: END IF;
1064: END IF;
1065:
1066: --lv_bom7
1063: END IF;
1064: END IF;
1065:
1066: --lv_bom7
1067: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1068: lv_sql_stmt:= 'select count(*) from MRP_AD_OP_RESOURCE_SEQS_V'||p_dblink
1069: ||' where RN > :lv_bom_lrn '
1070: ||' and organization_id '|| lv_in_org_str;
1071:
1093: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
1094:
1095:
1096: lv_bom7 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1097: IF lv_bom7 = MSC_UTIL.SYS_TGT THEN
1098: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1099: END IF;
1100: END IF;
1101:
1094:
1095:
1096: lv_bom7 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1097: IF lv_bom7 = MSC_UTIL.SYS_TGT THEN
1098: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1099: END IF;
1100: END IF;
1101:
1102: --lv_bom8
1099: END IF;
1100: END IF;
1101:
1102: --lv_bom8
1103: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1104: lv_sql_stmt:= 'select count(*) from MRP_AD_OPERATION_RESOURCES_V'||p_dblink
1105: ||' where RN > :lv_bom_lrn '
1106: ||' and organization_id '|| lv_in_org_str;
1107:
1135: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_param3;
1136:
1137:
1138: lv_bom8 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1139: IF lv_bom8 = MSC_UTIL.SYS_TGT THEN
1140: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1141: END IF;
1142: END IF;
1143:
1136:
1137:
1138: lv_bom8 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1139: IF lv_bom8 = MSC_UTIL.SYS_TGT THEN
1140: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1141: END IF;
1142: END IF;
1143:
1144: END IF ;
1143:
1144: END IF ;
1145:
1146: /* commented the below code
1147: this will be called in the 'IF prec.wip_flag = MSC_UTIL.SYS_YES THEN...' section which handles wip entities
1148: --lv_bom10 views are used only when wip_flag
1149: IF ( prec.wip_flag = MSC_UTIL.SYS_YES) THEN
1150:
1151: --lv_bom10
1145:
1146: /* commented the below code
1147: this will be called in the 'IF prec.wip_flag = MSC_UTIL.SYS_YES THEN...' section which handles wip entities
1148: --lv_bom10 views are used only when wip_flag
1149: IF ( prec.wip_flag = MSC_UTIL.SYS_YES) THEN
1150:
1151: --lv_bom10
1152: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1153: lv_sql_stmt:= 'select count(*) from MRP_AD_RESOURCE_REQUIREMENTS_V'||p_dblink
1148: --lv_bom10 views are used only when wip_flag
1149: IF ( prec.wip_flag = MSC_UTIL.SYS_YES) THEN
1150:
1151: --lv_bom10
1152: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1153: lv_sql_stmt:= 'select count(*) from MRP_AD_RESOURCE_REQUIREMENTS_V'||p_dblink
1154: ||' where RN > :lv_wip_lrn '
1155: ||' and organization_id '|| lv_in_org_str;
1156:
1206: ||' and organization_id '|| lv_in_org_str;
1207:
1208:
1209: EXECUTE IMMEDIATE lv_sql_stmt into lv_param7 USING lv_wip_lrn;
1210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ad of res inst req = '||to_char(lv_param7));
1211:
1212: lv_sql_stmt:= 'select count(*) '
1213: ||' from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink||' x '
1214: ||' where ( x.RN1 > :lv_wip_lrn '
1222: lv_wip_lrn,
1223: lv_wip_lrn,
1224: lv_wip_lrn;
1225:
1226: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap res inst req witl lrn = '||to_char(lv_param8));
1227: lv_sql_stmt:= 'select count(*) from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink
1228: ||' where organization_id '|| lv_in_org_str;
1229:
1230: EXECUTE IMMEDIATE lv_sql_stmt into lv_param9 ;
1227: lv_sql_stmt:= 'select count(*) from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink
1228: ||' where organization_id '|| lv_in_org_str;
1229:
1230: EXECUTE IMMEDIATE lv_sql_stmt into lv_param9 ;
1231: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap res inst req without lrn = '||to_char(lv_param8));
1232:
1233:
1234: lv_param1 := lv_param1 + lv_param4 + lv_param7;
1235: lv_param2 := lv_param2 + lv_param5 + lv_param8;
1235: lv_param2 := lv_param2 + lv_param5 + lv_param8;
1236: lv_param3 := lv_param3 + lv_param6 + lv_param9;
1237:
1238: lv_bom10 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1239: IF lv_bom10 = MSC_UTIL.SYS_TGT THEN
1240: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1241: END IF;
1242: END IF;
1243:
1236: lv_param3 := lv_param3 + lv_param6 + lv_param9;
1237:
1238: lv_bom10 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1239: IF lv_bom10 = MSC_UTIL.SYS_TGT THEN
1240: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1241: END IF;
1242: END IF;
1243:
1244: END IF;
1243:
1244: END IF;
1245: */
1246:
1247: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
1248: --lv_bom11
1249: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1250: lv_sql_stmt:= 'select count(*) from MRP_AD_OPERATION_COMPONENTS_V'||p_dblink
1251: ||' where RN > :lv_bom_lrn '
1245: */
1246:
1247: IF prec.bom_flag = MSC_UTIL.SYS_YES THEN
1248: --lv_bom11
1249: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1250: lv_sql_stmt:= 'select count(*) from MRP_AD_OPERATION_COMPONENTS_V'||p_dblink
1251: ||' where RN > :lv_bom_lrn '
1252: ||' and organization_id '|| lv_in_org_str;
1253:
1277: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
1278:
1279:
1280: lv_bom11 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1281: IF lv_bom11 = MSC_UTIL.SYS_TGT THEN
1282: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1283: END IF;
1284: END IF;
1285:
1278:
1279:
1280: lv_bom11 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1281: IF lv_bom11 = MSC_UTIL.SYS_TGT THEN
1282: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1283: END IF;
1284: END IF;
1285:
1286: --lv_bom12
1283: END IF;
1284: END IF;
1285:
1286: --lv_bom12
1287: IF lv_status_decided_bom = MSC_UTIL.SYS_NO THEN
1288: lv_sql_stmt:= 'select count(*) from MRP_AD_PROCESS_EFFECTIVITY_V'||p_dblink
1289: ||' where RN > :lv_bom_lrn '
1290: ||' and organization_id '|| lv_in_org_str;
1291:
1309:
1310: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
1311:
1312: lv_bom12 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1313: IF lv_bom12 = MSC_UTIL.SYS_TGT THEN
1314: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1315: END IF;
1316: END IF;
1317:
1310: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
1311:
1312: lv_bom12 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1313: IF lv_bom12 = MSC_UTIL.SYS_TGT THEN
1314: lv_status_decided_bom := MSC_UTIL.SYS_YES;
1315: END IF;
1316: END IF;
1317:
1318: END IF;
1317:
1318: END IF;
1319: -- p_bor_sn_flag
1320:
1321: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
1322:
1323: --lv_bor1
1324: BEGIN
1325: SELECT MSC_UTIL.SYS_YES
1321: IF prec.bor_flag = MSC_UTIL.SYS_YES THEN
1322:
1323: --lv_bor1
1324: BEGIN
1325: SELECT MSC_UTIL.SYS_YES
1326: INTO lv_status_decided_bor
1327: FROM fnd_lookup_values
1328: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1329: enabled_flag = 'Y' AND
1333: attribute13 = 'COMPLETE' AND
1334: rownum = 1;
1335: EXCEPTION
1336: WHEN NO_DATA_FOUND THEN
1337: lv_status_decided_bor := MSC_UTIL.SYS_NO;
1338: END;
1339:
1340: IF lv_status_decided_bor = MSC_UTIL.SYS_NO THEN
1341: lv_sql_stmt:= 'select count(*) '
1336: WHEN NO_DATA_FOUND THEN
1337: lv_status_decided_bor := MSC_UTIL.SYS_NO;
1338: END;
1339:
1340: IF lv_status_decided_bor = MSC_UTIL.SYS_NO THEN
1341: lv_sql_stmt:= 'select count(*) '
1342: ||' from MRP_AP_CRP_RESOURCE_HOURS_V'||p_dblink||' x '
1343: ||' where x.RN2 > :lv_bor_lrn '
1344: ||' and x.organization_id '|| lv_in_org_str;
1355: lv_param2 :=0;
1356:
1357: lv_bor1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1358: ELSE
1359: lv_bor1 := MSC_UTIL.SYS_TGT;
1360: END IF;
1361:
1362: END IF;
1363:
1362: END IF;
1363:
1364: -- p_item_sn_flag
1365:
1366: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
1367:
1368: BEGIN
1369: SELECT MSC_UTIL.SYS_YES
1370: INTO lv_status_decided_item
1365:
1366: IF prec.item_flag = MSC_UTIL.SYS_YES THEN
1367:
1368: BEGIN
1369: SELECT MSC_UTIL.SYS_YES
1370: INTO lv_status_decided_item
1371: FROM fnd_lookup_values
1372: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1373: enabled_flag = 'Y' AND
1377: attribute13 = 'COMPLETE' AND
1378: rownum = 1;
1379: EXCEPTION
1380: WHEN NO_DATA_FOUND THEN
1381: lv_status_decided_item := MSC_UTIL.SYS_NO;
1382: END;
1383:
1384: IF lv_status_decided_item = MSC_UTIL.SYS_NO THEN
1385:
1380: WHEN NO_DATA_FOUND THEN
1381: lv_status_decided_item := MSC_UTIL.SYS_NO;
1382: END;
1383:
1384: IF lv_status_decided_item = MSC_UTIL.SYS_NO THEN
1385:
1386: --lv_item1
1387: lv_sql_stmt:= 'select count(*) from MRP_AD_ITEM_CATEGORIES_V'||p_dblink
1388: ||' where RN > :lv_item_lrn '
1409:
1410:
1411:
1412: lv_item1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1413: IF lv_item1 = MSC_UTIL.SYS_TGT THEN
1414: lv_status_decided_item := MSC_UTIL.SYS_YES;
1415: END IF;
1416: ELSE
1417: lv_item1 := MSC_UTIL.SYS_TGT;
1410:
1411:
1412: lv_item1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1413: IF lv_item1 = MSC_UTIL.SYS_TGT THEN
1414: lv_status_decided_item := MSC_UTIL.SYS_YES;
1415: END IF;
1416: ELSE
1417: lv_item1 := MSC_UTIL.SYS_TGT;
1418: END IF;
1413: IF lv_item1 = MSC_UTIL.SYS_TGT THEN
1414: lv_status_decided_item := MSC_UTIL.SYS_YES;
1415: END IF;
1416: ELSE
1417: lv_item1 := MSC_UTIL.SYS_TGT;
1418: END IF;
1419:
1420: --lv_item2
1421: IF lv_status_decided_item = MSC_UTIL.SYS_NO THEN
1417: lv_item1 := MSC_UTIL.SYS_TGT;
1418: END IF;
1419:
1420: --lv_item2
1421: IF lv_status_decided_item = MSC_UTIL.SYS_NO THEN
1422: lv_sql_stmt:= 'select count(*) '
1423: ||' from MRP_AP_SYSTEM_ITEMS_V'||p_dblink||' x '
1424: ||' where x.RN1 > :lv_item_lrn '
1425: ||' and x.organization_id '|| lv_in_org_str;
1440:
1441: END IF;
1442:
1443: --p_oh_sn_flag
1444: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
1445: --lv_oh1
1446: BEGIN
1447: SELECT MSC_UTIL.SYS_YES
1448: INTO lv_status_decided_oh
1443: --p_oh_sn_flag
1444: IF prec.oh_flag = MSC_UTIL.SYS_YES THEN
1445: --lv_oh1
1446: BEGIN
1447: SELECT MSC_UTIL.SYS_YES
1448: INTO lv_status_decided_oh
1449: FROM fnd_lookup_values
1450: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1451: enabled_flag = 'Y' AND
1455: attribute13 = 'COMPLETE' AND
1456: rownum = 1;
1457: EXCEPTION
1458: WHEN NO_DATA_FOUND THEN
1459: lv_status_decided_oh := MSC_UTIL.SYS_NO;
1460: END;
1461:
1462: IF lv_status_decided_oh = MSC_UTIL.SYS_NO THEN
1463: lv_sql_stmt:= 'select count(*) from MRP_AD_ONHAND_SUPPLIES_V'||p_dblink
1458: WHEN NO_DATA_FOUND THEN
1459: lv_status_decided_oh := MSC_UTIL.SYS_NO;
1460: END;
1461:
1462: IF lv_status_decided_oh = MSC_UTIL.SYS_NO THEN
1463: lv_sql_stmt:= 'select count(*) from MRP_AD_ONHAND_SUPPLIES_V'||p_dblink
1464: ||' where RN > :lv_oh_lrn '
1465: ||' and organization_id '|| lv_in_org_str;
1466:
1485:
1486:
1487: lv_oh1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1488: ELSE
1489: lv_oh1 := MSC_UTIL.SYS_TGT;
1490: END IF;
1491:
1492: END IF;
1493:
1492: END IF;
1493:
1494:
1495: --p_usup_sn_flag
1496: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
1497:
1498: BEGIN
1499: SELECT MSC_UTIL.SYS_YES
1500: INTO lv_status_decided_usup
1495: --p_usup_sn_flag
1496: IF prec.user_supply_demand_flag = MSC_UTIL.SYS_YES THEN
1497:
1498: BEGIN
1499: SELECT MSC_UTIL.SYS_YES
1500: INTO lv_status_decided_usup
1501: FROM fnd_lookup_values
1502: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1503: enabled_flag = 'Y' AND
1507: attribute13 = 'COMPLETE' AND
1508: rownum = 1;
1509: EXCEPTION
1510: WHEN NO_DATA_FOUND THEN
1511: lv_status_decided_usup := MSC_UTIL.SYS_NO;
1512: END;
1513:
1514: IF lv_status_decided_usup = MSC_UTIL.SYS_NO THEN
1515: --lv_usup1
1510: WHEN NO_DATA_FOUND THEN
1511: lv_status_decided_usup := MSC_UTIL.SYS_NO;
1512: END;
1513:
1514: IF lv_status_decided_usup = MSC_UTIL.SYS_NO THEN
1515: --lv_usup1
1516: lv_sql_stmt:= 'select count(*) from MRP_AD_USER_SUPPLIES_V'||p_dblink
1517: ||' where RN > :lv_usd_lrn '
1518: ||' and organization_id '|| lv_in_org_str;
1537: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
1538:
1539: lv_usup1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1540: ELSE
1541: lv_usup1 := MSC_UTIL.SYS_TGT;
1542: END IF;
1543:
1544: --p_udmd_sn_flag
1545: BEGIN
1542: END IF;
1543:
1544: --p_udmd_sn_flag
1545: BEGIN
1546: SELECT MSC_UTIL.SYS_YES
1547: INTO lv_status_decided_udem
1548: FROM fnd_lookup_values
1549: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1550: enabled_flag = 'Y' AND
1554: attribute13 = 'COMPLETE' AND
1555: rownum = 1;
1556: EXCEPTION
1557: WHEN NO_DATA_FOUND THEN
1558: lv_status_decided_udem := MSC_UTIL.SYS_NO;
1559: END;
1560:
1561: IF lv_status_decided_udem = MSC_UTIL.SYS_NO THEN
1562: --lv_udmd1
1557: WHEN NO_DATA_FOUND THEN
1558: lv_status_decided_udem := MSC_UTIL.SYS_NO;
1559: END;
1560:
1561: IF lv_status_decided_udem = MSC_UTIL.SYS_NO THEN
1562: --lv_udmd1
1563: lv_sql_stmt:= 'select count(*) from MRP_AD_USER_DEMANDS_V'||p_dblink
1564: ||' where RN > :lv_usd_lrn '
1565: ||' and organization_id '|| lv_in_org_str;
1585:
1586:
1587: lv_udmd1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1588: ELSE
1589: lv_udmd1 := MSC_UTIL.SYS_TGT;
1590: END IF;
1591:
1592: END IF;
1593:
1592: END IF;
1593:
1594:
1595: --p_so_sn_flag
1596: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
1597: BEGIN
1598: SELECT MSC_UTIL.SYS_YES
1599: INTO lv_status_decided_so
1600: FROM fnd_lookup_values
1594:
1595: --p_so_sn_flag
1596: IF (prec.sales_order_flag =MSC_UTIL.SYS_YES) THEN
1597: BEGIN
1598: SELECT MSC_UTIL.SYS_YES
1599: INTO lv_status_decided_so
1600: FROM fnd_lookup_values
1601: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1602: enabled_flag = 'Y' AND
1606: attribute13 = 'COMPLETE' AND
1607: rownum = 1;
1608: EXCEPTION
1609: WHEN NO_DATA_FOUND THEN
1610: lv_status_decided_so := MSC_UTIL.SYS_NO;
1611: END;
1612: IF lv_status_decided_so = MSC_UTIL.SYS_NO THEN
1613: --lv_so1
1614: lv_sql_stmt:= 'select count(*) from MRP_AD_HARD_RESERVATIONS_V'||p_dblink
1608: EXCEPTION
1609: WHEN NO_DATA_FOUND THEN
1610: lv_status_decided_so := MSC_UTIL.SYS_NO;
1611: END;
1612: IF lv_status_decided_so = MSC_UTIL.SYS_NO THEN
1613: --lv_so1
1614: lv_sql_stmt:= 'select count(*) from MRP_AD_HARD_RESERVATIONS_V'||p_dblink
1615: ||' where RN > :lv_rsv_lrn '
1616: ||' and organization_id '|| lv_in_org_str;
1698: lv_param3 := lv_param3 + lv_param4 + lv_param5; -- + lv_param6;
1699:
1700: lv_so1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1701: ELSE
1702: lv_so1 := MSC_UTIL.SYS_TGT;
1703: END IF;
1704:
1705: END IF;
1706:
1704:
1705: END IF;
1706:
1707: --p_fcst_sn_flag
1708: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
1709: BEGIN
1710: SELECT MSC_UTIL.SYS_YES
1711: INTO lv_status_decided_fcst
1712: FROM fnd_lookup_values
1706:
1707: --p_fcst_sn_flag
1708: IF prec.forecast_flag = MSC_UTIL.SYS_YES THEN
1709: BEGIN
1710: SELECT MSC_UTIL.SYS_YES
1711: INTO lv_status_decided_fcst
1712: FROM fnd_lookup_values
1713: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1714: enabled_flag = 'Y' AND
1718: attribute13 = 'COMPLETE' AND
1719: rownum = 1;
1720: EXCEPTION
1721: WHEN NO_DATA_FOUND THEN
1722: lv_status_decided_fcst := MSC_UTIL.SYS_NO;
1723: END;
1724:
1725: IF lv_status_decided_fcst = MSC_UTIL.SYS_NO THEN
1726: --lv_fcst1
1721: WHEN NO_DATA_FOUND THEN
1722: lv_status_decided_fcst := MSC_UTIL.SYS_NO;
1723: END;
1724:
1725: IF lv_status_decided_fcst = MSC_UTIL.SYS_NO THEN
1726: --lv_fcst1
1727:
1728: lv_sql_stmt:= 'select count(*) from MRP_AD_FORECAST_DSGN_V'||p_dblink
1729: ||' where RN > :lv_forecast_lrn '
1746: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
1747:
1748: lv_fcst1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1749: ELSE
1750: lv_fcst1 := MSC_UTIL.SYS_TGT;
1751: END IF;
1752:
1753: END IF;
1754:
1752:
1753: END IF;
1754:
1755: -- p_wip_sn_flag
1756: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
1757:
1758: BEGIN
1759: SELECT MSC_UTIL.SYS_YES
1760: INTO lv_status_decided_wip
1755: -- p_wip_sn_flag
1756: IF prec.wip_flag = MSC_UTIL.SYS_YES THEN
1757:
1758: BEGIN
1759: SELECT MSC_UTIL.SYS_YES
1760: INTO lv_status_decided_wip
1761: FROM fnd_lookup_values
1762: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
1763: enabled_flag = 'Y' AND
1770: attribute13 = 'COMPLETE' AND
1771: rownum = 1;
1772: EXCEPTION
1773: WHEN NO_DATA_FOUND THEN
1774: lv_status_decided_wip := MSC_UTIL.SYS_NO;
1775: END;
1776:
1777: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
1778: --lv_wip1
1773: WHEN NO_DATA_FOUND THEN
1774: lv_status_decided_wip := MSC_UTIL.SYS_NO;
1775: END;
1776:
1777: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
1778: --lv_wip1
1779:
1780: lv_sql_stmt:= 'select count(*) from MRP_AD_WIP_JOB_SUPPLIES_V'||p_dblink
1781: ||' where RN > :lv_wip_lrn '
1857: lv_param3 := lv_param3 + lv_param4 + lv_param5;
1858:
1859: lv_wip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1860:
1861: IF lv_wip1 = MSC_UTIL.SYS_TGT THEN
1862: lv_status_decided_wip := MSC_UTIL.SYS_YES;
1863: END IF;
1864: ELSE
1865: lv_wip1 := MSC_UTIL.SYS_TGT;
1858:
1859: lv_wip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1860:
1861: IF lv_wip1 = MSC_UTIL.SYS_TGT THEN
1862: lv_status_decided_wip := MSC_UTIL.SYS_YES;
1863: END IF;
1864: ELSE
1865: lv_wip1 := MSC_UTIL.SYS_TGT;
1866: END IF;
1861: IF lv_wip1 = MSC_UTIL.SYS_TGT THEN
1862: lv_status_decided_wip := MSC_UTIL.SYS_YES;
1863: END IF;
1864: ELSE
1865: lv_wip1 := MSC_UTIL.SYS_TGT;
1866: END IF;
1867:
1868: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
1869: --lv_wip2
1864: ELSE
1865: lv_wip1 := MSC_UTIL.SYS_TGT;
1866: END IF;
1867:
1868: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
1869: --lv_wip2
1870:
1871: lv_sql_stmt:= 'select count(*) from MRP_AD_WIP_COMP_DEMANDS_V'||p_dblink
1872: ||' where RN > :lv_wip_lrn '
1935: lv_param3 := lv_param3 + lv_param4;
1936:
1937: lv_wip2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1938:
1939: IF lv_wip2 = MSC_UTIL.SYS_TGT THEN
1940: lv_status_decided_wip := MSC_UTIL.SYS_YES;
1941: END IF;
1942: END IF;
1943:
1936:
1937: lv_wip2 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
1938:
1939: IF lv_wip2 = MSC_UTIL.SYS_TGT THEN
1940: lv_status_decided_wip := MSC_UTIL.SYS_YES;
1941: END IF;
1942: END IF;
1943:
1944:
1942: END IF;
1943:
1944:
1945: -- lv_wip3
1946: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
1947: lv_sql_stmt:= 'select LBJ_DETAILS '
1948: || ' from msc_apps_instances '
1949: || ' where instance_id = ' || p_instance_id ;
1950: EXECUTE IMMEDIATE lv_sql_stmt into lv_param1;
1989: lv_sql_stmt:= 'select count(*) from MRP_AD_LJ_OPR_RES_INSTS_V'||p_dblink
1990: ||' where RN > :lv_wip_lrn '
1991: ||' and organization_id '|| lv_in_org_str;
1992: EXECUTE IMMEDIATE lv_sql_stmt into lv_param6 USING lv_wip_lrn;
1993: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ad lj opr res inst = '||to_char(lv_param6));
1994: /* ds change *end/
1995:
1996: lv_param1 := lv_param1 + lv_param2 + lv_param3 + lv_param4 + lv_param5
1997: + lv_param6;
2065: EXECUTE IMMEDIATE lv_sql_stmt into lv_param7 USING
2066: lv_wip_lrn,
2067: lv_wip_lrn,
2068: lv_wip_lrn;
2069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap job res inst = '||to_char(lv_param7));
2070: /* ds change end */
2071: lv_param2 := lv_param2 + lv_param3 + lv_param4 + lv_param5 + lv_param6
2072: + lv_param7;
2073:
2100: lv_sql_stmt:= 'select count(*) from MRP_AP_JOB_RES_INSTANCES_V'||p_dblink
2101: ||' where organization_id '|| lv_in_org_str;
2102:
2103: EXECUTE IMMEDIATE lv_sql_stmt into lv_param8;
2104: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap job res inst = '||to_char(lv_param8));
2105: /* ds change end */
2106:
2107: lv_param3 := lv_param3 + lv_param4 + lv_param5 + lv_param6 + lv_param7
2108: + lv_param8;
2107: lv_param3 := lv_param3 + lv_param4 + lv_param5 + lv_param6 + lv_param7
2108: + lv_param8;
2109:
2110: lv_wip3 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2111: IF lv_wip3 = MSC_UTIL.SYS_TGT THEN
2112: lv_status_decided_wip := MSC_UTIL.SYS_YES;
2113: END IF;
2114: end if; -- lv_param1 = 1
2115: END IF; -- lv_wip3 status
2108: + lv_param8;
2109:
2110: lv_wip3 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2111: IF lv_wip3 = MSC_UTIL.SYS_TGT THEN
2112: lv_status_decided_wip := MSC_UTIL.SYS_YES;
2113: END IF;
2114: end if; -- lv_param1 = 1
2115: END IF; -- lv_wip3 status
2116:
2113: END IF;
2114: end if; -- lv_param1 = 1
2115: END IF; -- lv_wip3 status
2116:
2117: IF lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
2118: -- lv_bom10
2119: lv_sql_stmt:= 'select count(*) from MRP_AD_RESOURCE_REQUIREMENTS_V'||p_dblink
2120: ||' where RN > :lv_wip_lrn '
2121: ||' and organization_id '|| lv_in_org_str;
2173: ||' and organization_id '|| lv_in_org_str;
2174:
2175:
2176: EXECUTE IMMEDIATE lv_sql_stmt into lv_param7 USING lv_wip_lrn;
2177: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ad of res inst req = '||to_char(lv_param7));
2178:
2179: lv_sql_stmt:= 'select count(*) '
2180: ||' from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink||' x '
2181: ||' where ( x.RN1 > :lv_wip_lrn '
2189: lv_wip_lrn,
2190: lv_wip_lrn,
2191: lv_wip_lrn;
2192:
2193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap res inst req witl lrn = '||to_char(lv_param8));
2194: lv_sql_stmt:= 'select count(*) from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink
2195: ||' where organization_id '|| lv_in_org_str;
2196:
2197: EXECUTE IMMEDIATE lv_sql_stmt into lv_param9 ;
2194: lv_sql_stmt:= 'select count(*) from MRP_AP_RES_INSTANCE_REQS_V'||p_dblink
2195: ||' where organization_id '|| lv_in_org_str;
2196:
2197: EXECUTE IMMEDIATE lv_sql_stmt into lv_param9 ;
2198: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'count for ap res inst req without lrn = '||to_char(lv_param8));
2199:
2200: /* ds change end */
2201:
2202: lv_param1 := lv_param1 + lv_param4 + lv_param7;
2203: lv_param2 := lv_param2 + lv_param5 + lv_param8;
2204: lv_param3 := lv_param3 + lv_param6 + lv_param9;
2205:
2206: lv_bom10 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2207: IF lv_bom10 = MSC_UTIL.SYS_TGT THEN
2208: lv_status_decided_wip := MSC_UTIL.SYS_YES;
2209: END IF;
2210: END IF;
2211:
2204: lv_param3 := lv_param3 + lv_param6 + lv_param9;
2205:
2206: lv_bom10 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2207: IF lv_bom10 = MSC_UTIL.SYS_TGT THEN
2208: lv_status_decided_wip := MSC_UTIL.SYS_YES;
2209: END IF;
2210: END IF;
2211:
2212: END IF; -- wip_flag
2211:
2212: END IF; -- wip_flag
2213:
2214: --lv_bom9
2215: IF (prec.bom_flag = MSC_UTIL.SYS_YES OR prec.wip_flag = MSC_UTIL.SYS_YES) THEN
2216: IF lv_status_decided_bom = MSC_UTIL.SYS_NO AND lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
2217: lv_sql_stmt:= 'select count(*) '
2218: ||' from MRP_AP_LINE_RESOURCES_V'||p_dblink||' x '
2219: ||' where x.RN1 > :lv_bom_lrn '
2212: END IF; -- wip_flag
2213:
2214: --lv_bom9
2215: IF (prec.bom_flag = MSC_UTIL.SYS_YES OR prec.wip_flag = MSC_UTIL.SYS_YES) THEN
2216: IF lv_status_decided_bom = MSC_UTIL.SYS_NO AND lv_status_decided_wip = MSC_UTIL.SYS_NO THEN
2217: lv_sql_stmt:= 'select count(*) '
2218: ||' from MRP_AP_LINE_RESOURCES_V'||p_dblink||' x '
2219: ||' where x.RN1 > :lv_bom_lrn '
2220: ||' and x.organization_id '|| lv_in_org_str;
2229:
2230: lv_param2 :=0;
2231:
2232: lv_bom9 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2233: IF lv_bom9 = MSC_UTIL.SYS_TGT THEN
2234: lv_status_decided_bom := MSC_UTIL.SYS_YES;
2235: END IF;
2236: END IF;
2237: END IF;
2230: lv_param2 :=0;
2231:
2232: lv_bom9 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2233: IF lv_bom9 = MSC_UTIL.SYS_TGT THEN
2234: lv_status_decided_bom := MSC_UTIL.SYS_YES;
2235: END IF;
2236: END IF;
2237: END IF;
2238:
2237: END IF;
2238:
2239: --p_supcap_sn_flag
2240:
2241: IF prec.app_supp_cap_flag = MSC_UTIL.SYS_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
2242: BEGIN
2243: SELECT MSC_UTIL.SYS_YES
2244: INTO lv_status_decided_app_supp_cap
2245: FROM fnd_lookup_values
2239: --p_supcap_sn_flag
2240:
2241: IF prec.app_supp_cap_flag = MSC_UTIL.SYS_YES or prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP THEN
2242: BEGIN
2243: SELECT MSC_UTIL.SYS_YES
2244: INTO lv_status_decided_app_supp_cap
2245: FROM fnd_lookup_values
2246: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
2247: enabled_flag = 'Y' AND
2252: attribute13 = 'COMPLETE' AND
2253: rownum = 1;
2254: EXCEPTION
2255: WHEN NO_DATA_FOUND THEN
2256: lv_status_decided_app_supp_cap := MSC_UTIL.SYS_NO;
2257: END;
2258: --lv_supcap1
2259: IF lv_status_decided_app_supp_cap = MSC_UTIL.SYS_NO THEN
2260: lv_sql_stmt:= 'select count(*) from MRP_AD_SUPPLIER_CAPACITIES_V'||p_dblink
2255: WHEN NO_DATA_FOUND THEN
2256: lv_status_decided_app_supp_cap := MSC_UTIL.SYS_NO;
2257: END;
2258: --lv_supcap1
2259: IF lv_status_decided_app_supp_cap = MSC_UTIL.SYS_NO THEN
2260: lv_sql_stmt:= 'select count(*) from MRP_AD_SUPPLIER_CAPACITIES_V'||p_dblink
2261: ||' where RN > :lv_sup_cap_lrn '
2262: ||' and organization_id '|| lv_in_org_str;
2263:
2281: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
2282:
2283: lv_supcap1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2284: ELSE
2285: lv_supcap1 := MSC_UTIL.SYS_TGT;
2286: END IF;
2287:
2288: END IF;
2289:
2288: END IF;
2289:
2290: --p_po_sn_flag
2291:
2292: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
2293: BEGIN
2294: SELECT MSC_UTIL.SYS_YES
2295: INTO lv_status_decided_po
2296: FROM fnd_lookup_values
2290: --p_po_sn_flag
2291:
2292: IF prec.po_flag = MSC_UTIL.SYS_YES THEN
2293: BEGIN
2294: SELECT MSC_UTIL.SYS_YES
2295: INTO lv_status_decided_po
2296: FROM fnd_lookup_values
2297: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
2298: enabled_flag = 'Y' AND
2303: attribute13 = 'COMPLETE' AND
2304: rownum = 1;
2305: EXCEPTION
2306: WHEN NO_DATA_FOUND THEN
2307: lv_status_decided_po := MSC_UTIL.SYS_NO;
2308: END;
2309: --lv_po1
2310: IF lv_status_decided_po = MSC_UTIL.SYS_NO THEN
2311: lv_sql_stmt:= 'select count(*) from MRP_AD_PO_SUPPLIES_V'||p_dblink
2306: WHEN NO_DATA_FOUND THEN
2307: lv_status_decided_po := MSC_UTIL.SYS_NO;
2308: END;
2309: --lv_po1
2310: IF lv_status_decided_po = MSC_UTIL.SYS_NO THEN
2311: lv_sql_stmt:= 'select count(*) from MRP_AD_PO_SUPPLIES_V'||p_dblink
2312: ||' where RN > :lv_po_lrn'
2313: ||' and organization_id '|| lv_in_org_str;
2314:
2410: lv_param3:=lv_param3 + lv_param4 + lv_param5 + lv_param6 + lv_param7 + lv_param8;
2411:
2412: lv_po1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2413: ELSE
2414: lv_po1 := MSC_UTIL.SYS_TGT;
2415: END IF;
2416: END IF;
2417:
2418: --p_mds_sn_flag
2416: END IF;
2417:
2418: --p_mds_sn_flag
2419:
2420: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
2421:
2422: BEGIN
2423: SELECT MSC_UTIL.SYS_YES
2424: INTO lv_status_decided_mds
2419:
2420: IF prec.mds_flag = MSC_UTIL.SYS_YES THEN
2421:
2422: BEGIN
2423: SELECT MSC_UTIL.SYS_YES
2424: INTO lv_status_decided_mds
2425: FROM fnd_lookup_values
2426: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
2427: enabled_flag = 'Y' AND
2432: attribute13 = 'COMPLETE' AND
2433: rownum = 1;
2434: EXCEPTION
2435: WHEN NO_DATA_FOUND THEN
2436: lv_status_decided_mds := MSC_UTIL.SYS_NO;
2437: END;
2438:
2439: IF lv_status_decided_mds = MSC_UTIL.SYS_NO THEN
2440: --lv_mds1
2435: WHEN NO_DATA_FOUND THEN
2436: lv_status_decided_mds := MSC_UTIL.SYS_NO;
2437: END;
2438:
2439: IF lv_status_decided_mds = MSC_UTIL.SYS_NO THEN
2440: --lv_mds1
2441: lv_sql_stmt:= 'select count(*) from MRP_AD_MDS_DEMANDS_V'||p_dblink
2442: ||' where RN > :lv_mds_lrn '
2443: ||' and organization_id '|| lv_in_org_str;
2462: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
2463:
2464: lv_mds1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2465: ELSE
2466: lv_mds1 := MSC_UTIL.SYS_TGT;
2467: END IF;
2468:
2469: END IF;
2470:
2469: END IF;
2470:
2471: --p_mps_sn_flag
2472:
2473: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
2474: BEGIN
2475: SELECT MSC_UTIL.SYS_YES
2476: INTO lv_status_decided_mps
2477: FROM fnd_lookup_values
2471: --p_mps_sn_flag
2472:
2473: IF prec.mps_flag = MSC_UTIL.SYS_YES THEN
2474: BEGIN
2475: SELECT MSC_UTIL.SYS_YES
2476: INTO lv_status_decided_mps
2477: FROM fnd_lookup_values
2478: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
2479: enabled_flag = 'Y' AND
2484: attribute13 = 'COMPLETE' AND
2485: rownum = 1;
2486: EXCEPTION
2487: WHEN NO_DATA_FOUND THEN
2488: lv_status_decided_mps := MSC_UTIL.SYS_NO;
2489: END;
2490:
2491: IF lv_status_decided_mps = MSC_UTIL.SYS_NO THEN
2492:
2487: WHEN NO_DATA_FOUND THEN
2488: lv_status_decided_mps := MSC_UTIL.SYS_NO;
2489: END;
2490:
2491: IF lv_status_decided_mps = MSC_UTIL.SYS_NO THEN
2492:
2493: --lv_mps1
2494: lv_sql_stmt:= 'select count(*) from MRP_AD_MPS_SUPPLIES_V'||p_dblink
2495: ||' where RN > :lv_mps_lrn '
2514:
2515: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
2516: lv_mps1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2517: ELSE
2518: lv_mps1 := MSC_UTIL.SYS_TGT;
2519: END IF;
2520:
2521: END IF;
2522:
2521: END IF;
2522:
2523: --p_trip_sn_flag
2524:
2525: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
2526: BEGIN
2527: SELECT MSC_UTIL.SYS_YES
2528: INTO lv_status_decided_trip
2529: FROM fnd_lookup_values
2523: --p_trip_sn_flag
2524:
2525: IF prec.trip_flag = MSC_UTIL.SYS_YES THEN
2526: BEGIN
2527: SELECT MSC_UTIL.SYS_YES
2528: INTO lv_status_decided_trip
2529: FROM fnd_lookup_values
2530: WHERE lookup_type = 'MSC_COLL_SNAPSHOTS' AND
2531: enabled_flag = 'Y' AND
2536: attribute13 = 'COMPLETE' AND
2537: rownum = 1;
2538: EXCEPTION
2539: WHEN NO_DATA_FOUND THEN
2540: lv_status_decided_trip := MSC_UTIL.SYS_NO;
2541: END;
2542:
2543:
2544: --lv_trip1
2541: END;
2542:
2543:
2544: --lv_trip1
2545: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
2546: lv_sql_stmt:= 'select count(*) from MRP_AD_TRIPS_V'||p_dblink
2547: ||' where RN > :lv_trip_lrn ';
2548:
2549:
2562:
2563: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
2564:
2565: lv_trip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2566: IF lv_trip1 = MSC_UTIL.SYS_TGT THEN
2567: lv_status_decided_trip := MSC_UTIL.SYS_YES;
2568: END IF;
2569:
2570: ELSE
2563: EXECUTE IMMEDIATE lv_sql_stmt into lv_param3;
2564:
2565: lv_trip1 := get_refresh_type(lv_param1,lv_param2,lv_param3,p_coll_thresh);
2566: IF lv_trip1 = MSC_UTIL.SYS_TGT THEN
2567: lv_status_decided_trip := MSC_UTIL.SYS_YES;
2568: END IF;
2569:
2570: ELSE
2571: lv_trip1 := MSC_UTIL.SYS_TGT;
2567: lv_status_decided_trip := MSC_UTIL.SYS_YES;
2568: END IF;
2569:
2570: ELSE
2571: lv_trip1 := MSC_UTIL.SYS_TGT;
2572: END IF;
2573:
2574: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
2575: --lv_trip2
2570: ELSE
2571: lv_trip1 := MSC_UTIL.SYS_TGT;
2572: END IF;
2573:
2574: IF lv_status_decided_trip = MSC_UTIL.SYS_NO THEN
2575: --lv_trip2
2576: lv_sql_stmt:= 'select count(*) from MRP_AD_TRIP_STOPS_V'||p_dblink
2577: ||' where RN > :lv_trip_lrn ';
2578:
2599: END IF ;
2600: /*----------------------------------------------- */
2601:
2602:
2603: if ((lv_bom1 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2600: /*----------------------------------------------- */
2601:
2602:
2603: if ((lv_bom1 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2601:
2602:
2603: if ((lv_bom1 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2602:
2603: if ((lv_bom1 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2603: if ((lv_bom1 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2604: (lv_bom2 = MSC_UTIL.SYS_TGT) or
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2605: (lv_bom3 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2606: (lv_bom4 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2607: -- (lv_bom5 = MSC_UTIL.SYS_TGT) or
2608: (lv_bom6 = MSC_UTIL.SYS_TGT) or
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2609: (lv_bom7 = MSC_UTIL.SYS_TGT) or
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2610: (lv_bom8 = MSC_UTIL.SYS_TGT) or
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2611: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2612: -- lv_bom10 should only be used when wip is enabled.Its views are used in load_wip (mscclaab) only when wip is enabled.
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2613: -- (lv_bom10 = MSC_UTIL.SYS_TGT) or
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2614: (lv_bom11 = MSC_UTIL.SYS_TGT) or
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2615: (lv_bom12 = MSC_UTIL.SYS_TGT)) then
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2616: p_bom_sn_flag := MSC_UTIL.SYS_TGT;
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2617: elsif ((lv_bom1 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2618: (lv_bom2 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2619: (lv_bom3 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2620: (lv_bom4 = MSC_UTIL.SYS_NO) and
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2621: -- (lv_bom5 = MSC_UTIL.SYS_NO) and
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2622: (lv_bom6 = MSC_UTIL.SYS_NO) and
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2630: else
2623: (lv_bom7 = MSC_UTIL.SYS_NO) and
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2630: else
2631: p_bom_sn_flag := MSC_UTIL.SYS_INCR;
2624: (lv_bom8 = MSC_UTIL.SYS_NO) and
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2630: else
2631: p_bom_sn_flag := MSC_UTIL.SYS_INCR;
2632: end if;
2625: (lv_bom9 = MSC_UTIL.SYS_NO) and
2626: -- (lv_bom10 = MSC_UTIL.SYS_NO) and
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2630: else
2631: p_bom_sn_flag := MSC_UTIL.SYS_INCR;
2632: end if;
2633:
2627: (lv_bom11 = MSC_UTIL.SYS_NO) and
2628: (lv_bom12 = MSC_UTIL.SYS_NO)) then
2629: p_bom_sn_flag := MSC_UTIL.SYS_NO;
2630: else
2631: p_bom_sn_flag := MSC_UTIL.SYS_INCR;
2632: end if;
2633:
2634:
2635: p_bor_sn_flag :=lv_bor1;
2634:
2635: p_bor_sn_flag :=lv_bor1;
2636:
2637:
2638: if ((lv_item1 = MSC_UTIL.SYS_TGT) or
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2635: p_bor_sn_flag :=lv_bor1;
2636:
2637:
2638: if ((lv_item1 = MSC_UTIL.SYS_TGT) or
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2636:
2637:
2638: if ((lv_item1 = MSC_UTIL.SYS_TGT) or
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2644: else
2637:
2638: if ((lv_item1 = MSC_UTIL.SYS_TGT) or
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2644: else
2645: p_item_sn_flag := MSC_UTIL.SYS_INCR;
2638: if ((lv_item1 = MSC_UTIL.SYS_TGT) or
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2644: else
2645: p_item_sn_flag := MSC_UTIL.SYS_INCR;
2646: end if;
2639: (lv_item2 = MSC_UTIL.SYS_TGT)) then
2640: p_item_sn_flag := MSC_UTIL.SYS_TGT;
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2644: else
2645: p_item_sn_flag := MSC_UTIL.SYS_INCR;
2646: end if;
2647:
2641: elsif ((lv_item1 = MSC_UTIL.SYS_NO) and
2642: (lv_item2 = MSC_UTIL.SYS_NO)) then
2643: p_item_sn_flag := MSC_UTIL.SYS_NO;
2644: else
2645: p_item_sn_flag := MSC_UTIL.SYS_INCR;
2646: end if;
2647:
2648:
2649: p_oh_sn_flag := lv_oh1;
2656:
2657: p_fcst_sn_flag := lv_fcst1;
2658:
2659:
2660: if ((lv_wip1 = MSC_UTIL.SYS_TGT) or
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2657: p_fcst_sn_flag := lv_fcst1;
2658:
2659:
2660: if ((lv_wip1 = MSC_UTIL.SYS_TGT) or
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2658:
2659:
2660: if ((lv_wip1 = MSC_UTIL.SYS_TGT) or
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2659:
2660: if ((lv_wip1 = MSC_UTIL.SYS_TGT) or
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2660: if ((lv_wip1 = MSC_UTIL.SYS_TGT) or
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2661: (lv_wip2 = MSC_UTIL.SYS_TGT) or
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2662: (lv_wip3 = MSC_UTIL.SYS_TGT) or
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2663: (lv_bom9 = MSC_UTIL.SYS_TGT) or
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2664: (lv_bom10 = MSC_UTIL.SYS_TGT)) then
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2672: else
2665: p_wip_sn_flag := MSC_UTIL.SYS_TGT;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2672: else
2673: p_wip_sn_flag := MSC_UTIL.SYS_INCR;
2666: elsif ((lv_wip1 = MSC_UTIL.SYS_NO) and
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2672: else
2673: p_wip_sn_flag := MSC_UTIL.SYS_INCR;
2674: end if;
2667: (lv_wip2 = MSC_UTIL.SYS_NO) and
2668: (lv_wip3 = MSC_UTIL.SYS_NO) and
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2672: else
2673: p_wip_sn_flag := MSC_UTIL.SYS_INCR;
2674: end if;
2675:
2669: (lv_bom9 = MSC_UTIL.SYS_NO) and
2670: (lv_bom10 = MSC_UTIL.SYS_NO)) then
2671: p_wip_sn_flag := MSC_UTIL.SYS_NO;
2672: else
2673: p_wip_sn_flag := MSC_UTIL.SYS_INCR;
2674: end if;
2675:
2676: p_supcap_sn_flag := lv_supcap1;
2677:
2680: p_mds_sn_flag := lv_mds1;
2681:
2682: p_mps_sn_flag := lv_mps1;
2683:
2684: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2681:
2682: p_mps_sn_flag := lv_mps1;
2683:
2684: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2682: p_mps_sn_flag := lv_mps1;
2683:
2684: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2690: else
2683:
2684: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2690: else
2691: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
2684: if ((lv_trip1 = MSC_UTIL.SYS_TGT) or
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2690: else
2691: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
2692: end if;
2685: (lv_trip2 = MSC_UTIL.SYS_TGT)) then
2686: p_trip_sn_flag := MSC_UTIL.SYS_TGT;
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2690: else
2691: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
2692: end if;
2693:
2687: elsif ((lv_trip1 = MSC_UTIL.SYS_NO) and
2688: (lv_trip2 = MSC_UTIL.SYS_NO)) then
2689: p_trip_sn_flag := MSC_UTIL.SYS_NO;
2690: else
2691: p_trip_sn_flag := MSC_UTIL.SYS_INCR;
2692: end if;
2693:
2694: /*
2695: if ((p_last_tgt_cont_coll_time is null) or
2693:
2694: /*
2695: if ((p_last_tgt_cont_coll_time is null) or
2696: (p_last_tgt_cont_coll_time + (p_coll_freq/24) <= sysdate)) then
2697: p_nosnap_flag := MSC_UTIL.SYS_YES;
2698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is YES ');
2699: else
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is NO ');
2701: p_nosnap_flag := MSC_UTIL.SYS_NO;
2694: /*
2695: if ((p_last_tgt_cont_coll_time is null) or
2696: (p_last_tgt_cont_coll_time + (p_coll_freq/24) <= sysdate)) then
2697: p_nosnap_flag := MSC_UTIL.SYS_YES;
2698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is YES ');
2699: else
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is NO ');
2701: p_nosnap_flag := MSC_UTIL.SYS_NO;
2702: end if;
2696: (p_last_tgt_cont_coll_time + (p_coll_freq/24) <= sysdate)) then
2697: p_nosnap_flag := MSC_UTIL.SYS_YES;
2698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is YES ');
2699: else
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is NO ');
2701: p_nosnap_flag := MSC_UTIL.SYS_NO;
2702: end if;
2703:
2704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag : '||p_nosnap_flag);
2697: p_nosnap_flag := MSC_UTIL.SYS_YES;
2698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is YES ');
2699: else
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is NO ');
2701: p_nosnap_flag := MSC_UTIL.SYS_NO;
2702: end if;
2703:
2704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag : '||p_nosnap_flag);
2705: */
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag is NO ');
2701: p_nosnap_flag := MSC_UTIL.SYS_NO;
2702: end if;
2703:
2704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' p_nosnap_flag : '||p_nosnap_flag);
2705: */
2706: -- For Future Use only. Time Frequency for Non Snapshot Entities
2707:
2708: p_nosnap_flag := -1;
2706: -- For Future Use only. Time Frequency for Non Snapshot Entities
2707:
2708: p_nosnap_flag := -1;
2709:
2710: /* IF (MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS115) THEN
2711: p_supcap_sn_flag := lv_po_supcap_snrt;
2712:
2713: ELSE -- For 110/107 source , supplier capacity is associated with other setup entities -nosnap_flag
2714: p_supcap_sn_flag := p_nosnap_flag;
2718: END init_entity_refresh_type;
2719:
2720: FUNCTION set_cont_refresh_type (p_instance_id in NUMBER,
2721: p_task_num in NUMBER,
2722: prec in MSC_UTIL.CollParamREC,
2723: p_lrnn in number,
2724: p_cont_lrnn out NOCOPY number)
2725:
2726: RETURN BOOLEAN AS
2727:
2728: BEGIN
2729:
2730: IF p_task_num = MSC_CL_PULL.TASK_SUPPLIER_CAPACITY THEN
2731: IF (MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS115) THEN
2732: if (prec.supcap_sn_flag = MSC_UTIL.SYS_INCR) then
2733: -- do net-change for this entity
2734: p_cont_lrnn := p_lrnn;
2735: RETURN TRUE;
2728: BEGIN
2729:
2730: IF p_task_num = MSC_CL_PULL.TASK_SUPPLIER_CAPACITY THEN
2731: IF (MSC_CL_PULL.v_apps_ver >= MSC_UTIL.G_APPS115) THEN
2732: if (prec.supcap_sn_flag = MSC_UTIL.SYS_INCR) then
2733: -- do net-change for this entity
2734: p_cont_lrnn := p_lrnn;
2735: RETURN TRUE;
2736: elsif (prec.supcap_sn_flag = MSC_UTIL.SYS_TGT) then
2732: if (prec.supcap_sn_flag = MSC_UTIL.SYS_INCR) then
2733: -- do net-change for this entity
2734: p_cont_lrnn := p_lrnn;
2735: RETURN TRUE;
2736: elsif (prec.supcap_sn_flag = MSC_UTIL.SYS_TGT) then
2737: -- do targeted for this entity
2738: p_cont_lrnn := -1;
2739: RETURN TRUE;
2740: else
2741: -- do nothing
2742: RETURN FALSE;
2743: end if;
2744: ELSE --- For 110/107 source instance, supplier capacity is associated with Other setup entities
2745: IF (prec.app_supp_cap_flag = MSC_UTIL.ASL_YES OR prec.app_supp_cap_flag =MSC_UTIL.ASL_YES_RETAIN_CP) THEN
2746: -- do targeted for this entity
2747: p_cont_lrnn := -1;
2748: RETURN TRUE;
2749: else
2769: -- LOAD_OPERATION_RESOURCES
2770: -- LOAD_OPERATION_COMPONENTS
2771: -- LOAD_PROCESS_EFFECTIVITY
2772: -- extract effectivities are performed
2773: if (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) then
2774: -- do net-change for this entity
2775: p_cont_lrnn := p_lrnn;
2776: RETURN TRUE;
2777: elsif (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) then
2773: if (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) then
2774: -- do net-change for this entity
2775: p_cont_lrnn := p_lrnn;
2776: RETURN TRUE;
2777: elsif (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) then
2778: -- do targeted for this entity
2779: p_cont_lrnn := -1;
2780: RETURN TRUE;
2781: else
2785: END IF;
2786:
2787:
2788: IF ( p_task_num = MSC_CL_PULL.TASK_BOR ) THEN
2789: if (prec.bor_sn_flag = MSC_UTIL.SYS_INCR) then
2790: -- do net-change for this entity
2791: p_cont_lrnn := p_lrnn;
2792: RETURN TRUE;
2793: elsif (prec.bor_sn_flag = MSC_UTIL.SYS_TGT) then
2789: if (prec.bor_sn_flag = MSC_UTIL.SYS_INCR) then
2790: -- do net-change for this entity
2791: p_cont_lrnn := p_lrnn;
2792: RETURN TRUE;
2793: elsif (prec.bor_sn_flag = MSC_UTIL.SYS_TGT) then
2794: -- do targeted for this entity
2795: p_cont_lrnn := -1;
2796: RETURN TRUE;
2797: else
2803: IF (p_task_num = MSC_CL_PULL.TASK_LOAD_FORECAST) THEN
2804: -- both of the ones below will get executed
2805: -- LOAD_FORECASTS
2806: -- LOAD_ITEM_FORECASTS
2807: if (prec.fcst_sn_flag = MSC_UTIL.SYS_INCR) then
2808: -- do net-change for this entity
2809: p_cont_lrnn := p_lrnn;
2810: RETURN TRUE;
2811: elsif (prec.fcst_sn_flag = MSC_UTIL.SYS_TGT) then
2807: if (prec.fcst_sn_flag = MSC_UTIL.SYS_INCR) then
2808: -- do net-change for this entity
2809: p_cont_lrnn := p_lrnn;
2810: RETURN TRUE;
2811: elsif (prec.fcst_sn_flag = MSC_UTIL.SYS_TGT) then
2812: -- do targeted for this entity
2813: p_cont_lrnn := -1;
2814: RETURN TRUE;
2815: else
2823: (p_task_num = MSC_CL_PULL.TASK_ITEM1) or
2824: (p_task_num = MSC_CL_PULL.TASK_ITEM2) or
2825: (p_task_num = MSC_CL_PULL.TASK_ITEM3) ) THEN
2826:
2827: if (prec.item_sn_flag = MSC_UTIL.SYS_INCR) then
2828: -- do net-change for this entity
2829: p_cont_lrnn := p_lrnn;
2830: RETURN TRUE;
2831: elsif (prec.item_sn_flag = MSC_UTIL.SYS_TGT) then
2827: if (prec.item_sn_flag = MSC_UTIL.SYS_INCR) then
2828: -- do net-change for this entity
2829: p_cont_lrnn := p_lrnn;
2830: RETURN TRUE;
2831: elsif (prec.item_sn_flag = MSC_UTIL.SYS_TGT) then
2832: -- do targeted for this entity
2833: p_cont_lrnn := -1;
2834: RETURN TRUE;
2835: else
2839: END IF;
2840:
2841:
2842: IF (p_task_num = MSC_CL_PULL.TASK_MDS_DEMAND) THEN
2843: if (prec.mds_sn_flag = MSC_UTIL.SYS_INCR) then
2844: -- do net-change for this entity
2845: p_cont_lrnn := p_lrnn;
2846: RETURN TRUE;
2847: elsif (prec.mds_sn_flag = MSC_UTIL.SYS_TGT) then
2843: if (prec.mds_sn_flag = MSC_UTIL.SYS_INCR) then
2844: -- do net-change for this entity
2845: p_cont_lrnn := p_lrnn;
2846: RETURN TRUE;
2847: elsif (prec.mds_sn_flag = MSC_UTIL.SYS_TGT) then
2848: -- do targeted for this entity
2849: p_cont_lrnn := -1;
2850: RETURN TRUE;
2851: else
2855: END IF;
2856:
2857:
2858: IF (p_task_num = MSC_CL_PULL.TASK_MPS_SUPPLY) THEN
2859: if (prec.mps_sn_flag = MSC_UTIL.SYS_INCR) then
2860: -- do net-change for this entity
2861: p_cont_lrnn := p_lrnn;
2862: RETURN TRUE;
2863: elsif (prec.mps_sn_flag = MSC_UTIL.SYS_TGT) then
2859: if (prec.mps_sn_flag = MSC_UTIL.SYS_INCR) then
2860: -- do net-change for this entity
2861: p_cont_lrnn := p_lrnn;
2862: RETURN TRUE;
2863: elsif (prec.mps_sn_flag = MSC_UTIL.SYS_TGT) then
2864: -- do targeted for this entity
2865: p_cont_lrnn := -1;
2866: RETURN TRUE;
2867: else
2870: end if;
2871: END IF;
2872:
2873: IF (p_task_num = MSC_CL_PULL.TASK_SCHEDULE) THEN
2874: if (prec.mds_sn_flag = MSC_UTIL.SYS_TGT) or (prec.mps_sn_flag = MSC_UTIL.SYS_TGT) THEN
2875: -- do targeted for this entity
2876: p_cont_lrnn := -1;
2877: RETURN TRUE;
2878: elsif (prec.mds_sn_flag = MSC_UTIL.SYS_INCR) OR (prec.mps_sn_flag = MSC_UTIL.SYS_INCR) THEN
2874: if (prec.mds_sn_flag = MSC_UTIL.SYS_TGT) or (prec.mps_sn_flag = MSC_UTIL.SYS_TGT) THEN
2875: -- do targeted for this entity
2876: p_cont_lrnn := -1;
2877: RETURN TRUE;
2878: elsif (prec.mds_sn_flag = MSC_UTIL.SYS_INCR) OR (prec.mps_sn_flag = MSC_UTIL.SYS_INCR) THEN
2879: -- do net-change for this entity
2880: p_cont_lrnn := p_lrnn;
2881: RETURN TRUE;
2882: else
2885: end if;
2886: END IF;
2887:
2888: IF p_task_num = MSC_CL_PULL.TASK_OH_SUPPLY THEN
2889: if (prec.oh_sn_flag = MSC_UTIL.SYS_INCR) then
2890: -- do net-change for this entity
2891: p_cont_lrnn := p_lrnn;
2892: RETURN TRUE;
2893: elsif (prec.oh_sn_flag = MSC_UTIL.SYS_TGT) then
2889: if (prec.oh_sn_flag = MSC_UTIL.SYS_INCR) then
2890: -- do net-change for this entity
2891: p_cont_lrnn := p_lrnn;
2892: RETURN TRUE;
2893: elsif (prec.oh_sn_flag = MSC_UTIL.SYS_TGT) then
2894: -- do targeted for this entity
2895: p_cont_lrnn := -1;
2896: RETURN TRUE;
2897: else
2905: IF ((p_task_num = MSC_CL_PULL.TASK_PO_SUPPLY) or
2906: (p_task_num = MSC_CL_PULL.TASK_PO_PO_SUPPLY) or
2907: (p_task_num = MSC_CL_PULL.TASK_PO_REQ_SUPPLY)) THEN
2908:
2909: if (prec.po_sn_flag = MSC_UTIL.SYS_INCR) then
2910: -- do net-change for this entity
2911: p_cont_lrnn := p_lrnn;
2912: RETURN TRUE;
2913: elsif (prec.po_sn_flag = MSC_UTIL.SYS_TGT) then
2909: if (prec.po_sn_flag = MSC_UTIL.SYS_INCR) then
2910: -- do net-change for this entity
2911: p_cont_lrnn := p_lrnn;
2912: RETURN TRUE;
2913: elsif (prec.po_sn_flag = MSC_UTIL.SYS_TGT) then
2914: -- do targeted for this entity
2915: p_cont_lrnn := -1;
2916: RETURN TRUE;
2917: else
2921: END IF;
2922:
2923:
2924: IF p_task_num in (MSC_CL_PULL.TASK_SALES_ORDER1,MSC_CL_PULL.TASK_SALES_ORDER2,MSC_CL_PULL.TASK_SALES_ORDER3,MSC_CL_PULL.TASK_AHL) THEN
2925: if (prec.so_sn_flag = MSC_UTIL.SYS_INCR) then
2926: -- do net-change for this entity
2927: p_cont_lrnn := p_lrnn;
2928: RETURN TRUE;
2929: elsif (prec.so_sn_flag = MSC_UTIL.SYS_TGT) then
2925: if (prec.so_sn_flag = MSC_UTIL.SYS_INCR) then
2926: -- do net-change for this entity
2927: p_cont_lrnn := p_lrnn;
2928: RETURN TRUE;
2929: elsif (prec.so_sn_flag = MSC_UTIL.SYS_TGT) then
2930: -- do targeted for this entity
2931: p_cont_lrnn := -1;
2932: RETURN TRUE;
2933: else
2937: END IF;
2938:
2939:
2940: IF ((p_task_num = MSC_CL_PULL.TASK_USER_SUPPLY) OR (p_task_num = MSC_CL_PULL.TASK_USER_DEMAND)) THEN
2941: if (prec.usup_sn_flag = MSC_UTIL.SYS_INCR) then
2942: -- do net-change for this entity
2943: p_cont_lrnn := p_lrnn;
2944: RETURN TRUE;
2945: elsif (prec.usup_sn_flag = MSC_UTIL.SYS_TGT) then
2941: if (prec.usup_sn_flag = MSC_UTIL.SYS_INCR) then
2942: -- do net-change for this entity
2943: p_cont_lrnn := p_lrnn;
2944: RETURN TRUE;
2945: elsif (prec.usup_sn_flag = MSC_UTIL.SYS_TGT) then
2946: -- do targeted for this entity
2947: p_cont_lrnn := -1;
2948: RETURN TRUE;
2949: else
2956: -- FOR LOAD_WIP_SUPPLY
2957: -- FOR LOAD_WIP_DEMAND
2958: IF ( (p_task_num = MSC_CL_PULL.TASK_WIP_SUPPLY) OR
2959: (p_task_num = MSC_CL_PULL.TASK_WIP_DEMAND) ) THEN
2960: if (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) then
2961: -- do net-change for this entity
2962: p_cont_lrnn := p_lrnn;
2963: RETURN TRUE;
2964: elsif (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) then
2960: if (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) then
2961: -- do net-change for this entity
2962: p_cont_lrnn := p_lrnn;
2963: RETURN TRUE;
2964: elsif (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) then
2965: -- do targeted for this entity
2966: p_cont_lrnn := -1;
2967: RETURN TRUE;
2968: else
2971: end if;
2972: END IF;
2973:
2974: IF (p_task_num = MSC_CL_PULL.TASK_RESOURCE) THEN
2975: if ( (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) or (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) ) then
2976: -- do targeted for this entity
2977: p_cont_lrnn := -1;
2978: RETURN TRUE;
2979: elsif ( (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) or (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) ) then
2975: if ( (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) or (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) ) then
2976: -- do targeted for this entity
2977: p_cont_lrnn := -1;
2978: RETURN TRUE;
2979: elsif ( (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) or (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) ) then
2980: -- do net-change for this entity
2981: p_cont_lrnn := p_lrnn;
2982: RETURN TRUE;
2983: else
2987: END IF;
2988:
2989: /* ds change start */
2990: IF (p_task_num = MSC_CL_PULL.TASK_RESOURCE_INSTANCE) THEN
2991: if ( (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) or (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) ) then
2992: -- do targeted for this entity
2993: p_cont_lrnn := -1;
2994: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_INSTANCE is targetted ');
2995: RETURN TRUE;
2990: IF (p_task_num = MSC_CL_PULL.TASK_RESOURCE_INSTANCE) THEN
2991: if ( (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) or (prec.wip_sn_flag = MSC_UTIL.SYS_TGT) ) then
2992: -- do targeted for this entity
2993: p_cont_lrnn := -1;
2994: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_INSTANCE is targetted ');
2995: RETURN TRUE;
2996: elsif ( (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) or (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) ) then
2997: -- do net-change for this entity
2998: p_cont_lrnn := p_lrnn;
2992: -- do targeted for this entity
2993: p_cont_lrnn := -1;
2994: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_INSTANCE is targetted ');
2995: RETURN TRUE;
2996: elsif ( (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) or (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) ) then
2997: -- do net-change for this entity
2998: p_cont_lrnn := p_lrnn;
2999: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_INSTANCE is incremental ');
3000: RETURN TRUE;
2995: RETURN TRUE;
2996: elsif ( (prec.bom_sn_flag = MSC_UTIL.SYS_INCR) or (prec.wip_sn_flag = MSC_UTIL.SYS_INCR) ) then
2997: -- do net-change for this entity
2998: p_cont_lrnn := p_lrnn;
2999: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_INSTANCE is incremental ');
3000: RETURN TRUE;
3001: else
3002: -- do nothing
3003: RETURN FALSE;
3004: end if;
3005: END IF;
3006:
3007: IF (p_task_num = MSC_CL_PULL.TASK_RESOURCE_SETUP) THEN
3008: IF (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) THEN
3009: p_cont_lrnn := -1;
3010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_SETUP is targetted ');
3011: RETURN TRUE;
3012: ELSE
3006:
3007: IF (p_task_num = MSC_CL_PULL.TASK_RESOURCE_SETUP) THEN
3008: IF (prec.bom_sn_flag = MSC_UTIL.SYS_TGT) THEN
3009: p_cont_lrnn := -1;
3010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'TASK_RESOURCE_SETUP is targetted ');
3011: RETURN TRUE;
3012: ELSE
3013: RETURN FALSE;
3014: END IF;
3016:
3017: /* ds change end */
3018:
3019: IF (p_task_num = MSC_CL_PULL.TASK_ATP_RULES) THEN
3020: IF (prec.atp_rules_flag = MSC_UTIL.SYS_YES) THEN
3021: p_cont_lrnn := -1;
3022: RETURN TRUE;
3023: ELSE
3024: RETURN FALSE;
3025: END IF;
3026: END IF;
3027:
3028: IF ( p_task_num = MSC_CL_PULL.TASK_CALENDAR_DATE ) THEN
3029: IF prec.calendar_flag = MSC_UTIL.SYS_YES THEN
3030: p_cont_lrnn := -1;
3031: RETURN TRUE;
3032: else
3033: RETURN FALSE;
3034: end if;
3035: END IF;
3036:
3037: IF ( p_task_num = MSC_CL_PULL.TASK_DEMAND_CLASS ) THEN
3038: IF prec.demand_class_flag = MSC_UTIL.SYS_YES THEN
3039: p_cont_lrnn := -1;
3040: RETURN TRUE;
3041: else
3042: RETURN FALSE;
3043: end if;
3044: END IF;
3045:
3046: IF ( p_task_num = MSC_CL_PULL.TASK_BIS ) THEN
3047: IF prec.kpi_bis_flag = MSC_UTIL.SYS_YES THEN
3048: p_cont_lrnn := -1;
3049: RETURN TRUE;
3050: else
3051: RETURN FALSE;
3052: end if;
3053: END IF;
3054:
3055: IF ( p_task_num = MSC_CL_PULL.TASK_PARAMETER ) THEN
3056: IF prec.parameter_flag = MSC_UTIL.SYS_YES THEN
3057: p_cont_lrnn := -1;
3058: RETURN TRUE;
3059: else
3060: RETURN FALSE;
3061: end if;
3062: END IF;
3063:
3064: IF ( p_task_num = MSC_CL_PULL.TASK_PLANNERS ) THEN
3065: IF prec.planner_flag = MSC_UTIL.SYS_YES THEN
3066: p_cont_lrnn := -1;
3067: RETURN TRUE;
3068: else
3069: RETURN FALSE;
3070: end if;
3071: END IF;
3072:
3073: IF ( p_task_num = MSC_CL_PULL.TASK_PROJECT ) THEN
3074: IF prec.project_flag = MSC_UTIL.SYS_YES THEN
3075: p_cont_lrnn := -1;
3076: RETURN TRUE;
3077: else
3078: RETURN FALSE;
3079: end if;
3080: END IF;
3081:
3082: IF ( p_task_num = MSC_CL_PULL.TASK_HARD_RESERVATION ) THEN
3083: IF prec.reserves_flag = MSC_UTIL.SYS_YES THEN
3084: p_cont_lrnn := -1;
3085: RETURN TRUE;
3086: else
3087: RETURN FALSE;
3088: end if;
3089: END IF;
3090:
3091: IF ( p_task_num = MSC_CL_PULL.TASK_SAFETY_STOCK ) THEN
3092: IF prec.saf_stock_flag = MSC_UTIL.SYS_YES THEN
3093: p_cont_lrnn := -1;
3094: RETURN TRUE;
3095: else
3096: RETURN FALSE;
3097: end if;
3098: END IF;
3099:
3100: IF ( p_task_num = MSC_CL_PULL.TASK_SOURCING ) THEN
3101: IF prec.sourcing_rule_flag = MSC_UTIL.SYS_YES THEN
3102: p_cont_lrnn := -1;
3103: RETURN TRUE;
3104: else
3105: RETURN FALSE;
3106: end if;
3107: END IF;
3108:
3109: IF ( p_task_num = MSC_CL_PULL.TASK_SUB_INVENTORY ) THEN
3110: IF prec.sub_inventory_flag = MSC_UTIL.SYS_YES THEN
3111: p_cont_lrnn := -1;
3112: RETURN TRUE;
3113: else
3114: RETURN FALSE;
3115: end if;
3116: END IF;
3117:
3118: IF (p_task_num = MSC_CL_PULL.TASK_TRADING_PARTNER) OR (p_task_num = MSC_CL_PULL.TASK_BUYER_CONTACT) THEN
3119: IF (prec.tp_customer_flag = MSC_UTIL.SYS_YES ) OR (prec.tp_vendor_flag = MSC_UTIL.SYS_YES) THEN
3120: p_cont_lrnn := -1;
3121: RETURN TRUE;
3122: else
3123: RETURN FALSE;
3124: end if;
3125: END IF;
3126:
3127: IF ( p_task_num = MSC_CL_PULL.TASK_UNIT_NUMBER ) THEN
3128: IF prec.unit_number_flag = MSC_UTIL.SYS_YES THEN
3129: p_cont_lrnn := -1;
3130: RETURN TRUE;
3131: else
3132: RETURN FALSE;
3133: end if;
3134: END IF;
3135:
3136: IF ( p_task_num = MSC_CL_PULL.TASK_UOM ) THEN
3137: IF prec.uom_flag = MSC_UTIL.SYS_YES THEN
3138: p_cont_lrnn := -1;
3139: RETURN TRUE;
3140: else
3141: RETURN FALSE;
3142: end if;
3143: END IF;
3144:
3145: IF ( p_task_num = MSC_CL_PULL.TASK_ITEM_SUBSTITUTES ) THEN
3146: IF prec.item_subst_flag = MSC_UTIL.SYS_YES THEN
3147: p_cont_lrnn := -1;
3148: RETURN TRUE;
3149: else
3150: RETURN FALSE;
3162:
3163: /* CP-AUTO */
3164: IF ( p_task_num = MSC_CL_PULL.TASK_SUPPLIER_RESPONSE ) THEN
3165:
3166: if (prec.suprep_sn_flag = MSC_UTIL.SYS_INCR) then
3167: -- do net-change for this entity
3168: p_cont_lrnn := p_lrnn;
3169:
3170: RETURN TRUE;
3167: -- do net-change for this entity
3168: p_cont_lrnn := p_lrnn;
3169:
3170: RETURN TRUE;
3171: elsif (prec.suprep_sn_flag = MSC_UTIL.SYS_TGT) then
3172: -- do targeted for this entity
3173: p_cont_lrnn := -1;
3174:
3175: RETURN TRUE;
3179: end if;
3180: END IF;
3181:
3182: IF ( p_task_num = MSC_CL_PULL.TASK_TRIP ) THEN
3183: if (prec.trip_sn_flag = MSC_UTIL.SYS_INCR) then
3184: -- do net-change for this entity
3185: p_cont_lrnn := p_lrnn;
3186: RETURN TRUE;
3187: elsif (prec.trip_sn_flag = MSC_UTIL.SYS_TGT) then
3183: if (prec.trip_sn_flag = MSC_UTIL.SYS_INCR) then
3184: -- do net-change for this entity
3185: p_cont_lrnn := p_lrnn;
3186: RETURN TRUE;
3187: elsif (prec.trip_sn_flag = MSC_UTIL.SYS_TGT) then
3188: -- do targeted for this entity
3189: p_cont_lrnn := -1;
3190: RETURN TRUE;
3191: else
3210: p_is_incremental_refresh := FALSE;
3211: p_is_partial_refresh := FALSE;
3212:
3213: IF (p_task_num = MSC_CL_COLLECTION.PTASK_SUPPLIER_CAPACITY) THEN
3214: if (MSC_CL_COLLECTION.v_coll_prec.supcap_sn_flag = MSC_UTIL.SYS_INCR) then
3215: -- do net-change for this entity
3216: p_is_incremental_refresh := TRUE;
3217: p_is_partial_refresh := FALSE;
3218: p_exchange_mode := MSC_UTIL.SYS_NO;
3214: if (MSC_CL_COLLECTION.v_coll_prec.supcap_sn_flag = MSC_UTIL.SYS_INCR) then
3215: -- do net-change for this entity
3216: p_is_incremental_refresh := TRUE;
3217: p_is_partial_refresh := FALSE;
3218: p_exchange_mode := MSC_UTIL.SYS_NO;
3219: RETURN TRUE;
3220: elsif (MSC_CL_COLLECTION.v_coll_prec.supcap_sn_flag = MSC_UTIL.SYS_TGT) then
3221: -- do targeted for this entity
3222: p_is_incremental_refresh := FALSE;
3216: p_is_incremental_refresh := TRUE;
3217: p_is_partial_refresh := FALSE;
3218: p_exchange_mode := MSC_UTIL.SYS_NO;
3219: RETURN TRUE;
3220: elsif (MSC_CL_COLLECTION.v_coll_prec.supcap_sn_flag = MSC_UTIL.SYS_TGT) then
3221: -- do targeted for this entity
3222: p_is_incremental_refresh := FALSE;
3223: p_is_partial_refresh := TRUE;
3224: p_exchange_mode := MSC_UTIL.SYS_YES;
3220: elsif (MSC_CL_COLLECTION.v_coll_prec.supcap_sn_flag = MSC_UTIL.SYS_TGT) then
3221: -- do targeted for this entity
3222: p_is_incremental_refresh := FALSE;
3223: p_is_partial_refresh := TRUE;
3224: p_exchange_mode := MSC_UTIL.SYS_YES;
3225: RETURN TRUE;
3226: else
3227: -- do nothing
3228: RETURN FALSE;
3234: MSC_CL_COLLECTION.PTASK_ROUTING_OPERATIONS,MSC_CL_COLLECTION.PTASK_OPERATION_RESOURCES,MSC_CL_COLLECTION.PTASK_RESOURCE,MSC_CL_COLLECTION.PTASK_OP_RESOURCE_SEQ,
3235: MSC_CL_COLLECTION.PTASK_PROCESS_EFFECTIVITY,MSC_CL_COLLECTION.PTASK_OPERATION_COMPONENTS,MSC_CL_COLLECTION.PTASK_OPERATION_NETWORKS,
3236: MSC_CL_COLLECTION.PTASK_RESOURCE_SETUP,MSC_CL_COLLECTION.PTASK_SETUP_TRANSITION,MSC_CL_COLLECTION.PTASK_STD_OP_RESOURCES) then /* ds change */
3237:
3238: if (MSC_CL_COLLECTION.v_coll_prec.bom_sn_flag = MSC_UTIL.SYS_INCR) then
3239: -- do net-change for this entity
3240: p_is_incremental_refresh := TRUE;
3241: p_is_partial_refresh := FALSE;
3242: p_exchange_mode := MSC_UTIL.SYS_NO;
3238: if (MSC_CL_COLLECTION.v_coll_prec.bom_sn_flag = MSC_UTIL.SYS_INCR) then
3239: -- do net-change for this entity
3240: p_is_incremental_refresh := TRUE;
3241: p_is_partial_refresh := FALSE;
3242: p_exchange_mode := MSC_UTIL.SYS_NO;
3243: MSC_CL_COLLECTION.v_bom_refresh_type := 1;
3244: RETURN TRUE;
3245: elsif (MSC_CL_COLLECTION.v_coll_prec.bom_sn_flag = MSC_UTIL.SYS_TGT) then
3246: -- do targeted for this entity
3241: p_is_partial_refresh := FALSE;
3242: p_exchange_mode := MSC_UTIL.SYS_NO;
3243: MSC_CL_COLLECTION.v_bom_refresh_type := 1;
3244: RETURN TRUE;
3245: elsif (MSC_CL_COLLECTION.v_coll_prec.bom_sn_flag = MSC_UTIL.SYS_TGT) then
3246: -- do targeted for this entity
3247: p_is_incremental_refresh := FALSE;
3248: p_is_partial_refresh := TRUE;
3249: p_exchange_mode := MSC_UTIL.SYS_YES;
3245: elsif (MSC_CL_COLLECTION.v_coll_prec.bom_sn_flag = MSC_UTIL.SYS_TGT) then
3246: -- do targeted for this entity
3247: p_is_incremental_refresh := FALSE;
3248: p_is_partial_refresh := TRUE;
3249: p_exchange_mode := MSC_UTIL.SYS_YES;
3250: MSC_CL_COLLECTION.v_bom_refresh_type := 2;
3251: RETURN TRUE;
3252: else
3253: -- do nothing
3256: end if;
3257: end if;
3258: -- grouping bor w/ the bom tasks
3259: IF (p_task_num = MSC_CL_COLLECTION.PTASK_BOR) THEN
3260: if (MSC_CL_COLLECTION.v_coll_prec.bor_sn_flag = MSC_UTIL.SYS_INCR) then
3261: -- do net-change for this entity
3262: p_is_incremental_refresh := TRUE;
3263: p_is_partial_refresh := FALSE;
3264: p_exchange_mode := MSC_UTIL.SYS_NO;
3260: if (MSC_CL_COLLECTION.v_coll_prec.bor_sn_flag = MSC_UTIL.SYS_INCR) then
3261: -- do net-change for this entity
3262: p_is_incremental_refresh := TRUE;
3263: p_is_partial_refresh := FALSE;
3264: p_exchange_mode := MSC_UTIL.SYS_NO;
3265: RETURN TRUE;
3266: elsif (MSC_CL_COLLECTION.v_coll_prec.bor_sn_flag = MSC_UTIL.SYS_TGT) then
3267: -- do targeted for this entity
3268: p_is_incremental_refresh := FALSE;
3262: p_is_incremental_refresh := TRUE;
3263: p_is_partial_refresh := FALSE;
3264: p_exchange_mode := MSC_UTIL.SYS_NO;
3265: RETURN TRUE;
3266: elsif (MSC_CL_COLLECTION.v_coll_prec.bor_sn_flag = MSC_UTIL.SYS_TGT) then
3267: -- do targeted for this entity
3268: p_is_incremental_refresh := FALSE;
3269: p_is_partial_refresh := TRUE;
3270: p_exchange_mode := MSC_UTIL.SYS_YES;
3266: elsif (MSC_CL_COLLECTION.v_coll_prec.bor_sn_flag = MSC_UTIL.SYS_TGT) then
3267: -- do targeted for this entity
3268: p_is_incremental_refresh := FALSE;
3269: p_is_partial_refresh := TRUE;
3270: p_exchange_mode := MSC_UTIL.SYS_YES;
3271: RETURN TRUE;
3272: else
3273: -- do nothing
3274: RETURN FALSE;
3277:
3278: IF (p_task_num = MSC_CL_COLLECTION.PTASK_FORECAST_DEMAND) THEN
3279: -- (p_task_num = MSC_CL_COLLECTION.PTASK_FORECASTS) /*This will be done in launch_mon_partial*/
3280: -- (p_task_num = MSC_CL_COLLECTION.PTASK_ODS_DEMAND)) /* this will be done in supply */
3281: if (MSC_CL_COLLECTION.v_coll_prec.fcst_sn_flag = MSC_UTIL.SYS_INCR) then
3282: -- do net-change for this entity
3283: p_is_incremental_refresh := TRUE;
3284: p_is_partial_refresh := FALSE;
3285: p_exchange_mode := MSC_UTIL.SYS_NO;
3281: if (MSC_CL_COLLECTION.v_coll_prec.fcst_sn_flag = MSC_UTIL.SYS_INCR) then
3282: -- do net-change for this entity
3283: p_is_incremental_refresh := TRUE;
3284: p_is_partial_refresh := FALSE;
3285: p_exchange_mode := MSC_UTIL.SYS_NO;
3286: RETURN TRUE;
3287: elsif (MSC_CL_COLLECTION.v_coll_prec.fcst_sn_flag = MSC_UTIL.SYS_TGT) then
3288: -- do targeted for this entity
3289: p_is_incremental_refresh := FALSE;
3283: p_is_incremental_refresh := TRUE;
3284: p_is_partial_refresh := FALSE;
3285: p_exchange_mode := MSC_UTIL.SYS_NO;
3286: RETURN TRUE;
3287: elsif (MSC_CL_COLLECTION.v_coll_prec.fcst_sn_flag = MSC_UTIL.SYS_TGT) then
3288: -- do targeted for this entity
3289: p_is_incremental_refresh := FALSE;
3290: p_is_partial_refresh := TRUE;
3291: p_exchange_mode := MSC_UTIL.SYS_YES;
3287: elsif (MSC_CL_COLLECTION.v_coll_prec.fcst_sn_flag = MSC_UTIL.SYS_TGT) then
3288: -- do targeted for this entity
3289: p_is_incremental_refresh := FALSE;
3290: p_is_partial_refresh := TRUE;
3291: p_exchange_mode := MSC_UTIL.SYS_YES;
3292: RETURN TRUE;
3293: else
3294: -- do nothing
3295: RETURN FALSE;
3295: RETURN FALSE;
3296: end if;
3297: end if;
3298: IF ((p_task_num = MSC_CL_COLLECTION.PTASK_ITEM) or (p_task_num = MSC_CL_COLLECTION.PTASK_CATEGORY_ITEM)) THEN
3299: if (MSC_CL_COLLECTION.v_coll_prec.item_sn_flag = MSC_UTIL.SYS_INCR) then
3300: -- do net-change for this entity
3301: p_is_incremental_refresh := TRUE;
3302: p_is_partial_refresh := FALSE;
3303: p_exchange_mode := MSC_UTIL.SYS_NO;
3299: if (MSC_CL_COLLECTION.v_coll_prec.item_sn_flag = MSC_UTIL.SYS_INCR) then
3300: -- do net-change for this entity
3301: p_is_incremental_refresh := TRUE;
3302: p_is_partial_refresh := FALSE;
3303: p_exchange_mode := MSC_UTIL.SYS_NO;
3304: RETURN TRUE;
3305: elsif (MSC_CL_COLLECTION.v_coll_prec.item_sn_flag = MSC_UTIL.SYS_TGT) then
3306: -- do targeted for this entity
3307: p_is_incremental_refresh := FALSE;
3301: p_is_incremental_refresh := TRUE;
3302: p_is_partial_refresh := FALSE;
3303: p_exchange_mode := MSC_UTIL.SYS_NO;
3304: RETURN TRUE;
3305: elsif (MSC_CL_COLLECTION.v_coll_prec.item_sn_flag = MSC_UTIL.SYS_TGT) then
3306: -- do targeted for this entity
3307: p_is_incremental_refresh := FALSE;
3308: p_is_partial_refresh := TRUE;
3309: p_exchange_mode := MSC_UTIL.SYS_YES;
3305: elsif (MSC_CL_COLLECTION.v_coll_prec.item_sn_flag = MSC_UTIL.SYS_TGT) then
3306: -- do targeted for this entity
3307: p_is_incremental_refresh := FALSE;
3308: p_is_partial_refresh := TRUE;
3309: p_exchange_mode := MSC_UTIL.SYS_YES;
3310: RETURN TRUE;
3311: else
3312: -- do nothing
3313: RETURN FALSE;
3316:
3317: IF (p_task_num = MSC_CL_COLLECTION.PTASK_MDS_DEMAND) THEN
3318: ---- (p_task_num = PTASK_DESIGNATOR) or
3319: ---- Currently LOAD_DESIGNATOR called in the LAUNCH_MONITOR itself.
3320: if (MSC_CL_COLLECTION.v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_INCR) then
3321: -- do net-change for this entity
3322: p_is_incremental_refresh := TRUE;
3323: p_is_partial_refresh := FALSE;
3324: p_exchange_mode := MSC_UTIL.SYS_NO;
3320: if (MSC_CL_COLLECTION.v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_INCR) then
3321: -- do net-change for this entity
3322: p_is_incremental_refresh := TRUE;
3323: p_is_partial_refresh := FALSE;
3324: p_exchange_mode := MSC_UTIL.SYS_NO;
3325: RETURN TRUE;
3326: elsif (MSC_CL_COLLECTION.v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_TGT) then
3327: -- do targeted for this entity
3328: p_is_incremental_refresh := FALSE;
3322: p_is_incremental_refresh := TRUE;
3323: p_is_partial_refresh := FALSE;
3324: p_exchange_mode := MSC_UTIL.SYS_NO;
3325: RETURN TRUE;
3326: elsif (MSC_CL_COLLECTION.v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_TGT) then
3327: -- do targeted for this entity
3328: p_is_incremental_refresh := FALSE;
3329: p_is_partial_refresh := TRUE;
3330: p_exchange_mode := MSC_UTIL.SYS_YES;
3326: elsif (MSC_CL_COLLECTION.v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_TGT) then
3327: -- do targeted for this entity
3328: p_is_incremental_refresh := FALSE;
3329: p_is_partial_refresh := TRUE;
3330: p_exchange_mode := MSC_UTIL.SYS_YES;
3331: RETURN TRUE;
3332: else
3333: -- do nothing
3334: RETURN FALSE;
3357: RETURN FALSE; -- This will be done in Launch_mon_partial
3358: END IF;
3359:
3360: IF (p_task_num = MSC_CL_COLLECTION.PTASK_SALES_ORDER) THEN
3361: if (MSC_CL_COLLECTION.v_coll_prec.so_sn_flag = MSC_UTIL.SYS_TGT) then
3362: -- do targeted for this entity
3363: p_is_incremental_refresh := FALSE;
3364: p_is_partial_refresh := TRUE;
3365: p_exchange_mode := MSC_UTIL.SYS_YES;
3361: if (MSC_CL_COLLECTION.v_coll_prec.so_sn_flag = MSC_UTIL.SYS_TGT) then
3362: -- do targeted for this entity
3363: p_is_incremental_refresh := FALSE;
3364: p_is_partial_refresh := TRUE;
3365: p_exchange_mode := MSC_UTIL.SYS_YES;
3366: RETURN TRUE;
3367: else
3368: -- do net-change for this entity
3369: p_is_incremental_refresh := TRUE;
3367: else
3368: -- do net-change for this entity
3369: p_is_incremental_refresh := TRUE;
3370: p_is_partial_refresh := FALSE;
3371: p_exchange_mode := MSC_UTIL.SYS_NO;
3372: RETURN TRUE;
3373: end if;
3374: END IF;
3375:
3373: end if;
3374: END IF;
3375:
3376: IF (p_task_num in ( MSC_CL_COLLECTION.PTASK_WIP_RES_REQ, MSC_CL_COLLECTION.PTASK_WIP_DEMAND,MSC_CL_COLLECTION.PTASK_RES_INST_REQ ) ) THEN
3377: if (MSC_CL_COLLECTION.v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_INCR) then
3378: -- do net-change for this entity
3379: p_is_incremental_refresh := TRUE;
3380: p_is_partial_refresh := FALSE;
3381: p_exchange_mode := MSC_UTIL.SYS_NO;
3377: if (MSC_CL_COLLECTION.v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_INCR) then
3378: -- do net-change for this entity
3379: p_is_incremental_refresh := TRUE;
3380: p_is_partial_refresh := FALSE;
3381: p_exchange_mode := MSC_UTIL.SYS_NO;
3382: RETURN TRUE;
3383: elsif (MSC_CL_COLLECTION.v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_TGT) then
3384: -- do targeted for this entity
3385: p_is_incremental_refresh := FALSE;
3379: p_is_incremental_refresh := TRUE;
3380: p_is_partial_refresh := FALSE;
3381: p_exchange_mode := MSC_UTIL.SYS_NO;
3382: RETURN TRUE;
3383: elsif (MSC_CL_COLLECTION.v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_TGT) then
3384: -- do targeted for this entity
3385: p_is_incremental_refresh := FALSE;
3386: p_is_partial_refresh := TRUE;
3387: p_exchange_mode := MSC_UTIL.SYS_YES;
3383: elsif (MSC_CL_COLLECTION.v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_TGT) then
3384: -- do targeted for this entity
3385: p_is_incremental_refresh := FALSE;
3386: p_is_partial_refresh := TRUE;
3387: p_exchange_mode := MSC_UTIL.SYS_YES;
3388: RETURN TRUE;
3389: else
3390: RETURN FALSE;
3391: end if;
3390: RETURN FALSE;
3391: end if;
3392: END IF;
3393: IF (p_task_num = MSC_CL_COLLECTION.PTASK_ATP_RULES) THEN
3394: if (MSC_CL_COLLECTION.v_coll_prec.atp_rules_flag = MSC_UTIL.SYS_YES) then
3395: p_is_incremental_refresh := FALSE;
3396: p_is_partial_refresh := TRUE;
3397: RETURN TRUE;
3398: else
3400: end if;
3401: END IF;
3402:
3403: IF (p_task_num = MSC_CL_COLLECTION.PTASK_CALENDAR_DATE) THEN
3404: if (MSC_CL_COLLECTION.v_coll_prec.calendar_flag = MSC_UTIL.SYS_YES) then
3405: p_is_incremental_refresh := FALSE;
3406: p_is_partial_refresh := TRUE;
3407: RETURN TRUE;
3408: else
3410: end if;
3411: END IF;
3412:
3413: IF (p_task_num = MSC_CL_COLLECTION.PTASK_DEMAND_CLASS) THEN
3414: if (MSC_CL_COLLECTION.v_coll_prec.demand_class_flag = MSC_UTIL.SYS_YES) then
3415: p_is_incremental_refresh := FALSE;
3416: p_is_partial_refresh := TRUE;
3417: RETURN TRUE;
3418: else
3424: (p_task_num = MSC_CL_COLLECTION.PTASK_BIS_TARGET_LEVELS) OR
3425: (p_task_num = MSC_CL_COLLECTION.PTASK_BIS_TARGETS ) OR
3426: (p_task_num = MSC_CL_COLLECTION.PTASK_BIS_BUSINESS_PLANS) OR
3427: (p_task_num = MSC_CL_COLLECTION.PTASK_BIS_PERIODS ) ) THEN
3428: IF MSC_CL_COLLECTION.v_coll_prec.kpi_bis_flag = MSC_UTIL.SYS_YES THEN
3429: p_is_incremental_refresh := FALSE;
3430: p_is_partial_refresh := TRUE;
3431: RETURN TRUE;
3432: else
3434: end if;
3435: END IF;
3436:
3437: IF (p_task_num = MSC_CL_COLLECTION.PTASK_PARAMETER) THEN
3438: if (MSC_CL_COLLECTION.v_coll_prec.parameter_flag = MSC_UTIL.SYS_YES) then
3439: p_is_incremental_refresh := FALSE;
3440: p_is_partial_refresh := TRUE;
3441: RETURN TRUE;
3442: else
3444: end if;
3445: END IF;
3446:
3447: IF (p_task_num = MSC_CL_COLLECTION.PTASK_PLANNERS) THEN
3448: if (MSC_CL_COLLECTION.v_coll_prec.planner_flag = MSC_UTIL.SYS_YES) then
3449: p_is_incremental_refresh := FALSE;
3450: p_is_partial_refresh := TRUE;
3451: RETURN TRUE;
3452: else
3454: end if;
3455: END IF;
3456:
3457: IF (p_task_num = MSC_CL_COLLECTION.PTASK_PROJECT) THEN
3458: if (MSC_CL_COLLECTION.v_coll_prec.project_flag = MSC_UTIL.SYS_YES) then
3459: p_is_incremental_refresh := FALSE;
3460: p_is_partial_refresh := TRUE;
3461: RETURN TRUE;
3462: else
3464: end if;
3465: END IF;
3466:
3467: IF (p_task_num = MSC_CL_COLLECTION.PTASK_HARD_RESERVATION) THEN
3468: if (MSC_CL_COLLECTION.v_coll_prec.reserves_flag = MSC_UTIL.SYS_YES) then
3469: p_is_incremental_refresh := FALSE;
3470: p_is_partial_refresh := TRUE;
3471: RETURN TRUE;
3472: else
3474: end if;
3475: END IF;
3476:
3477: IF (p_task_num = MSC_CL_COLLECTION.PTASK_SAFETY_STOCK) THEN
3478: if (MSC_CL_COLLECTION.v_coll_prec.saf_stock_flag = MSC_UTIL.SYS_YES) then
3479: p_is_incremental_refresh := FALSE;
3480: p_is_partial_refresh := TRUE;
3481: RETURN TRUE;
3482: else
3484: end if;
3485: END IF;
3486:
3487: IF (p_task_num = MSC_CL_COLLECTION.PTASK_SOURCING) THEN
3488: if (MSC_CL_COLLECTION.v_coll_prec.sourcing_rule_flag = MSC_UTIL.SYS_YES) then
3489: p_is_incremental_refresh := FALSE;
3490: p_is_partial_refresh := TRUE;
3491: RETURN TRUE;
3492: else
3494: end if;
3495: END IF;
3496:
3497: IF (p_task_num = MSC_CL_COLLECTION.PTASK_SUB_INVENTORY) THEN
3498: if (MSC_CL_COLLECTION.v_coll_prec.sub_inventory_flag = MSC_UTIL.SYS_YES) then
3499: p_is_incremental_refresh := FALSE;
3500: p_is_partial_refresh := TRUE;
3501: RETURN TRUE;
3502: else
3504: end if;
3505: END IF;
3506:
3507: IF (p_task_num = MSC_CL_COLLECTION.PTASK_UNIT_NUMBER) THEN
3508: if (MSC_CL_COLLECTION.v_coll_prec.unit_number_flag = MSC_UTIL.SYS_YES) then
3509: p_is_incremental_refresh := FALSE;
3510: p_is_partial_refresh := TRUE;
3511: RETURN TRUE;
3512: else
3514: end if;
3515: END IF;
3516:
3517: IF (p_task_num = MSC_CL_COLLECTION.PTASK_ITEM_SUBSTITUTES) THEN
3518: if (MSC_CL_COLLECTION.v_coll_prec.item_subst_flag = MSC_UTIL.SYS_YES) then
3519: p_is_incremental_refresh := FALSE;
3520: p_is_partial_refresh := TRUE;
3521: RETURN TRUE;
3522: else
3524: end if;
3525: END IF;
3526:
3527: IF (p_task_num = MSC_CL_COLLECTION.PTASK_COMPANY_USERS) THEN
3528: if (MSC_CL_COLLECTION.v_coll_prec.user_company_flag = MSC_UTIL.COMPANY_ONLY) OR
3529: (MSC_CL_COLLECTION.v_coll_prec.user_company_flag = MSC_UTIL.USER_AND_COMPANY) then
3530: p_is_incremental_refresh := FALSE;
3531: p_is_partial_refresh := TRUE;
3532: RETURN TRUE;
3525: END IF;
3526:
3527: IF (p_task_num = MSC_CL_COLLECTION.PTASK_COMPANY_USERS) THEN
3528: if (MSC_CL_COLLECTION.v_coll_prec.user_company_flag = MSC_UTIL.COMPANY_ONLY) OR
3529: (MSC_CL_COLLECTION.v_coll_prec.user_company_flag = MSC_UTIL.USER_AND_COMPANY) then
3530: p_is_incremental_refresh := FALSE;
3531: p_is_partial_refresh := TRUE;
3532: RETURN TRUE;
3533: else