109: END IF;
110:
111: v_select := v_select || ' ORDER BY '|| v_seq_criteria;
112:
113: cursor_name := dbms_sql.open_cursor;
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
110:
111: v_select := v_select || ' ORDER BY '|| v_seq_criteria;
112:
113: cursor_name := dbms_sql.open_cursor;
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
111: v_select := v_select || ' ORDER BY '|| v_seq_criteria;
112:
113: cursor_name := dbms_sql.open_cursor;
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
112:
113: cursor_name := dbms_sql.open_cursor;
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
113: cursor_name := dbms_sql.open_cursor;
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
114: dbms_sql.parse(cursor_name, v_select, dbms_sql.v7);
115: dbms_sql.bind_variable(cursor_name, ':v_session_id', USERENV('SESSIONID'));
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
116: dbms_sql.bind_variable(cursor_name, ':p_org_id', p_org_id);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
117: dbms_sql.bind_variable(cursor_name, ':p_line_id', p_line_id);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
118: dbms_sql.bind_variable(cursor_name, ':p_item_id', p_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
119:
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
120: dbms_sql.define_column(cursor_name,1, fs_select_rec.wip_entity);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
121: dbms_sql.define_column(cursor_name,2, fs_select_rec.creation_date);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
129: dummy := dbms_sql.execute(cursor_name);
122: dbms_sql.define_column(cursor_name,3, fs_select_rec.schedule_date);
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
129: dummy := dbms_sql.execute(cursor_name);
130:
123: dbms_sql.define_column(cursor_name,4, fs_select_rec.promise_date);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
129: dummy := dbms_sql.execute(cursor_name);
130:
131: return(cursor_name);
124: dbms_sql.define_column(cursor_name,5, fs_select_rec.request_date);
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
129: dummy := dbms_sql.execute(cursor_name);
130:
131: return(cursor_name);
132:
125: dbms_sql.define_column(cursor_name,6, fs_select_rec.planning_priority);
126: dbms_sql.define_column(cursor_name,7, fs_select_rec.primary_item_id);
127: dbms_sql.define_column(cursor_name,8, fs_select_rec.planned_quantity);
128: dbms_sql.define_column(cursor_name,9, fs_select_rec.schedule_group_id);
129: dummy := dbms_sql.execute(cursor_name);
130:
131: return(cursor_name);
132:
133: EXCEPTION
131: return(cursor_name);
132:
133: EXCEPTION
134: WHEN OTHERS THEN
135: IF (dbms_sql.is_open(cursor_name)) THEN
136: dbms_sql.close_cursor(cursor_name);
137: END IF;
138:
139: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
132:
133: EXCEPTION
134: WHEN OTHERS THEN
135: IF (dbms_sql.is_open(cursor_name)) THEN
136: dbms_sql.close_cursor(cursor_name);
137: END IF;
138:
139: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
140: FND_MSG_PUB.Add_Exc_Msg(
1263: -- dbms_output.put_line('Looping through each planned order flow schedule
1264: -- and creating new flow schedules with order modifier quantities.');
1265:
1266: LOOP
1267: if dbms_sql.fetch_rows(cursor_name) > 0 then
1268: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1269: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1270: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1271: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1264: -- and creating new flow schedules with order modifier quantities.');
1265:
1266: LOOP
1267: if dbms_sql.fetch_rows(cursor_name) > 0 then
1268: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1269: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1270: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1271: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1272: end if;
1265:
1266: LOOP
1267: if dbms_sql.fetch_rows(cursor_name) > 0 then
1268: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1269: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1270: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1271: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1272: end if;
1273:
1266: LOOP
1267: if dbms_sql.fetch_rows(cursor_name) > 0 then
1268: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1269: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1270: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1271: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1272: end if;
1273:
1274: IF v_last_wip = fs_select_rec.wip_entity THEN
1267: if dbms_sql.fetch_rows(cursor_name) > 0 then
1268: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1269: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1270: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1271: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1272: end if;
1273:
1274: IF v_last_wip = fs_select_rec.wip_entity THEN
1275: EXIT;
1688: AND line_id = p_line_id
1689: AND organization_id = p_org_id;
1690:
1691:
1692: IF (dbms_sql.is_open(cursor_name)) THEN
1693: dbms_sql.close_cursor(cursor_name);
1694: END IF;
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1689: AND organization_id = p_org_id;
1690:
1691:
1692: IF (dbms_sql.is_open(cursor_name)) THEN
1693: dbms_sql.close_cursor(cursor_name);
1694: END IF;
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1697: -- dbms_output.put_line('i did not find data');
1694: END IF;
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1697: -- dbms_output.put_line('i did not find data');
1698: IF (dbms_sql.is_open(cursor_name)) THEN
1699: dbms_sql.close_cursor(cursor_name);
1700: END IF;
1701: RETURN;
1702: WHEN OTHERS THEN
1695: EXCEPTION
1696: WHEN NO_DATA_FOUND THEN
1697: -- dbms_output.put_line('i did not find data');
1698: IF (dbms_sql.is_open(cursor_name)) THEN
1699: dbms_sql.close_cursor(cursor_name);
1700: END IF;
1701: RETURN;
1702: WHEN OTHERS THEN
1703:
1705: FND_MSG_PUB.Add_Exc_Msg(
1706: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1707: END IF;
1708:
1709: IF (dbms_sql.is_open(cursor_name)) THEN
1710: dbms_sql.close_cursor(cursor_name);
1711: END IF;
1712: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
1713: -- substr(sqlerrm,1,60));
1706: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1707: END IF;
1708:
1709: IF (dbms_sql.is_open(cursor_name)) THEN
1710: dbms_sql.close_cursor(cursor_name);
1711: END IF;
1712: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
1713: -- substr(sqlerrm,1,60));
1714: RETURN;
1750:
1751: V_ERROR_LINE := 3;
1752:
1753: LOOP
1754: if dbms_sql.fetch_rows(cursor_name) > 0 then
1755: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1756: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1757: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1758: end if;
1751: V_ERROR_LINE := 3;
1752:
1753: LOOP
1754: if dbms_sql.fetch_rows(cursor_name) > 0 then
1755: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1756: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1757: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1758: end if;
1759:
1752:
1753: LOOP
1754: if dbms_sql.fetch_rows(cursor_name) > 0 then
1755: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1756: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1757: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1758: end if;
1759:
1760: IF v_last_wip = fs_select_rec.wip_entity THEN
1753: LOOP
1754: if dbms_sql.fetch_rows(cursor_name) > 0 then
1755: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1756: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1757: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1758: end if;
1759:
1760: IF v_last_wip = fs_select_rec.wip_entity THEN
1761: EXIT;
1794:
1795:
1796:
1797: LOOP
1798: if dbms_sql.fetch_rows(cursor_name) > 0 then
1799: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1800: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1801: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1802: end if;
1795:
1796:
1797: LOOP
1798: if dbms_sql.fetch_rows(cursor_name) > 0 then
1799: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1800: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1801: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1802: end if;
1803:
1796:
1797: LOOP
1798: if dbms_sql.fetch_rows(cursor_name) > 0 then
1799: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1800: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1801: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1802: end if;
1803:
1804: IF v_last_wip = fs_select_rec.wip_entity THEN
1797: LOOP
1798: if dbms_sql.fetch_rows(cursor_name) > 0 then
1799: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1800: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1801: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1802: end if;
1803:
1804: IF v_last_wip = fs_select_rec.wip_entity THEN
1805: EXIT;
1844: END LOOP;
1845:
1846: EXCEPTION
1847: WHEN NO_DATA_FOUND THEN
1848: -- IF (dbms_sql.is_open(cursor_name)) THEN
1849: -- dbms_sql.close_cursor(cursor_name);
1850: -- END IF;
1851:
1852: RETURN;
1845:
1846: EXCEPTION
1847: WHEN NO_DATA_FOUND THEN
1848: -- IF (dbms_sql.is_open(cursor_name)) THEN
1849: -- dbms_sql.close_cursor(cursor_name);
1850: -- END IF;
1851:
1852: RETURN;
1853:
1857: FND_MSG_PUB.Add_Exc_Msg(
1858: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1859: END IF;
1860:
1861: IF (dbms_sql.is_open(cursor_name)) THEN
1862: dbms_sql.close_cursor(cursor_name);
1863: end IF;
1864:
1865: return;
1858: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1859: END IF;
1860:
1861: IF (dbms_sql.is_open(cursor_name)) THEN
1862: dbms_sql.close_cursor(cursor_name);
1863: end IF;
1864:
1865: return;
1866:
1983:
1984: V_ERROR_LINE := 5;
1985:
1986: LOOP
1987: if dbms_sql.fetch_rows(cursor_name) > 0 then
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1984: V_ERROR_LINE := 5;
1985:
1986: LOOP
1987: if dbms_sql.fetch_rows(cursor_name) > 0 then
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1985:
1986: LOOP
1987: if dbms_sql.fetch_rows(cursor_name) > 0 then
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1986: LOOP
1987: if dbms_sql.fetch_rows(cursor_name) > 0 then
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1987: if dbms_sql.fetch_rows(cursor_name) > 0 then
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1988: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1996: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1989: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1996: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1997:
1990: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1996: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1997:
1998: end if;
1991: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1996: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1997:
1998: end if;
1999:
1992: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1993: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1994: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1995: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1996: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1997:
1998: end if;
1999:
2000:
2408: END IF;
2409: END LOOP;
2410: END LOOP;
2411:
2412: IF (dbms_sql.is_open(cursor_name)) THEN
2413: dbms_sql.close_cursor(cursor_name);
2414: END IF;
2415:
2416: EXCEPTION
2409: END LOOP;
2410: END LOOP;
2411:
2412: IF (dbms_sql.is_open(cursor_name)) THEN
2413: dbms_sql.close_cursor(cursor_name);
2414: END IF;
2415:
2416: EXCEPTION
2417: WHEN NO_DATA_FOUND THEN
2414: END IF;
2415:
2416: EXCEPTION
2417: WHEN NO_DATA_FOUND THEN
2418: IF (dbms_sql.is_open(cursor_name)) THEN
2419: dbms_sql.close_cursor(cursor_name);
2420: END IF;
2421: RETURN;
2422:
2415:
2416: EXCEPTION
2417: WHEN NO_DATA_FOUND THEN
2418: IF (dbms_sql.is_open(cursor_name)) THEN
2419: dbms_sql.close_cursor(cursor_name);
2420: END IF;
2421: RETURN;
2422:
2423: WHEN OTHERS THEN
2426: FND_MSG_PUB.Add_Exc_Msg(
2427: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
2428: END IF;
2429:
2430: IF (dbms_sql.is_open(cursor_name)) THEN
2431: dbms_sql.close_cursor(cursor_name);
2432: end IF;
2433: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
2434: -- substr(sqlerrm,1,60));
2427: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
2428: END IF;
2429:
2430: IF (dbms_sql.is_open(cursor_name)) THEN
2431: dbms_sql.close_cursor(cursor_name);
2432: end IF;
2433: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
2434: -- substr(sqlerrm,1,60));
2435: return;
2819:
2820: V_ERROR_LINE := 5;
2821:
2822: LOOP
2823: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2820: V_ERROR_LINE := 5;
2821:
2822: LOOP
2823: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2821:
2822: LOOP
2823: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2822: LOOP
2823: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2823: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2824: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2832: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2825: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2832: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2833: END IF;
2826: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2832: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2833: END IF;
2834:
2827: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2832: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2833: END IF;
2834:
2835:
2828: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2829: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2830: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2831: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2832: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2833: END IF;
2834:
2835:
2836: SELECT NVL(fixed_lead_time, 0), NVL(variable_lead_time, 0)
3224: END LOOP;
3225:
3226: END LOOP;
3227:
3228: IF (dbms_sql.is_open(cursor_name)) THEN
3229: dbms_sql.close_cursor(cursor_name);
3230: END IF;
3231:
3232: EXCEPTION
3225:
3226: END LOOP;
3227:
3228: IF (dbms_sql.is_open(cursor_name)) THEN
3229: dbms_sql.close_cursor(cursor_name);
3230: END IF;
3231:
3232: EXCEPTION
3233: WHEN NO_DATA_FOUND THEN
3230: END IF;
3231:
3232: EXCEPTION
3233: WHEN NO_DATA_FOUND THEN
3234: IF (dbms_sql.is_open(cursor_name)) THEN
3235: dbms_sql.close_cursor(cursor_name);
3236: END IF;
3237: RETURN;
3238:
3231:
3232: EXCEPTION
3233: WHEN NO_DATA_FOUND THEN
3234: IF (dbms_sql.is_open(cursor_name)) THEN
3235: dbms_sql.close_cursor(cursor_name);
3236: END IF;
3237: RETURN;
3238:
3239: WHEN OTHERS THEN
3242: FND_MSG_PUB.Add_Exc_Msg(
3243: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
3244: END IF;
3245:
3246: IF (dbms_sql.is_open(cursor_name)) THEN
3247: dbms_sql.close_cursor(cursor_name);
3248: END IF;
3249:
3250: return;
3243: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
3244: END IF;
3245:
3246: IF (dbms_sql.is_open(cursor_name)) THEN
3247: dbms_sql.close_cursor(cursor_name);
3248: END IF;
3249:
3250: return;
3251:
3492: -- In this loop, populate build sequences of all flow schedules to
3493: -- be scheduled.
3494:
3495: LOOP
3496: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3493: -- be scheduled.
3494:
3495: LOOP
3496: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3501: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3494:
3495: LOOP
3496: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3501: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3502: END IF;
3495: LOOP
3496: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3501: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3502: END IF;
3503:
3496: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3501: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3502: END IF;
3503:
3504:
3497: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3498: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3499: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3500: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3501: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3502: END IF;
3503:
3504:
3505:
3541: FOR item_list_rec IN item_list(p_org_id) LOOP
3542: p_demand_tab(item_list_rec.primary_item_id).sequence := 1;
3543: END LOOP;
3544:
3545: IF (dbms_sql.is_open(cursor_name)) THEN
3546: dbms_sql.close_cursor(cursor_name);
3547: END IF;
3548:
3549: -- Set current date to be the first valid date in the scheduling window.
3542: p_demand_tab(item_list_rec.primary_item_id).sequence := 1;
3543: END LOOP;
3544:
3545: IF (dbms_sql.is_open(cursor_name)) THEN
3546: dbms_sql.close_cursor(cursor_name);
3547: END IF;
3548:
3549: -- Set current date to be the first valid date in the scheduling window.
3550: -- This is the first index in the capacity table.
4161: END LOOP;
4162:
4163: EXCEPTION
4164: WHEN NO_DATA_FOUND THEN
4165: IF (dbms_sql.is_open(cursor_name)) THEN
4166: dbms_sql.close_cursor(cursor_name);
4167: END IF;
4168:
4169: RETURN;
4162:
4163: EXCEPTION
4164: WHEN NO_DATA_FOUND THEN
4165: IF (dbms_sql.is_open(cursor_name)) THEN
4166: dbms_sql.close_cursor(cursor_name);
4167: END IF;
4168:
4169: RETURN;
4170:
4169: RETURN;
4170:
4171: WHEN OTHERS THEN
4172:
4173: IF (dbms_sql.is_open(cursor_name)) THEN
4174: dbms_sql.close_cursor(cursor_name);
4175: END IF;
4176:
4177: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4170:
4171: WHEN OTHERS THEN
4172:
4173: IF (dbms_sql.is_open(cursor_name)) THEN
4174: dbms_sql.close_cursor(cursor_name);
4175: END IF;
4176:
4177: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4178: FND_MSG_PUB.Add_Exc_Msg(