Question

使用PL / SQL，如何转换像这样的名称 - 值对表...

Firstname Surname Address1        City   Country
--------- ------- --------------- ------ -------
Bob       Smith   101 High Street London UK

...到这样的单行表：

TYPE order_type IS TABLE OF VARCHAR2(255) INDEX BY VARCHAR2(255);
neworder order_type;

实际上我需要的是将名称 - 值对转换为 SYS_REFCURSOR 作为上面的单行表

完整的故事是：我收到像这样的单个字符串的数据（名字;鲍勃;姓;史密斯地址1; 101高街;城市;伦敦;国家;英国）我只需将其转换为SYS_REFCURSOR

我从创建类型开始

app.get('/', function (req, res) {
    res.status(200).json({
        message: 'Welcome to the project-name api'
    });
});

到目前为止，我设法使用名称 - 值对

这是一个好方法吗？

Answer 1

create table t1 (name varchar2(20), value varchar2(20));
insert into t1 values('Firstname','Bob');
insert into t1 values('Surname','Smith');
insert into t1 values('Address1','101 High Street');
insert into t1 values('City','London');
insert into t1 values('Country','UK');

select * from t1 pivot (max(value) for (name) in ('Firstname' as firstname, 'Surname' as surname, 'Address1' as address, 'City' as city, 'Country' as country));

此类SQL将列数据转换为一行。

如果您将数据作为具有固定顺序的单独字符串获取，我只需使用instr('Firstname;Bob;Surname;Smith;Address1;101 High Street;City;London;Country;UK',';',1)和substring函数的组合进行解析。

类似的东西：

declare
text varchar2(200) := 'Firstname;Bob;Surname;Smith;Address1;101 High Street;City;London;Country;UK';
firstname varchar2(40);
surname varchar2(40);
address varchar2(40);
city varchar2(40);
country varchar2(40);
begin
firstname := substr(text,instr(text,';',1) + 1,instr(text,';',2) - instr(text,';',1));
surname := substr(text,instr(text,';',3) + 1, instr(text,';',4) - instr(text,';',3));
....
end;

Answer 2

遇到了一个我不知道的有趣的实用工具。 dbms_utility.comma_to_table。 http://mohsoracle.blogspot.com/2010/04/oracle-breaking-comma-separated-string.html

所以如果你想用它来从一个分隔的字符串返回一个sys引用光标，可能会像。

/* Formatted on 10/28/2016 9:42:52 AM (QP5 v5.256.13226.35510) */
CREATE OR REPLACE PROCEDURE myproc (v_cur OUT SYS_REFCURSOR)
IS
   lv_Str_List   VARCHAR2 (1000)
      := 'Firstname, Bob, Surname, Smith, Address, 101 High Street, City, London, Country, UK';
   lb_cnt        BINARY_INTEGER;
   la_Tab_Str    DBMS_UTILITY.UNCL_ARRAY;
BEGIN
   lv_Str_List := '"' || REPLACE (lv_Str_List, ',', '","') || '"';
   -- parse the string into comma separated table
   DBMS_UTILITY.COMMA_TO_TABLE (lv_Str_List, lb_cnt, la_Tab_Str);

   FOR i IN 1 .. la_Tab_Str.COUNT
   LOOP
      -- display substring
      DBMS_OUTPUT.PUT_LINE (TRIM (la_Tab_Str (i)));
   END LOOP;

   OPEN v_cur FOR
      SELECT *
        FROM (SELECT REPLACE (TRIM (la_Tab_Str (2)), '"', '') AS Firstname,
                     REPLACE (TRIM (la_Tab_Str (4)), '"', '') AS Surname,
                     REPLACE (TRIM (la_Tab_Str (6)), '"', '') AS Address,
                     REPLACE (TRIM (la_Tab_Str (8)), '"', '') AS City,
                     REPLACE (TRIM (la_Tab_Str (10)), '"', '') AS Country
                FROM DUAL) t;
END;

我在字符串中进行了硬编码，但它可以作为变量输入，然后用逗号替换分号。

当我在蟾蜍中运行以下内容进行测试时。

DECLARE 
  V_CUR SYS_REFCURSOR;

BEGIN 
  V_CUR := NULL;

  MYPROC ( V_CUR );
  :to_grid := V_CUR;
  COMMIT; 
END;

我得到了

FIRSTNAME SURNAME  ADDRESS           CITY     COUNTRY
Bob       Smith    101 High Street   London   UK

PL / SQL将名称 - 值对转换为单行表

2 个答案: