转换字符串

Transforming Strings

我需要接受以下字符串并将它们放入类型集合中并将其传递给过程

String Cars = Dodge Charger||Ford Mustang||Chevy Camro||Ford GT
String Cost = 35,000||25,000||29,000|55,000
String CarDesc = Power House||Sweet Ride||Too Cool||Blow your door off

如何转换记录,使它们像下面这样?

 Cars:
  Dodge Charger||35,000||Power House
  Ford Mustang||25,00||Sweet Ride
  Chevy Camro||29,000||Too Cool
  Ford GT||55,000||Blow your door off

如何将它们解析为数组?

类型:

 create or replace TYPE             "CAR_OBJ"                                          
  AS
  OBJECT (CAR_NAME VARCHAR2 (50),
       Price    Number,
       CarDesc VARCHAR2 (100));
/
create or replace TYPE             "CAR_IN_ARR"                                          
  IS
   TABLE OF CAR_OBJ;
/


  procedure car_values (
      p_in_upd_car              car_in_arr,
      p_out_upd_results    out  car_out_cur
  )
  as

我已经尝试了各种for循环,但我就是无法按正确的顺序得到它

非常感谢

双分隔符 || 使这变得困难,所以我用 ~ 替换它们作弊。可能有一种更简洁的方法可以使用单个正则表达式来处理这个问题,或者使用 substrinstr.

更复杂的方法

此外,我假设 cost 示例应该是 35,000||25,000||29,000||55,000

真正的代码可能会确认所有字符串都包含相同数量的分隔符。此外,您可能希望将成本值解析为数字。

declare
    inCars    long := 'Dodge Charger||Ford Mustang||Chevy Camro||Ford GT';
    inCost    long := '35,000||25,000||29,000||55,000';
    inCarDesc long := 'Power House||Sweet Ride||Too Cool||Blow your door off';

    type varchar2_tt is table of varchar2(50);

    cars      varchar2_tt := varchar2_tt();
    costs     varchar2_tt := varchar2_tt();
    carDescs  varchar2_tt := varchar2_tt();
begin
    inCars := replace(inCars,'||','~');
    inCost := replace(inCost,'||','~');
    inCarDesc := replace(inCarDesc,'||','~');

    cars.extend(regexp_count(inCars,'~') +1);
    costs.extend(regexp_count(inCost,'~') +1);
    carDescs.extend(regexp_count(inCarDesc,'~') +1);

    for i in 1..cars.count loop
        cars(i) := regexp_substr(inCars,'[^~]+', 1, i);
        costs(i) := regexp_substr(inCost,'[^~]+', 1, i);
        carDescs(i) := regexp_substr(inCarDesc,'[^~]+', 1, i);

        dbms_output.put_line(cars(i) || '||' || costs(i) || '||' || carDescs(i));
    end loop;
end;