管道两个表传递数据发生:不一致的数据类型

2009-03-30 10:50:47 97 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

基于SPS与VB构建输气管道离线仿真培训系统的工程实践在工业自动化与过程控制领域，仿真技术是构建数字孪生、实现安全高效运营的核心手段。其原理在于通过高保真数学模型，在虚拟空间中复现物理系统的动态行为，从而在无风险环境下进行工况分析、控制优化与人员培训。对于长距离输气管道这类复杂系统，仿真技术的价值尤为突出，它能有效避免实际操作风险，并大幅降低培训成本。应用场景广泛覆盖操作员技能实训、运行方案预演及事故预案评估。本文聚焦于如何将专业的SPS水力热力瞬态仿真内核，与高度定制化的Visual Basic前端操作界面深度融合，打造出一套与现场SCADA系统界面一致、响阅读详情

create or replace type place as object
(
line1 varchar2(20),
line2 varchar2(20),
city varchar2(20),
state_code varchar2(20),
zip varchar2(20)
);

create type placelist as table of place;

create or replace function f_table_obj_pipelined
return placelist pipelined
is
v_address place;
begin
for i in 1..3 loop
if(i = 1) then
v_address :=
place('20','vy','ny','1','usa');
elsif ( i = 2) then
v_address :=
place('21','nj','nj','2','js');
elsif (i = 3) then
v_address :=
place('22','ah','ah','3','zg');
end if;
pipe row(v_address);
end loop;
return;
end;
/
--select * from table(f_table_obj_pipelined);
create or replace function f_table_obj_pipelined1(p_ref_cursor sys_refcursor)
return placelist pipelined
is
v_address1 place;
v_address2 place;
begin loop
fetch p_ref_cursor into v_address1;
exit when p_ref_cursor%notfound;
if(v_address1.city = 'ny') then
v_address2.line1 := '24';
v_address2.line2 := 'cd';
v_address2.city := 'cd';
v_address2.state_code := '4';
v_address2.zip := 'sc';
elsif (v_address1.city ='nj') then
v_address2.line1 := '25';
v_address2.line2 := 'aq';
v_address2.city := 'aq';
v_address2.state_code := '5';
v_address2.zip := 'aq';
end if;
pipe row(v_address2);
end loop;
close p_ref_cursor;
return;
end;
/

select * from table(f_table_obj_pipelined1(cursor(select * from table(f_table_obj_pipelined()))));
红色部分提示数据类型不一致错误???????
f_table_obj_pipelined作为第一个管道表函数,f_table_obj_pipelined1作为第二个管道表函数]

请大侠们指点,谢谢

...全文