formsbuilder中代码如下:
PROCEDURE imp_offer IS
BEGIN
Forms_DDL('BEGINtest_proc; END;');
Forms_ddl('begin '||'test_proc'||'; End;');
--commit_form;
insert intoproduct_offer_restrication select (select max(restrication_seq) from product_offer_restrication)+rownum,c1,0, '10C',region_id, null, null, to_date('28-09-2006 15:04:05', 'dd-mm-yyyy hh24:mi:ss'), 1, 1, 1, null, null,region_id from product_offer_test p,region r where c1 is not null and c4 like '%全%' and r.local_net_id=912 ;
forms_ddl('commit');
end;
test_proc存储过程如下:
create or replace procedure test_proc is
begin
insert into err_msg select 1,1 from dual;
end test_proc;
但是form执行后,查询表err_msg表中没有数据!
|