4236: ;
4237: --FOR UPDATE NOWAIT;
4238:
4239:
4240: l_statement DBMS_SQL.VARCHAR2S;
4241: --l_hdr_statement DBMS_SQL.VARCHAR2S;
4242: l_rep_ln_statement DBMS_SQL.VARCHAR2S;
4243: l_rep_hdr_statement DBMS_SQL.VARCHAR2S;
4244: l_cursor_handle NUMBER;
4237: --FOR UPDATE NOWAIT;
4238:
4239:
4240: l_statement DBMS_SQL.VARCHAR2S;
4241: --l_hdr_statement DBMS_SQL.VARCHAR2S;
4242: l_rep_ln_statement DBMS_SQL.VARCHAR2S;
4243: l_rep_hdr_statement DBMS_SQL.VARCHAR2S;
4244: l_cursor_handle NUMBER;
4245: l_view_column_number INTEGER;
4238:
4239:
4240: l_statement DBMS_SQL.VARCHAR2S;
4241: --l_hdr_statement DBMS_SQL.VARCHAR2S;
4242: l_rep_ln_statement DBMS_SQL.VARCHAR2S;
4243: l_rep_hdr_statement DBMS_SQL.VARCHAR2S;
4244: l_cursor_handle NUMBER;
4245: l_view_column_number INTEGER;
4246:
4239:
4240: l_statement DBMS_SQL.VARCHAR2S;
4241: --l_hdr_statement DBMS_SQL.VARCHAR2S;
4242: l_rep_ln_statement DBMS_SQL.VARCHAR2S;
4243: l_rep_hdr_statement DBMS_SQL.VARCHAR2S;
4244: l_cursor_handle NUMBER;
4245: l_view_column_number INTEGER;
4246:
4247: l_current_anacri_code VARCHAR2(30);
4654: END LOOP;
4655: */
4656: END IF;
4657:
4658: l_cursor_handle:= dbms_sql.open_cursor;
4659: --parse the statement
4660: dbms_sql.parse (
4661: c => l_cursor_handle
4662: ,statement => l_statement
4656: END IF;
4657:
4658: l_cursor_handle:= dbms_sql.open_cursor;
4659: --parse the statement
4660: dbms_sql.parse (
4661: c => l_cursor_handle
4662: ,statement => l_statement
4663: ,lb => 1
4664: ,ub => l_statement.LAST
4662: ,statement => l_statement
4663: ,lb => 1
4664: ,ub => l_statement.LAST
4665: ,lfflg => TRUE --line feed
4666: ,language_flag => DBMS_SQL.NATIVE);
4667: dbms_sql.close_cursor(l_cursor_handle);
4668:
4669: l_cursor_handle:= dbms_sql.open_cursor;
4670: --parse the statement
4663: ,lb => 1
4664: ,ub => l_statement.LAST
4665: ,lfflg => TRUE --line feed
4666: ,language_flag => DBMS_SQL.NATIVE);
4667: dbms_sql.close_cursor(l_cursor_handle);
4668:
4669: l_cursor_handle:= dbms_sql.open_cursor;
4670: --parse the statement
4671: dbms_sql.parse (
4665: ,lfflg => TRUE --line feed
4666: ,language_flag => DBMS_SQL.NATIVE);
4667: dbms_sql.close_cursor(l_cursor_handle);
4668:
4669: l_cursor_handle:= dbms_sql.open_cursor;
4670: --parse the statement
4671: dbms_sql.parse (
4672: c => l_cursor_handle
4673: ,statement => l_rep_ln_statement
4667: dbms_sql.close_cursor(l_cursor_handle);
4668:
4669: l_cursor_handle:= dbms_sql.open_cursor;
4670: --parse the statement
4671: dbms_sql.parse (
4672: c => l_cursor_handle
4673: ,statement => l_rep_ln_statement
4674: ,lb => 1
4675: ,ub => l_rep_ln_statement.LAST
4673: ,statement => l_rep_ln_statement
4674: ,lb => 1
4675: ,ub => l_rep_ln_statement.LAST
4676: ,lfflg => TRUE --line feed
4677: ,language_flag => DBMS_SQL.NATIVE);
4678: dbms_sql.close_cursor(l_cursor_handle);
4679:
4680: l_cursor_handle:= dbms_sql.open_cursor;
4681: l_cursor_handle:= dbms_sql.open_cursor;
4674: ,lb => 1
4675: ,ub => l_rep_ln_statement.LAST
4676: ,lfflg => TRUE --line feed
4677: ,language_flag => DBMS_SQL.NATIVE);
4678: dbms_sql.close_cursor(l_cursor_handle);
4679:
4680: l_cursor_handle:= dbms_sql.open_cursor;
4681: l_cursor_handle:= dbms_sql.open_cursor;
4682: --parse the statement
4676: ,lfflg => TRUE --line feed
4677: ,language_flag => DBMS_SQL.NATIVE);
4678: dbms_sql.close_cursor(l_cursor_handle);
4679:
4680: l_cursor_handle:= dbms_sql.open_cursor;
4681: l_cursor_handle:= dbms_sql.open_cursor;
4682: --parse the statement
4683: dbms_sql.parse (
4684: c => l_cursor_handle
4677: ,language_flag => DBMS_SQL.NATIVE);
4678: dbms_sql.close_cursor(l_cursor_handle);
4679:
4680: l_cursor_handle:= dbms_sql.open_cursor;
4681: l_cursor_handle:= dbms_sql.open_cursor;
4682: --parse the statement
4683: dbms_sql.parse (
4684: c => l_cursor_handle
4685: ,statement => l_rep_hdr_statement
4679:
4680: l_cursor_handle:= dbms_sql.open_cursor;
4681: l_cursor_handle:= dbms_sql.open_cursor;
4682: --parse the statement
4683: dbms_sql.parse (
4684: c => l_cursor_handle
4685: ,statement => l_rep_hdr_statement
4686: ,lb => 1
4687: ,ub => l_rep_hdr_statement.LAST
4685: ,statement => l_rep_hdr_statement
4686: ,lb => 1
4687: ,ub => l_rep_hdr_statement.LAST
4688: ,lfflg => TRUE --line feed
4689: ,language_flag => DBMS_SQL.NATIVE);
4690: dbms_sql.close_cursor(l_cursor_handle);
4691:
4692: /*
4693: l_cursor_handle:= dbms_sql.open_cursor;
4686: ,lb => 1
4687: ,ub => l_rep_hdr_statement.LAST
4688: ,lfflg => TRUE --line feed
4689: ,language_flag => DBMS_SQL.NATIVE);
4690: dbms_sql.close_cursor(l_cursor_handle);
4691:
4692: /*
4693: l_cursor_handle:= dbms_sql.open_cursor;
4694: --parse the statement
4689: ,language_flag => DBMS_SQL.NATIVE);
4690: dbms_sql.close_cursor(l_cursor_handle);
4691:
4692: /*
4693: l_cursor_handle:= dbms_sql.open_cursor;
4694: --parse the statement
4695: dbms_sql.parse (
4696: c => l_cursor_handle
4697: ,statement => l_hdr_statement
4691:
4692: /*
4693: l_cursor_handle:= dbms_sql.open_cursor;
4694: --parse the statement
4695: dbms_sql.parse (
4696: c => l_cursor_handle
4697: ,statement => l_hdr_statement
4698: ,lb => 1
4699: ,ub => l_hdr_statement.LAST
4697: ,statement => l_hdr_statement
4698: ,lb => 1
4699: ,ub => l_hdr_statement.LAST
4700: ,lfflg => TRUE --line feed
4701: ,language_flag => DBMS_SQL.NATIVE);
4702: dbms_sql.close_cursor(l_cursor_handle);
4703: */
4704: END IF;
4705:
4698: ,lb => 1
4699: ,ub => l_hdr_statement.LAST
4700: ,lfflg => TRUE --line feed
4701: ,language_flag => DBMS_SQL.NATIVE);
4702: dbms_sql.close_cursor(l_cursor_handle);
4703: */
4704: END IF;
4705:
4706: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN