- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
如何在 PL/SQL 中打印记录变量的所有字段。记录变量有很多字段,那么有没有比打印每个字段更好的方法呢?也尝试过动态sql,但没有帮助。
最佳答案
在 Ollies 的基础上使用 dbms_output,但用于动态遍历光标
设置测试
/*create table temp (aa varchar2(50) , bb number , cc date ) ;
insert into temp (aa,bb,cc)
select chr(level+100) , level, sysdate+level
from dual
connect by level < 15 ;
/
*/
<小时/>
用于显示测试的 block (假设为 11g)
set serveroutput on
declare
l_cur SYS_REFCURSOR ;
PROCEDURE CursorOutput(
p_refcursor IN OUT SYS_REFCURSOR
)
AS
l_desc DBMS_SQL.DESC_TAB ;
l_cols BINARY_INTEGER ;
l_cursor BINARY_INTEGER ;
v_varchar2 VARCHAR2( 4000 ) ;
v_number NUMBER ;
v_date DATE ;
l_data varchar2( 32767 ) ;
l_columnValue VARCHAR2( 32767 ) ;
l_processedRows Number := 0;
BEGIN
/* Convert refcursor "parameter" to DBMS_SQL cursor... */
l_cursor := DBMS_SQL.TO_CURSOR_NUMBER( p_refcursor );
/* Describe the cursor... */
DBMS_SQL.DESCRIBE_COLUMNS( l_cursor, l_cols, l_desc );
/* Define columns to be fetched. We're only using V2, NUM, DATE for example...
for a complete list of the col_types this link is accessible.
http://download.oracle.com/docs/cd/B10501_01/server.920/a96540/sql_elements2a.htm#45504
http://forums.oracle.com/forums/thread.jspa?threadID=912475
if not a usable type, will throw new exception
*/
FOR i IN 1 .. l_cols LOOP
IF l_desc(i).col_type = 2 THEN
DBMS_SQL.DEFINE_COLUMN(l_cursor, i, v_number);
ELSIF l_desc(i).col_type = 12 THEN
DBMS_SQL.DEFINE_COLUMN(l_cursor, i, v_date);
ELSif l_desc(i).col_type = 01 or l_desc(i).col_type = 96 then
DBMS_SQL.DEFINE_COLUMN(l_cursor, i, v_varchar2, 4000);
else
--raise an exception if the user's query contains a datatype not (yet) supported by this procedure
RAISE_APPLICATION_ERROR(-20000, 'Invalid Data Type for conversion to delimited file. {' || l_desc(i).col_name || '}');
END IF;
END LOOP;
/* -- print out the column names if desired
FOR i IN 1 .. l_cols LOOP
dbms_output.put_line('** ' || l_desc(i).col_name) ;
END LOOP;
*/
/* Fetch all data... */
WHILE DBMS_SQL.FETCH_ROWS(l_cursor) > 0 LOOP
dbms_output.put_line('LINE: ' || l_processedRows || '');
FOR i IN 1 .. l_cols LOOP
if l_desc(i).col_type = 12 THEN --we are in a date
DBMS_SQL.COLUMN_VALUE(l_cursor, i, v_date);
v_varchar2 := to_char(v_date , 'dd-MON-yyyy' ) ;
elsif l_desc(i).col_type = 2 THEN --we are in a number
DBMS_SQL.COLUMN_VALUE(l_cursor, i, v_number);
v_varchar2 := to_char(v_number) ;
else --treat it as a string (should be varchar2,char,etc)
DBMS_SQL.COLUMN_VALUE(l_cursor, i, v_varchar2);
IF v_varchar2 IS NOT NULL THEN
v_varchar2 := '"' || v_varchar2 || '"' ;
ELSE
v_varchar2 := '';
END IF ;
end if ;
dbms_output.put_line(l_desc(i).col_name || '=>' || v_varchar2) ;
END LOOP;
l_processedRows := l_processedRows + 1 ;
END LOOP;
dbms_sql.close_cursor(l_cursor);
dbms_output.put_line('I found and processed ' || l_processedRows || ' rows .');
END;
begin
open l_cur for select * from temp;
CursorOutput(p_refcursor => l_cur) ;
end ;
/
<小时/>
会给你这个结果
LINE: 0
AA=>"e"
BB=>1
CC=>04-JAN-2012
LINE: 1
AA=>"f"
BB=>2
CC=>05-JAN-2012
LINE: 2
AA=>"g"
BB=>3
CC=>06-JAN-2012
LINE: 3
AA=>"h"
BB=>4
CC=>07-JAN-2012
LINE: 4
AA=>"i"
BB=>5
CC=>08-JAN-2012
LINE: 5
AA=>"j"
BB=>6
CC=>09-JAN-2012
LINE: 6
AA=>"k"
BB=>7
CC=>10-JAN-2012
LINE: 7
AA=>"l"
BB=>8
CC=>11-JAN-2012
LINE: 8
AA=>"m"
BB=>9
CC=>12-JAN-2012
LINE: 9
AA=>"n"
BB=>10
CC=>13-JAN-2012
LINE: 10
AA=>"o"
BB=>11
CC=>14-JAN-2012
LINE: 11
AA=>"p"
BB=>12
CC=>15-JAN-2012
LINE: 12
AA=>"q"
BB=>13
CC=>16-JAN-2012
LINE: 13
AA=>"r"
BB=>14
CC=>17-JAN-2012
I found and processed 14 rows .
我做了类似的事情,利用这两个链接作为源动态构建一个 csv 文件 http://www.oracle-developer.net/display.php?id=505 http://asktom.oracle.com/pls/apex/f?p=100:11:0::::P11_QUESTION_ID:88212348059
但是,根据您的目的,您可能只想在 SQL Developer(或 Toad)中运行它并导出结果!
关于oracle - 在 PL/SQL 中打印记录字段,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8717251/
PL/1 中有许多不同的数字数据类型。我想知道什么时候有整数除法,什么地方没有。暂时,我写了一个小例子来说明(至少对我而言)PL/1 非常纠结于其中: DCL BIN15 FIXED BIN(15)
我是 Prolog 的新手。我有两个文件。其中之一是“names.pl”,另一个是“verbs.pl”。这两个文件都有事实。 “names.pl”有关于很多名词等的事实。事实的名字是关系。 这些文件的
关闭。这个问题不符合Stack Overflow guidelines .它目前不接受答案。 我们不允许提问寻求书籍、工具、软件库等的推荐。您可以编辑问题,以便用事实和引用来回答。 关闭 3 年前。
我正在处理一个存储的 PL/SQL 函数,该函数根据给定的员工编号查找员工的家属姓名。到目前为止,我能够获得所需的输出,但在输出期间似乎有逗号问题。对于如何在输出过程中删除最后一个括号,我们将不胜
我观察到有两种执行 perl 程序的方法: perl test.pl 和 ./test.pl 这两者之间的确切区别是什么,哪一个值得推荐? 最佳答案 我将稍微改写其他答案所说的内容。 第一种情况将运行
我有一个表 TDATAMAP,其中包含大约 1000 万条记录,我想将所有记录提取到 PL/SQL 表类型变量中,将其与某些条件进行匹配,最后将所有必需的记录插入临时表中。请告诉我是否可以使用 PL/
一切都在标题中。 我在游标上循环并想要 EXIT WHEN curs%NOTFOUND 当没有更多行时,PostgreSQL 下的 %NOTFOUND 等同于什么? 编辑 或其他游标属性 %ISOPE
CREATE FUNCTION foo() RETURNS text LANGUAGE plperl AS $$ return 'foo'; $$; CREATE FU
我正在使用 ack.pl 工具来搜索文件中的字符串或 IP ack.pl 的官方网站是 - http://beyondgrep.com/documentation/ ack.pl CLI 示例(想在/
代码 #!/usr/bin/perl -I/root/Lib/ use Data::Dumper; print Dumper \@INC; 以上代码文件名为test.pl,权限为755。 当我使用/u
编写一个 PL/SQL 过程,将员工编号和薪水作为输入参数,并从经理为 'BLAKE' 且薪水在 1000 到 2000 之间的员工表中删除。 我写了下面的代码:- create or replac
我需要对更新行进行一些审核。 所以我有一个函数,它接收 some_table%ROWTYPE 类型的参数,其中包含要为该行保存的新值。 我还需要在历史表中保存一些有关更改的列值的信息。我正在考虑从 a
如果我在 PL/SQL 存储过程中使用许多 CLOB 变量来存储许多长字符串,是否存在性能问题? CLOB 的长度也是可变的吗? CLOB 代替使用 varchar2 和 long 是否有任何已知的限
我想使用 JavaScript/Apex 创建一个按钮,这样当我点击它时,就会“调用”一个 PL-SQL 过程。与常规 html 按钮类似,但 onClick="JavaScript function
已关闭。此问题旨在寻求有关书籍、工具、软件库等的建议。不符合Stack Overflow guidelines .它目前不接受答案。 我们不允许提问寻求书籍、工具、软件库等的推荐。您可以编辑问题,以
今天的好时间,想问问有没有人知道在IBM Bluemix 云上安装PostgreSQL 扩展(准确的说是pl/r 和pl/python)的方法是什么?我在那里运行 compose-postgresql
是否可以像普通 Python 函数一样从其他 PL/Python block 调用 PL/Python 函数。 例如,我有一个函数f1: create or replace function f1()
已关闭。此问题旨在寻求有关书籍、工具、软件库等的建议。不符合Stack Overflow guidelines .它目前不接受答案。 我们不允许提问寻求书籍、工具、软件库等的推荐。您可以编辑问题,以
我正在使用返回 REF CURSOR 的 Java 在 PL/SQL 中调用存储函数: FUNCTION getApprovers RETURN approvers_cursor IS app
通过终端修改Webmin密码时 Can't locate ./acl/md5-lib.pl at /usr/share/webmin/changepass.pl 使用 Ubuntu 20 最佳答案 U
我是一名优秀的程序员,十分优秀!