58: l_max_seq VARCHAR2(150);
59:
60: BEGIN
61:
62: l_cur := dbms_sql.open_cursor;
63: l_stmt := 'SELECT MAX(TO_NUMBER('||p_seq_location||')) max_seq '||
64: 'FROM per_position_definitions pde WHERE 1=1';
65: --
66: l_seq_loc := SUBSTR(p_seq_location,8);
134: ||' WHERE pde.position_definition_id = pos.position_definition_id)';
135: ---
136: --dbms_output.put_line(substr(l_stmt,1,100));
137: --dbms_output.put_line(substr(l_stmt,101,100));
138: dbms_sql.parse(l_cur, l_stmt, dbms_sql.v7);
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
135: ---
136: --dbms_output.put_line(substr(l_stmt,1,100));
137: --dbms_output.put_line(substr(l_stmt,101,100));
138: dbms_sql.parse(l_cur, l_stmt, dbms_sql.v7);
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
143: dbms_sql.close_cursor(l_cur);
136: --dbms_output.put_line(substr(l_stmt,1,100));
137: --dbms_output.put_line(substr(l_stmt,101,100));
138: dbms_sql.parse(l_cur, l_stmt, dbms_sql.v7);
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
143: dbms_sql.close_cursor(l_cur);
144: --
137: --dbms_output.put_line(substr(l_stmt,101,100));
138: dbms_sql.parse(l_cur, l_stmt, dbms_sql.v7);
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
143: dbms_sql.close_cursor(l_cur);
144: --
145: RETURN(l_max_seq);
138: dbms_sql.parse(l_cur, l_stmt, dbms_sql.v7);
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
143: dbms_sql.close_cursor(l_cur);
144: --
145: RETURN(l_max_seq);
146: --
139: dbms_sql.define_column(l_cur, 1, l_max_seq,150);
140: l_fetch_rows := dbms_sql.execute(l_cur);
141: l_fetch_rows := dbms_sql.fetch_rows(l_cur);
142: dbms_sql.column_value(l_cur, 1, l_max_seq);
143: dbms_sql.close_cursor(l_cur);
144: --
145: RETURN(l_max_seq);
146: --
147: END get_max_seq;