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