1140: l_order_type_table;
1141:
1142: IF l_order_type_table.COUNT = 0 THEN
1143: p_retcode := -1;
1144: msd_conc_log_util.display_message('No order types found in the source', msd_conc_log_util.C_ERROR);
1145: return -1;
1146: END IF;
1147:
1148: IF p_collect_all_order_types = SYS_NO THEN
1149:
1150: IF p_include_order_types is null AND
1151: p_exclude_order_types is null THEN
1152: p_retcode := -1;
1153: msd_conc_log_util.display_message('Both the parameters include order types and exclude order types are null', msd_conc_log_util.C_ERROR);
1154: return -1;
1155: ELSIF p_include_order_types is not null AND
1156: p_exclude_order_types is not null THEN
1157: p_retcode := -1;
1154: return -1;
1155: ELSIF p_include_order_types is not null AND
1156: p_exclude_order_types is not null THEN
1157: p_retcode := -1;
1158: msd_conc_log_util.display_message('Both the parameters include order types and exclude order types are not null', msd_conc_log_util.C_ERROR);
1159: return -1;
1160: ELSIF p_include_order_types is not null THEN
1161: l_order_type_flag := C_INCLUDE;
1162: l_order_types := UPPER(p_include_order_types);
1229: EXIT WHEN l_position = 0;
1230: l_start := l_position + 1;
1231: END LOOP;
1232:
1233: msd_conc_log_util.display_message('Demand Plan Order Types', msd_conc_log_util.C_SECTION);
1234: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1235:
1236: msd_conc_log_util.display_message('Valid Order Types', msd_conc_log_util.C_HEADING);
1237: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1230: l_start := l_position + 1;
1231: END LOOP;
1232:
1233: msd_conc_log_util.display_message('Demand Plan Order Types', msd_conc_log_util.C_SECTION);
1234: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1235:
1236: msd_conc_log_util.display_message('Valid Order Types', msd_conc_log_util.C_HEADING);
1237: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1238:
1232:
1233: msd_conc_log_util.display_message('Demand Plan Order Types', msd_conc_log_util.C_SECTION);
1234: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1235:
1236: msd_conc_log_util.display_message('Valid Order Types', msd_conc_log_util.C_HEADING);
1237: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1238:
1239: IF l_valid_count <> 0 THEN
1240: FOR i in l_valid_order_type_table.FIRST..l_valid_order_type_table.LAST
1233: msd_conc_log_util.display_message('Demand Plan Order Types', msd_conc_log_util.C_SECTION);
1234: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1235:
1236: msd_conc_log_util.display_message('Valid Order Types', msd_conc_log_util.C_HEADING);
1237: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1238:
1239: IF l_valid_count <> 0 THEN
1240: FOR i in l_valid_order_type_table.FIRST..l_valid_order_type_table.LAST
1241: LOOP
1238:
1239: IF l_valid_count <> 0 THEN
1240: FOR i in l_valid_order_type_table.FIRST..l_valid_order_type_table.LAST
1241: LOOP
1242: msd_conc_log_util.display_message(to_char(i) || ') ' || l_valid_order_type_table(i), msd_conc_log_util.C_INFORMATION);
1243: END LOOP;
1244: ELSE
1245: p_retcode := -1;
1246: msd_conc_log_util.display_message('No valid order types found in user input', msd_conc_log_util.C_ERROR);
1242: msd_conc_log_util.display_message(to_char(i) || ') ' || l_valid_order_type_table(i), msd_conc_log_util.C_INFORMATION);
1243: END LOOP;
1244: ELSE
1245: p_retcode := -1;
1246: msd_conc_log_util.display_message('No valid order types found in user input', msd_conc_log_util.C_ERROR);
1247: END IF;
1248:
1249: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1250: msd_conc_log_util.display_message('Invalid Order Types', msd_conc_log_util.C_HEADING);
1245: p_retcode := -1;
1246: msd_conc_log_util.display_message('No valid order types found in user input', msd_conc_log_util.C_ERROR);
1247: END IF;
1248:
1249: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1250: msd_conc_log_util.display_message('Invalid Order Types', msd_conc_log_util.C_HEADING);
1251: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1252:
1253: IF l_invalid_count <> 0 THEN
1246: msd_conc_log_util.display_message('No valid order types found in user input', msd_conc_log_util.C_ERROR);
1247: END IF;
1248:
1249: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1250: msd_conc_log_util.display_message('Invalid Order Types', msd_conc_log_util.C_HEADING);
1251: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1252:
1253: IF l_invalid_count <> 0 THEN
1254: FOR i in l_invalid_order_type_table.FIRST..l_invalid_order_type_table.LAST
1247: END IF;
1248:
1249: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1250: msd_conc_log_util.display_message('Invalid Order Types', msd_conc_log_util.C_HEADING);
1251: msd_conc_log_util.display_message('------------------------------------------------', msd_conc_log_util.C_HEADING);
1252:
1253: IF l_invalid_count <> 0 THEN
1254: FOR i in l_invalid_order_type_table.FIRST..l_invalid_order_type_table.LAST
1255: LOOP
1252:
1253: IF l_invalid_count <> 0 THEN
1254: FOR i in l_invalid_order_type_table.FIRST..l_invalid_order_type_table.LAST
1255: LOOP
1256: msd_conc_log_util.display_message(to_char(i) || ') ' || l_invalid_order_type_table(i), msd_conc_log_util.C_WARNING);
1257: END LOOP;
1258: END IF;
1259: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1260:
1255: LOOP
1256: msd_conc_log_util.display_message(to_char(i) || ') ' || l_invalid_order_type_table(i), msd_conc_log_util.C_WARNING);
1257: END LOOP;
1258: END IF;
1259: msd_conc_log_util.display_message(' ', msd_conc_log_util.C_HEADING);
1260:
1261: IF l_valid_count = 0 THEN
1262: return -1;
1263: END IF;
1267: IF p_include_order_types is not null OR
1268: p_exclude_order_types is not null THEN
1269:
1270: p_retcode := -1;
1271: msd_conc_log_util.display_message('Parameter(s) include/exclude order types not null when collect all order types is YES', msd_conc_log_util.C_ERROR);
1272: return -1;
1273:
1274: ELSE
1275: