300: IF G_titem IS NOT NULL THEN
301: x_select := x_select || ' AND msi.concatenated_segments <= :t_item ';
302: END IF;
303:
304: cur_item := dbms_sql.open_cursor;
305: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
306:
307: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set);
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
301: x_select := x_select || ' AND msi.concatenated_segments <= :t_item ';
302: END IF;
303:
304: cur_item := dbms_sql.open_cursor;
305: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
306:
307: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set);
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
309: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
303:
304: cur_item := dbms_sql.open_cursor;
305: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
306:
307: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set);
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
309: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
310:
311: IF G_fcategory IS NOT NULL THEN
304: cur_item := dbms_sql.open_cursor;
305: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
306:
307: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set);
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
309: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
310:
311: IF G_fcategory IS NOT NULL THEN
312: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
305: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
306:
307: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set);
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
309: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
310:
311: IF G_fcategory IS NOT NULL THEN
312: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
313: END IF;
308: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
309: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
310:
311: IF G_fcategory IS NOT NULL THEN
312: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
313: END IF;
314: IF G_tcategory IS NOT NULL THEN
315: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
316: END IF;
311: IF G_fcategory IS NOT NULL THEN
312: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
313: END IF;
314: IF G_tcategory IS NOT NULL THEN
315: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
316: END IF;
317:
318: IF G_fplanner IS NOT NULL THEN
319: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
315: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
316: END IF;
317:
318: IF G_fplanner IS NOT NULL THEN
319: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
320: END IF;
321: IF G_tplanner IS NOT NULL THEN
322: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
323: END IF;
318: IF G_fplanner IS NOT NULL THEN
319: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
320: END IF;
321: IF G_tplanner IS NOT NULL THEN
322: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
323: END IF;
324:
325: IF G_fbuyer IS NOT NULL THEN
326: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
322: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
323: END IF;
324:
325: IF G_fbuyer IS NOT NULL THEN
326: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
327: END IF;
328: IF G_tbuyer IS NOT NULL THEN
329: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
330: END IF;
325: IF G_fbuyer IS NOT NULL THEN
326: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
327: END IF;
328: IF G_tbuyer IS NOT NULL THEN
329: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
330: END IF;
331:
332: IF G_forg IS NOT NULL THEN
333: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
329: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
330: END IF;
331:
332: IF G_forg IS NOT NULL THEN
333: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
334: END IF;
335: IF G_torg IS NOT NULL THEN
336: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
337: END IF;
332: IF G_forg IS NOT NULL THEN
333: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
334: END IF;
335: IF G_torg IS NOT NULL THEN
336: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
337: END IF;
338:
339: IF G_fitem IS NOT NULL THEN
340: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
336: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
337: END IF;
338:
339: IF G_fitem IS NOT NULL THEN
340: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
341: END IF;
342: IF G_titem IS NOT NULL THEN
343: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
344: END IF;
339: IF G_fitem IS NOT NULL THEN
340: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
341: END IF;
342: IF G_titem IS NOT NULL THEN
343: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
344: END IF;
345:
346: dbms_sql.define_column (cur_item, 1, X_item_id);
347: dbms_sql.define_column (cur_item, 2, X_org_id);
342: IF G_titem IS NOT NULL THEN
343: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
344: END IF;
345:
346: dbms_sql.define_column (cur_item, 1, X_item_id);
347: dbms_sql.define_column (cur_item, 2, X_org_id);
348: dbms_sql.define_column (cur_item, 3, X_category_id);
349:
350: X_row_count := dbms_sql.execute_and_fetch (cur_item);
343: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
344: END IF;
345:
346: dbms_sql.define_column (cur_item, 1, X_item_id);
347: dbms_sql.define_column (cur_item, 2, X_org_id);
348: dbms_sql.define_column (cur_item, 3, X_category_id);
349:
350: X_row_count := dbms_sql.execute_and_fetch (cur_item);
351: IF X_row_count > 0 THEN
344: END IF;
345:
346: dbms_sql.define_column (cur_item, 1, X_item_id);
347: dbms_sql.define_column (cur_item, 2, X_org_id);
348: dbms_sql.define_column (cur_item, 3, X_category_id);
349:
350: X_row_count := dbms_sql.execute_and_fetch (cur_item);
351: IF X_row_count > 0 THEN
352: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
346: dbms_sql.define_column (cur_item, 1, X_item_id);
347: dbms_sql.define_column (cur_item, 2, X_org_id);
348: dbms_sql.define_column (cur_item, 3, X_category_id);
349:
350: X_row_count := dbms_sql.execute_and_fetch (cur_item);
351: IF X_row_count > 0 THEN
352: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
353: G_matl_rep_id := X_rep_id;
354: X_i := 0;
352: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
353: G_matl_rep_id := X_rep_id;
354: X_i := 0;
355: LOOP
356: dbms_sql.column_value (cur_item, 1, X_item_id);
357: dbms_sql.column_value (cur_item, 2, X_org_id);
358: dbms_sql.column_value (cur_item, 3, X_category_id);
359: X_i := X_i + 1;
360: G_item_tab(X_i).inventory_item_id := X_item_id;
353: G_matl_rep_id := X_rep_id;
354: X_i := 0;
355: LOOP
356: dbms_sql.column_value (cur_item, 1, X_item_id);
357: dbms_sql.column_value (cur_item, 2, X_org_id);
358: dbms_sql.column_value (cur_item, 3, X_category_id);
359: X_i := X_i + 1;
360: G_item_tab(X_i).inventory_item_id := X_item_id;
361: G_item_tab(X_i).organization_id := X_org_id;
354: X_i := 0;
355: LOOP
356: dbms_sql.column_value (cur_item, 1, X_item_id);
357: dbms_sql.column_value (cur_item, 2, X_org_id);
358: dbms_sql.column_value (cur_item, 3, X_category_id);
359: X_i := X_i + 1;
360: G_item_tab(X_i).inventory_item_id := X_item_id;
361: G_item_tab(X_i).organization_id := X_org_id;
362: G_item_tab(X_i).category_id := X_category_id;
362: G_item_tab(X_i).category_id := X_category_id;
363: -- Inserts the data into Header table.
364: INSERT INTO ps_matl_hdr (matl_rep_id,inventory_item_id,organization_id,category_id)
365: VALUES(X_rep_id,X_item_id,X_org_id,X_category_id);
366: IF dbms_sql.fetch_rows (cur_item) <= 0 THEN
367: EXIT;
368: END IF;
369: END LOOP;
370: END IF;
367: EXIT;
368: END IF;
369: END LOOP;
370: END IF;
371: dbms_sql.close_cursor (cur_item);
372:
373: EXCEPTION
374: WHEN OTHERS THEN
375: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
600: ' AND s2.effectivity_date <= SYSDATE)) ';
601:
602:
603: -- IF G_whse_list IS NOT NULL THEN
604: cur_sstock := dbms_sql.open_cursor;
605: dbms_sql.parse (cur_sstock, X_select1,dbms_sql.NATIVE);
606:
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
601:
602:
603: -- IF G_whse_list IS NOT NULL THEN
604: cur_sstock := dbms_sql.open_cursor;
605: dbms_sql.parse (cur_sstock, X_select1,dbms_sql.NATIVE);
606:
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
603: -- IF G_whse_list IS NOT NULL THEN
604: cur_sstock := dbms_sql.open_cursor;
605: dbms_sql.parse (cur_sstock, X_select1,dbms_sql.NATIVE);
606:
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
604: cur_sstock := dbms_sql.open_cursor;
605: dbms_sql.parse (cur_sstock, X_select1,dbms_sql.NATIVE);
606:
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
606:
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
607: dbms_sql.bind_variable(cur_sstock,':item_id',V_item_id);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
608: dbms_sql.bind_variable(cur_sstock,':org_id',V_organization_id);
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
616: END IF;
609:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
616: END IF;
617:
610: dbms_sql.define_column (cur_sstock, 1, G_total_ss);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
616: END IF;
617:
618: dbms_sql.close_cursor (cur_sstock);
611: -- dbms_sql.define_column (cur_sstock, 2, G_no_safetystock);
612: X_row_count := dbms_sql.EXECUTE(cur_sstock);
613: IF dbms_sql.fetch_rows (cur_sstock) > 0 THEN
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
616: END IF;
617:
618: dbms_sql.close_cursor (cur_sstock);
619: EXCEPTION
614: dbms_sql.column_value (cur_sstock, 1, G_total_ss);
615: -- dbms_sql.column_value (cur_sstock, 2, G_no_safetystock);
616: END IF;
617:
618: dbms_sql.close_cursor (cur_sstock);
619: EXCEPTION
620: WHEN OTHERS THEN
621: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
622: IF dbms_sql.is_open (cur_sstock) then
618: dbms_sql.close_cursor (cur_sstock);
619: EXCEPTION
620: WHEN OTHERS THEN
621: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
622: IF dbms_sql.is_open (cur_sstock) then
623: dbms_sql.close_cursor (cur_sstock);
624: END IF;
625:
626: END ps_get_safety_stock; /******** END PROCEDURE*************/
619: EXCEPTION
620: WHEN OTHERS THEN
621: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
622: IF dbms_sql.is_open (cur_sstock) then
623: dbms_sql.close_cursor (cur_sstock);
624: END IF;
625:
626: END ps_get_safety_stock; /******** END PROCEDURE*************/
627: