2012年6月7日 星期四

Oracle Forms - 重要內建程序

[轉]http://nil.gcamay.com.tw/blog/post/53/


abort_query; 停止查詢的執行
break; 停止 form 的執行,顯示 Debugger 註: Debug Mode
clear_block; 清除當前的 Data Block 中記錄 
clear_form; 清除 form 的所有記錄

copy name in用法

[轉]http://oracledev.5d6d.com/archiver/tid-599.html


for i in 1 ..40 loop

  copy(i,'block.item'||i);

end loop;



--将循环变量循环赋值给block.item1,block.item2....

拆字串迴圈 關鍵字:substr/instr/逗號


i := 1;
loop
  exit when instr(v_tbnm,',',1,i) = 0;

  if i= 1 then
  t_1 := substr(v_tbnm, 0, instr(v_tbnm, ',', 1, i)-1);
  else
     t_1 := substr(v_tbnm, instr(v_tbnm, ',', 1, i-1)+1, instr(v_tbnm, ',', 1, i)
            - instr(v_tbnm, ',', 1, i-1)-1);
  end if;
  i := i+1;
end loop;