360: IF G_titem IS NOT NULL THEN
361: x_select := x_select || ' AND msi.concatenated_segments <= :t_item ';
362: END IF;
363:
364: cur_item := dbms_sql.open_cursor;
365: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
366:
367: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set_id);
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
361: x_select := x_select || ' AND msi.concatenated_segments <= :t_item ';
362: END IF;
363:
364: cur_item := dbms_sql.open_cursor;
365: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
366:
367: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set_id);
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
369: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
363:
364: cur_item := dbms_sql.open_cursor;
365: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
366:
367: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set_id);
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
369: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
370:
371: IF G_fcategory IS NOT NULL THEN
364: cur_item := dbms_sql.open_cursor;
365: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
366:
367: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set_id);
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
369: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
370:
371: IF G_fcategory IS NOT NULL THEN
372: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
365: dbms_sql.parse (cur_item, x_select,dbms_sql.NATIVE);
366:
367: dbms_sql.bind_variable(cur_item, ':category_set_id', G_category_set_id);
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
369: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
370:
371: IF G_fcategory IS NOT NULL THEN
372: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
373: END IF;
368: dbms_sql.bind_variable(cur_item, ':structure_id', G_structure_id);
369: dbms_sql.bind_variable(cur_item, ':schedule_id', G_schedule_id);
370:
371: IF G_fcategory IS NOT NULL THEN
372: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
373: END IF;
374: IF G_tcategory IS NOT NULL THEN
375: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
376: END IF;
371: IF G_fcategory IS NOT NULL THEN
372: dbms_sql.bind_variable(cur_item, ':f_category', G_fcategory);
373: END IF;
374: IF G_tcategory IS NOT NULL THEN
375: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
376: END IF;
377:
378: IF G_fplanner IS NOT NULL THEN
379: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
375: dbms_sql.bind_variable(cur_item, ':t_category', G_tcategory);
376: END IF;
377:
378: IF G_fplanner IS NOT NULL THEN
379: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
380: END IF;
381: IF G_tplanner IS NOT NULL THEN
382: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
383: END IF;
378: IF G_fplanner IS NOT NULL THEN
379: dbms_sql.bind_variable(cur_item, ':f_planner', G_fplanner);
380: END IF;
381: IF G_tplanner IS NOT NULL THEN
382: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
383: END IF;
384:
385: IF G_fbuyer IS NOT NULL THEN
386: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
382: dbms_sql.bind_variable(cur_item, ':t_planner', G_tplanner);
383: END IF;
384:
385: IF G_fbuyer IS NOT NULL THEN
386: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
387: END IF;
388: IF G_tbuyer IS NOT NULL THEN
389: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
390: END IF;
385: IF G_fbuyer IS NOT NULL THEN
386: dbms_sql.bind_variable(cur_item, ':f_buyer', G_fbuyer);
387: END IF;
388: IF G_tbuyer IS NOT NULL THEN
389: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
390: END IF;
391:
392: IF G_forg IS NOT NULL THEN
393: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
389: dbms_sql.bind_variable(cur_item, ':t_buyer', G_tbuyer);
390: END IF;
391:
392: IF G_forg IS NOT NULL THEN
393: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
394: END IF;
395: IF G_torg IS NOT NULL THEN
396: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
397: END IF;
392: IF G_forg IS NOT NULL THEN
393: dbms_sql.bind_variable(cur_item, ':f_org', G_forg);
394: END IF;
395: IF G_torg IS NOT NULL THEN
396: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
397: END IF;
398:
399: IF G_fitem IS NOT NULL THEN
400: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
396: dbms_sql.bind_variable(cur_item, ':t_org', G_torg);
397: END IF;
398:
399: IF G_fitem IS NOT NULL THEN
400: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
401: END IF;
402: IF G_titem IS NOT NULL THEN
403: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
404: END IF;
399: IF G_fitem IS NOT NULL THEN
400: dbms_sql.bind_variable(cur_item, ':f_item', G_fitem);
401: END IF;
402: IF G_titem IS NOT NULL THEN
403: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
404: END IF;
405:
406: dbms_sql.define_column (cur_item, 1, X_item_id);
407: dbms_sql.define_column (cur_item, 2, X_org_id);
402: IF G_titem IS NOT NULL THEN
403: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
404: END IF;
405:
406: dbms_sql.define_column (cur_item, 1, X_item_id);
407: dbms_sql.define_column (cur_item, 2, X_org_id);
408: dbms_sql.define_column (cur_item, 3, X_category_id);
409:
410: X_row_count := dbms_sql.execute_and_fetch (cur_item);
403: dbms_sql.bind_variable(cur_item, ':t_item', G_titem);
404: END IF;
405:
406: dbms_sql.define_column (cur_item, 1, X_item_id);
407: dbms_sql.define_column (cur_item, 2, X_org_id);
408: dbms_sql.define_column (cur_item, 3, X_category_id);
409:
410: X_row_count := dbms_sql.execute_and_fetch (cur_item);
411: IF X_row_count > 0 THEN
404: END IF;
405:
406: dbms_sql.define_column (cur_item, 1, X_item_id);
407: dbms_sql.define_column (cur_item, 2, X_org_id);
408: dbms_sql.define_column (cur_item, 3, X_category_id);
409:
410: X_row_count := dbms_sql.execute_and_fetch (cur_item);
411: IF X_row_count > 0 THEN
412: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
406: dbms_sql.define_column (cur_item, 1, X_item_id);
407: dbms_sql.define_column (cur_item, 2, X_org_id);
408: dbms_sql.define_column (cur_item, 3, X_category_id);
409:
410: X_row_count := dbms_sql.execute_and_fetch (cur_item);
411: IF X_row_count > 0 THEN
412: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
413: G_matl_rep_id := X_rep_id;
414: X_i := 0;
412: SELECT gmp_matl_rep_id_s.NEXTVAL INTO X_rep_id FROM dual;
413: G_matl_rep_id := X_rep_id;
414: X_i := 0;
415: LOOP
416: dbms_sql.column_value (cur_item, 1, X_item_id);
417: dbms_sql.column_value (cur_item, 2, X_org_id);
418: dbms_sql.column_value (cur_item, 3, X_category_id);
419: X_i := X_i + 1;
420: G_item_tab(X_i).inventory_item_id := X_item_id;
413: G_matl_rep_id := X_rep_id;
414: X_i := 0;
415: LOOP
416: dbms_sql.column_value (cur_item, 1, X_item_id);
417: dbms_sql.column_value (cur_item, 2, X_org_id);
418: dbms_sql.column_value (cur_item, 3, X_category_id);
419: X_i := X_i + 1;
420: G_item_tab(X_i).inventory_item_id := X_item_id;
421: G_item_tab(X_i).organization_id := X_org_id;
414: X_i := 0;
415: LOOP
416: dbms_sql.column_value (cur_item, 1, X_item_id);
417: dbms_sql.column_value (cur_item, 2, X_org_id);
418: dbms_sql.column_value (cur_item, 3, X_category_id);
419: X_i := X_i + 1;
420: G_item_tab(X_i).inventory_item_id := X_item_id;
421: G_item_tab(X_i).organization_id := X_org_id;
422: G_item_tab(X_i).category_id := X_category_id;
422: G_item_tab(X_i).category_id := X_category_id;
423: -- Inserts the data into Header table.
424: INSERT INTO ps_matl_hdr (matl_rep_id,inventory_item_id,organization_id,category_id)
425: VALUES(X_rep_id,X_item_id,X_org_id,X_category_id);
426: IF dbms_sql.fetch_rows (cur_item) <= 0 THEN
427: EXIT;
428: END IF;
429: END LOOP;
430: END IF;
427: EXIT;
428: END IF;
429: END LOOP;
430: END IF;
431: dbms_sql.close_cursor (cur_item);
432:
433: EXCEPTION
434: WHEN OTHERS THEN
435: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
434: WHEN OTHERS THEN
435: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm);
436: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error writing to Header'||sqlerrm);
437: /* b3668927 nsinghi : Closing cursors in exception block. */
438: IF dbms_sql.is_open (cur_item) THEN
439: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION cur_item is Open');
440: dbms_sql.close_cursor (cur_item);
441: END IF;
442: END insert_header_data;
436: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error writing to Header'||sqlerrm);
437: /* b3668927 nsinghi : Closing cursors in exception block. */
438: IF dbms_sql.is_open (cur_item) THEN
439: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION cur_item is Open');
440: dbms_sql.close_cursor (cur_item);
441: END IF;
442: END insert_header_data;
443:
444: /*************** END OF PROCEDURE **********************************/
1065: ' AND po.expected_delivery_date <= nvl(:end_date, po.expected_delivery_date + 1) '||
1066: ' AND nvl(hou.date_to,SYSDATE) >= SYSDATE '||
1067: ' ORDER BY 1 ASC, 4 DESC';
1068:
1069: X_doc := dbms_sql.open_cursor;
1070:
1071: dbms_sql.parse(X_doc,X_select,dbms_sql.NATIVE);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1067: ' ORDER BY 1 ASC, 4 DESC';
1068:
1069: X_doc := dbms_sql.open_cursor;
1070:
1071: dbms_sql.parse(X_doc,X_select,dbms_sql.NATIVE);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1069: X_doc := dbms_sql.open_cursor;
1070:
1071: dbms_sql.parse(X_doc,X_select,dbms_sql.NATIVE);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1070:
1071: dbms_sql.parse(X_doc,X_select,dbms_sql.NATIVE);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1071: dbms_sql.parse(X_doc,X_select,dbms_sql.NATIVE);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1072:
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1073: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1074: dbms_sql.bind_variable(X_doc,':schedule_id',G_schedule_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1075: dbms_sql.bind_variable(X_doc,':organization_id',V_organization_id);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1076: dbms_sql.bind_variable(X_doc,':start_date',G_ftrans_date);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1077: dbms_sql.bind_variable(X_doc,':end_date',G_ttrans_date);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1078:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1086:
1079: dbms_sql.define_column(X_doc, 1, X_trans_date);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1086:
1087: X_row_count := dbms_sql.EXECUTE(X_doc);
1080: dbms_sql.define_column(X_doc, 2, X_doc_type, 4);
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1086:
1087: X_row_count := dbms_sql.EXECUTE(X_doc);
1088:
1081: dbms_sql.define_column(X_doc, 3, X_doc_id);
1082: dbms_sql.define_column(X_doc, 4, X_trans_qty);
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1086:
1087: X_row_count := dbms_sql.EXECUTE(X_doc);
1088:
1089: LOOP
1083: dbms_sql.define_column(X_doc, 5, X_trans_qty2);
1084: dbms_sql.define_column(X_doc, 6, X_line_id);
1085: dbms_sql.define_column(X_doc, 7, X_org_code,3);
1086:
1087: X_row_count := dbms_sql.EXECUTE(X_doc);
1088:
1089: LOOP
1090:
1091: X_row_count := dbms_sql.fetch_rows (X_doc);
1087: X_row_count := dbms_sql.EXECUTE(X_doc);
1088:
1089: LOOP
1090:
1091: X_row_count := dbms_sql.fetch_rows (X_doc);
1092: IF X_row_count = 0 THEN
1093: EXIT;
1094: END IF;
1095:
1093: EXIT;
1094: END IF;
1095:
1096: X_i := X_i + 1;
1097: dbms_sql.column_value(X_doc, 1, X_trans_date);
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1094: END IF;
1095:
1096: X_i := X_i + 1;
1097: dbms_sql.column_value(X_doc, 1, X_trans_date);
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1095:
1096: X_i := X_i + 1;
1097: dbms_sql.column_value(X_doc, 1, X_trans_date);
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1103: dbms_sql.column_value(X_doc, 7, X_org_code);
1096: X_i := X_i + 1;
1097: dbms_sql.column_value(X_doc, 1, X_trans_date);
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1103: dbms_sql.column_value(X_doc, 7, X_org_code);
1104:
1097: dbms_sql.column_value(X_doc, 1, X_trans_date);
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1103: dbms_sql.column_value(X_doc, 7, X_org_code);
1104:
1105: G_doc_tab(X_i).trans_date := X_trans_date;
1098: dbms_sql.column_value(X_doc, 2, X_doc_type);
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1103: dbms_sql.column_value(X_doc, 7, X_org_code);
1104:
1105: G_doc_tab(X_i).trans_date := X_trans_date;
1106: G_doc_tab(X_i).doc_type := X_doc_type;
1099: dbms_sql.column_value(X_doc, 3, X_doc_id);
1100: dbms_sql.column_value(X_doc, 4, X_trans_qty);
1101: dbms_sql.column_value(X_doc, 5, X_trans_qty2);
1102: dbms_sql.column_value(X_doc, 6, X_line_id);
1103: dbms_sql.column_value(X_doc, 7, X_org_code);
1104:
1105: G_doc_tab(X_i).trans_date := X_trans_date;
1106: G_doc_tab(X_i).doc_type := X_doc_type;
1107: G_doc_tab(X_i).doc_id := X_doc_id;
1283:
1284: G_c_ind := '';
1285: END LOOP;
1286: G_doc_tab.delete;
1287: dbms_sql.close_cursor(X_doc);
1288:
1289: IF X_i = 0 THEN
1290:
1291: DELETE FROM ps_matl_hdr
1300: -- X_WHSE_LIST:=SQLERRM;
1301: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error writing to ps_ubkt_dtl'||sqlerrm);
1302:
1303: /* b3668927 nsinghi : Closing cursors in exception block. */
1304: IF dbms_sql.is_open(X_doc) THEN
1305: FND_FILE.PUT_LINE(FND_FILE.LOG,'cur_select Is Open');
1306: dbms_sql.close_cursor(X_doc);
1307: END IF;
1308: IF dbms_sql.is_open(X_doc1) THEN
1302:
1303: /* b3668927 nsinghi : Closing cursors in exception block. */
1304: IF dbms_sql.is_open(X_doc) THEN
1305: FND_FILE.PUT_LINE(FND_FILE.LOG,'cur_select Is Open');
1306: dbms_sql.close_cursor(X_doc);
1307: END IF;
1308: IF dbms_sql.is_open(X_doc1) THEN
1309: FND_FILE.PUT_LINE(FND_FILE.LOG,'X_doc1 Is Open');
1310: dbms_sql.close_cursor(X_doc1);
1304: IF dbms_sql.is_open(X_doc) THEN
1305: FND_FILE.PUT_LINE(FND_FILE.LOG,'cur_select Is Open');
1306: dbms_sql.close_cursor(X_doc);
1307: END IF;
1308: IF dbms_sql.is_open(X_doc1) THEN
1309: FND_FILE.PUT_LINE(FND_FILE.LOG,'X_doc1 Is Open');
1310: dbms_sql.close_cursor(X_doc1);
1311: END IF;
1312: IF Cur_fpo_doc_no%ISOPEN THEN
1306: dbms_sql.close_cursor(X_doc);
1307: END IF;
1308: IF dbms_sql.is_open(X_doc1) THEN
1309: FND_FILE.PUT_LINE(FND_FILE.LOG,'X_doc1 Is Open');
1310: dbms_sql.close_cursor(X_doc1);
1311: END IF;
1312: IF Cur_fpo_doc_no%ISOPEN THEN
1313: FND_FILE.PUT_LINE(FND_FILE.LOG,'Cur_fpo_doc_no Is Open');
1314: CLOSE Cur_fpo_doc_no;
1459: ' WHERE s2.organization_id = s1.organization_id'||
1460: ' AND s2.inventory_item_id = to_char(:item_id)'||
1461: ' AND s2.effectivity_date <= SYSDATE)) ';
1462:
1463: X_doc := dbms_sql.open_cursor;
1464: dbms_sql.parse(X_doc, X_select1,dbms_sql.NATIVE);
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1460: ' AND s2.inventory_item_id = to_char(:item_id)'||
1461: ' AND s2.effectivity_date <= SYSDATE)) ';
1462:
1463: X_doc := dbms_sql.open_cursor;
1464: dbms_sql.parse(X_doc, X_select1,dbms_sql.NATIVE);
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1461: ' AND s2.effectivity_date <= SYSDATE)) ';
1462:
1463: X_doc := dbms_sql.open_cursor;
1464: dbms_sql.parse(X_doc, X_select1,dbms_sql.NATIVE);
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1469: -- dbms_sql.define_column(X_doc, 2, X_no_safety_stock);
1462:
1463: X_doc := dbms_sql.open_cursor;
1464: dbms_sql.parse(X_doc, X_select1,dbms_sql.NATIVE);
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1469: -- dbms_sql.define_column(X_doc, 2, X_no_safety_stock);
1470:
1464: dbms_sql.parse(X_doc, X_select1,dbms_sql.NATIVE);
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1469: -- dbms_sql.define_column(X_doc, 2, X_no_safety_stock);
1470:
1471: X_row_count := dbms_sql.execute(X_doc);
1472:
1465: dbms_sql.bind_variable(X_doc,':item_id',V_item_id);
1466: dbms_sql.bind_variable(X_doc,':org_id',V_organization_id);
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1469: -- dbms_sql.define_column(X_doc, 2, X_no_safety_stock);
1470:
1471: X_row_count := dbms_sql.execute(X_doc);
1472:
1473:
1467:
1468: dbms_sql.define_column(X_doc, 1, X_tot_ss);
1469: -- dbms_sql.define_column(X_doc, 2, X_no_safety_stock);
1470:
1471: X_row_count := dbms_sql.execute(X_doc);
1472:
1473:
1474: IF dbms_sql.fetch_rows (X_DOC)>0 THEN
1475: dbms_sql.column_value(X_doc, 1, X_tot_ss);
1470:
1471: X_row_count := dbms_sql.execute(X_doc);
1472:
1473:
1474: IF dbms_sql.fetch_rows (X_DOC)>0 THEN
1475: dbms_sql.column_value(X_doc, 1, X_tot_ss);
1476: -- dbms_sql.column_value(X_doc, 2, X_no_safety_stock);
1477: G_total_ss := X_tot_ss;
1478: -- G_no_safety_stock:= X_no_safety_stock;
1471: X_row_count := dbms_sql.execute(X_doc);
1472:
1473:
1474: IF dbms_sql.fetch_rows (X_DOC)>0 THEN
1475: dbms_sql.column_value(X_doc, 1, X_tot_ss);
1476: -- dbms_sql.column_value(X_doc, 2, X_no_safety_stock);
1477: G_total_ss := X_tot_ss;
1478: -- G_no_safety_stock:= X_no_safety_stock;
1479: ELSE
1472:
1473:
1474: IF dbms_sql.fetch_rows (X_DOC)>0 THEN
1475: dbms_sql.column_value(X_doc, 1, X_tot_ss);
1476: -- dbms_sql.column_value(X_doc, 2, X_no_safety_stock);
1477: G_total_ss := X_tot_ss;
1478: -- G_no_safety_stock:= X_no_safety_stock;
1479: ELSE
1480: G_total_ss := 0;
1479: ELSE
1480: G_total_ss := 0;
1481: -- G_no_safety_stock:= 0;
1482: END IF;
1483: dbms_sql.close_cursor (x_doc);
1484:
1485: EXCEPTION
1486: WHEN OTHERS THEN
1487: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm||'pscommon_safety_stock');
1484:
1485: EXCEPTION
1486: WHEN OTHERS THEN
1487: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm||'pscommon_safety_stock');
1488: IF dbms_sql.is_open(X_doc) THEN
1489: FND_FILE.PUT_LINE(FND_FILE.LOG,'cur_select Is Open');
1490: dbms_sql.close_cursor(X_doc);
1491: END IF;
1492:
1486: WHEN OTHERS THEN
1487: FND_FILE.PUT_LINE ( FND_FILE.LOG, sqlerrm||'pscommon_safety_stock');
1488: IF dbms_sql.is_open(X_doc) THEN
1489: FND_FILE.PUT_LINE(FND_FILE.LOG,'cur_select Is Open');
1490: dbms_sql.close_cursor(X_doc);
1491: END IF;
1492:
1493: END pscommon_safety_stock;
1494: