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(
1264: -- dbms_output.put_line('Looping through each planned order flow schedule
1265: -- and creating new flow schedules with order modifier quantities.');
1266:
1267: LOOP
1268: if dbms_sql.fetch_rows(cursor_name) > 0 then
1269: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1270: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1271: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1272: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1265: -- and creating new flow schedules with order modifier quantities.');
1266:
1267: LOOP
1268: if dbms_sql.fetch_rows(cursor_name) > 0 then
1269: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1270: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1271: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1272: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1273: end if;
1266:
1267: LOOP
1268: if dbms_sql.fetch_rows(cursor_name) > 0 then
1269: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1270: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1271: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1272: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1273: end if;
1274:
1267: LOOP
1268: if dbms_sql.fetch_rows(cursor_name) > 0 then
1269: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1270: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1271: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1272: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1273: end if;
1274:
1275: IF v_last_wip = fs_select_rec.wip_entity THEN
1268: if dbms_sql.fetch_rows(cursor_name) > 0 then
1269: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1270: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1271: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1272: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1273: end if;
1274:
1275: IF v_last_wip = fs_select_rec.wip_entity THEN
1276: EXIT;
1689: AND line_id = p_line_id
1690: AND organization_id = p_org_id;
1691:
1692:
1693: IF (dbms_sql.is_open(cursor_name)) THEN
1694: dbms_sql.close_cursor(cursor_name);
1695: END IF;
1696: EXCEPTION
1697: WHEN NO_DATA_FOUND THEN
1690: AND organization_id = p_org_id;
1691:
1692:
1693: IF (dbms_sql.is_open(cursor_name)) THEN
1694: dbms_sql.close_cursor(cursor_name);
1695: END IF;
1696: EXCEPTION
1697: WHEN NO_DATA_FOUND THEN
1698: -- dbms_output.put_line('i did not find data');
1695: END IF;
1696: EXCEPTION
1697: WHEN NO_DATA_FOUND THEN
1698: -- dbms_output.put_line('i did not find data');
1699: IF (dbms_sql.is_open(cursor_name)) THEN
1700: dbms_sql.close_cursor(cursor_name);
1701: END IF;
1702: RETURN;
1703: WHEN OTHERS THEN
1696: EXCEPTION
1697: WHEN NO_DATA_FOUND THEN
1698: -- dbms_output.put_line('i did not find data');
1699: IF (dbms_sql.is_open(cursor_name)) THEN
1700: dbms_sql.close_cursor(cursor_name);
1701: END IF;
1702: RETURN;
1703: WHEN OTHERS THEN
1704:
1706: FND_MSG_PUB.Add_Exc_Msg(
1707: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1708: END IF;
1709:
1710: IF (dbms_sql.is_open(cursor_name)) THEN
1711: dbms_sql.close_cursor(cursor_name);
1712: END IF;
1713: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
1714: -- substr(sqlerrm,1,60));
1707: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1708: END IF;
1709:
1710: IF (dbms_sql.is_open(cursor_name)) THEN
1711: dbms_sql.close_cursor(cursor_name);
1712: END IF;
1713: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
1714: -- substr(sqlerrm,1,60));
1715: RETURN;
1751:
1752: V_ERROR_LINE := 3;
1753:
1754: LOOP
1755: if dbms_sql.fetch_rows(cursor_name) > 0 then
1756: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1757: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1758: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1759: end if;
1752: V_ERROR_LINE := 3;
1753:
1754: LOOP
1755: if dbms_sql.fetch_rows(cursor_name) > 0 then
1756: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1757: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1758: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1759: end if;
1760:
1753:
1754: LOOP
1755: if dbms_sql.fetch_rows(cursor_name) > 0 then
1756: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1757: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1758: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1759: end if;
1760:
1761: IF v_last_wip = fs_select_rec.wip_entity THEN
1754: LOOP
1755: if dbms_sql.fetch_rows(cursor_name) > 0 then
1756: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1757: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1758: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1759: end if;
1760:
1761: IF v_last_wip = fs_select_rec.wip_entity THEN
1762: EXIT;
1795:
1796:
1797:
1798: LOOP
1799: if dbms_sql.fetch_rows(cursor_name) > 0 then
1800: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1801: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1802: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1803: end if;
1796:
1797:
1798: LOOP
1799: if dbms_sql.fetch_rows(cursor_name) > 0 then
1800: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1801: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1802: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1803: end if;
1804:
1797:
1798: LOOP
1799: if dbms_sql.fetch_rows(cursor_name) > 0 then
1800: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1801: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1802: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1803: end if;
1804:
1805: IF v_last_wip = fs_select_rec.wip_entity THEN
1798: LOOP
1799: if dbms_sql.fetch_rows(cursor_name) > 0 then
1800: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1801: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1802: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1803: end if;
1804:
1805: IF v_last_wip = fs_select_rec.wip_entity THEN
1806: EXIT;
1845: END LOOP;
1846:
1847: EXCEPTION
1848: WHEN NO_DATA_FOUND THEN
1849: -- IF (dbms_sql.is_open(cursor_name)) THEN
1850: -- dbms_sql.close_cursor(cursor_name);
1851: -- END IF;
1852:
1853: RETURN;
1846:
1847: EXCEPTION
1848: WHEN NO_DATA_FOUND THEN
1849: -- IF (dbms_sql.is_open(cursor_name)) THEN
1850: -- dbms_sql.close_cursor(cursor_name);
1851: -- END IF;
1852:
1853: RETURN;
1854:
1858: FND_MSG_PUB.Add_Exc_Msg(
1859: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1860: END IF;
1861:
1862: IF (dbms_sql.is_open(cursor_name)) THEN
1863: dbms_sql.close_cursor(cursor_name);
1864: end IF;
1865:
1866: return;
1859: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
1860: END IF;
1861:
1862: IF (dbms_sql.is_open(cursor_name)) THEN
1863: dbms_sql.close_cursor(cursor_name);
1864: end IF;
1865:
1866: return;
1867:
1984:
1985: V_ERROR_LINE := 5;
1986:
1987: LOOP
1988: if dbms_sql.fetch_rows(cursor_name) > 0 then
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1985: V_ERROR_LINE := 5;
1986:
1987: LOOP
1988: if dbms_sql.fetch_rows(cursor_name) > 0 then
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1986:
1987: LOOP
1988: if dbms_sql.fetch_rows(cursor_name) > 0 then
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1987: LOOP
1988: if dbms_sql.fetch_rows(cursor_name) > 0 then
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1988: if dbms_sql.fetch_rows(cursor_name) > 0 then
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1989: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1997: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1990: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1997: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1998:
1991: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1997: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1998:
1999: end if;
1992: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1997: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1998:
1999: end if;
2000:
1993: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
1994: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
1995: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
1996: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
1997: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
1998:
1999: end if;
2000:
2001:
2409: END IF;
2410: END LOOP;
2411: END LOOP;
2412:
2413: IF (dbms_sql.is_open(cursor_name)) THEN
2414: dbms_sql.close_cursor(cursor_name);
2415: END IF;
2416:
2417: EXCEPTION
2410: END LOOP;
2411: END LOOP;
2412:
2413: IF (dbms_sql.is_open(cursor_name)) THEN
2414: dbms_sql.close_cursor(cursor_name);
2415: END IF;
2416:
2417: EXCEPTION
2418: WHEN NO_DATA_FOUND THEN
2415: END IF;
2416:
2417: EXCEPTION
2418: WHEN NO_DATA_FOUND THEN
2419: IF (dbms_sql.is_open(cursor_name)) THEN
2420: dbms_sql.close_cursor(cursor_name);
2421: END IF;
2422: RETURN;
2423:
2416:
2417: EXCEPTION
2418: WHEN NO_DATA_FOUND THEN
2419: IF (dbms_sql.is_open(cursor_name)) THEN
2420: dbms_sql.close_cursor(cursor_name);
2421: END IF;
2422: RETURN;
2423:
2424: WHEN OTHERS THEN
2427: FND_MSG_PUB.Add_Exc_Msg(
2428: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
2429: END IF;
2430:
2431: IF (dbms_sql.is_open(cursor_name)) THEN
2432: dbms_sql.close_cursor(cursor_name);
2433: end IF;
2434: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
2435: -- substr(sqlerrm,1,60));
2428: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
2429: END IF;
2430:
2431: IF (dbms_sql.is_open(cursor_name)) THEN
2432: dbms_sql.close_cursor(cursor_name);
2433: end IF;
2434: -- dbms_output.put_line('!!!ERROR!!!:' || to_char(sqlcode) ||
2435: -- substr(sqlerrm,1,60));
2436: return;
2820:
2821: V_ERROR_LINE := 5;
2822:
2823: LOOP
2824: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2821: V_ERROR_LINE := 5;
2822:
2823: LOOP
2824: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2822:
2823: LOOP
2824: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2823: LOOP
2824: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2824: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2825: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2833: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2826: dbms_sql.column_value(cursor_name,2, fs_select_rec.creation_date);
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2833: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2834: END IF;
2827: dbms_sql.column_value(cursor_name,3, fs_select_rec.schedule_date);
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2833: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2834: END IF;
2835:
2828: dbms_sql.column_value(cursor_name,4, fs_select_rec.promise_date);
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2833: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2834: END IF;
2835:
2836:
2829: dbms_sql.column_value(cursor_name,5, fs_select_rec.request_date);
2830: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
2831: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
2832: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
2833: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
2834: END IF;
2835:
2836:
2837: SELECT NVL(fixed_lead_time, 0), NVL(variable_lead_time, 0)
3225: END LOOP;
3226:
3227: END LOOP;
3228:
3229: IF (dbms_sql.is_open(cursor_name)) THEN
3230: dbms_sql.close_cursor(cursor_name);
3231: END IF;
3232:
3233: EXCEPTION
3226:
3227: END LOOP;
3228:
3229: IF (dbms_sql.is_open(cursor_name)) THEN
3230: dbms_sql.close_cursor(cursor_name);
3231: END IF;
3232:
3233: EXCEPTION
3234: WHEN NO_DATA_FOUND THEN
3231: END IF;
3232:
3233: EXCEPTION
3234: WHEN NO_DATA_FOUND THEN
3235: IF (dbms_sql.is_open(cursor_name)) THEN
3236: dbms_sql.close_cursor(cursor_name);
3237: END IF;
3238: RETURN;
3239:
3232:
3233: EXCEPTION
3234: WHEN NO_DATA_FOUND THEN
3235: IF (dbms_sql.is_open(cursor_name)) THEN
3236: dbms_sql.close_cursor(cursor_name);
3237: END IF;
3238: RETURN;
3239:
3240: WHEN OTHERS THEN
3243: FND_MSG_PUB.Add_Exc_Msg(
3244: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
3245: END IF;
3246:
3247: IF (dbms_sql.is_open(cursor_name)) THEN
3248: dbms_sql.close_cursor(cursor_name);
3249: END IF;
3250:
3251: return;
3244: V_PKG_NAME,V_PROCEDURE_NAME||': Line '||to_char(V_ERROR_LINE));
3245: END IF;
3246:
3247: IF (dbms_sql.is_open(cursor_name)) THEN
3248: dbms_sql.close_cursor(cursor_name);
3249: END IF;
3250:
3251: return;
3252:
3493: -- In this loop, populate build sequences of all flow schedules to
3494: -- be scheduled.
3495:
3496: LOOP
3497: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3494: -- be scheduled.
3495:
3496: LOOP
3497: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3502: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3495:
3496: LOOP
3497: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3502: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3503: END IF;
3496: LOOP
3497: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3502: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3503: END IF;
3504:
3497: IF dbms_sql.fetch_rows(cursor_name) > 0 THEN
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3502: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3503: END IF;
3504:
3505:
3498: dbms_sql.column_value(cursor_name,1, fs_select_rec.wip_entity);
3499: dbms_sql.column_value(cursor_name,6, fs_select_rec.planning_priority);
3500: dbms_sql.column_value(cursor_name,7, fs_select_rec.primary_item_id);
3501: dbms_sql.column_value(cursor_name,8, fs_select_rec.planned_quantity);
3502: dbms_sql.column_value(cursor_name,9, fs_select_rec.schedule_group_id);
3503: END IF;
3504:
3505:
3506:
3542: FOR item_list_rec IN item_list(p_org_id) LOOP
3543: p_demand_tab(item_list_rec.primary_item_id).sequence := 1;
3544: END LOOP;
3545:
3546: IF (dbms_sql.is_open(cursor_name)) THEN
3547: dbms_sql.close_cursor(cursor_name);
3548: END IF;
3549:
3550: -- Set current date to be the first valid date in the scheduling window.
3543: p_demand_tab(item_list_rec.primary_item_id).sequence := 1;
3544: END LOOP;
3545:
3546: IF (dbms_sql.is_open(cursor_name)) THEN
3547: dbms_sql.close_cursor(cursor_name);
3548: END IF;
3549:
3550: -- Set current date to be the first valid date in the scheduling window.
3551: -- This is the first index in the capacity table.
4162: END LOOP;
4163:
4164: EXCEPTION
4165: WHEN NO_DATA_FOUND THEN
4166: IF (dbms_sql.is_open(cursor_name)) THEN
4167: dbms_sql.close_cursor(cursor_name);
4168: END IF;
4169:
4170: RETURN;
4163:
4164: EXCEPTION
4165: WHEN NO_DATA_FOUND THEN
4166: IF (dbms_sql.is_open(cursor_name)) THEN
4167: dbms_sql.close_cursor(cursor_name);
4168: END IF;
4169:
4170: RETURN;
4171:
4170: RETURN;
4171:
4172: WHEN OTHERS THEN
4173:
4174: IF (dbms_sql.is_open(cursor_name)) THEN
4175: dbms_sql.close_cursor(cursor_name);
4176: END IF;
4177:
4178: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4171:
4172: WHEN OTHERS THEN
4173:
4174: IF (dbms_sql.is_open(cursor_name)) THEN
4175: dbms_sql.close_cursor(cursor_name);
4176: END IF;
4177:
4178: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4179: FND_MSG_PUB.Add_Exc_Msg(