如何将单个值以表格形式复制到所有字段?

时间:2018-08-28 05:26:28

标签: oracle oracle10g oracleforms

我想将单个值从字段复制到所有字段的表格中

我的单拷贝代码:

DECLARE 
  cur_val VARCHAR2(40); 
BEGIN       
  cur_val := Name_In('BLOCK_NAME.SOURCE');
  Copy( cur_val, 'BLOCK_NAME.DESTINATION' );    
END;

如何将值复制到oracle 10g表格中的所有字段中?

1 个答案:

答案 0 :(得分:3)

像这样修改您的代码:

DECLARE 
  cur_val VARCHAR2(40); 
BEGIN       
  cur_val := Name_In('BLOCK_SRC.SOURCE');

  Go_Block('BLOCK_DEST');
  first_record;
  loop
    Copy( cur_val, 'BLOCK_DEST.DESTINATION' );
    exit when :SYSTEM.LAST_RECORD = 'TRUE';
    next_record;
  end loop;

END;