pl/sql--動態SQL的範例
declare
type a is ref cursor; --自訂一個ref cursor類型,名稱為a
rc a; --定義變數rc為a類型
b varchar2(100);
r1 ciadm.cbr1_passage_trn%rowtype;
begin
b:='select * from ciadm.cbr1_passage_trn where 日期 = :v_date';
open rc for b using '980311'; --會將980311代入 :v_date
loop
fetch rc into r1;
exit when rc%notfound;
dbms_output.put_line(r1.備貨單號 || '--' || r1.客戶);
end loop;
end;
DECLARE
TYPE TP_REF IS REF CURSOR;
CUR_1 TP_REF;
V_SQL VARCHAR2(100);
V_DATE VARCHAR2(10);
R_1 HLADM.RS01A%ROWTYPE;
BEGIN
V_DATE := '20090101';
V_SQL := 'SELECT * FROM RS00 WHERE IDAY = ' || V_DATE ;
OPEN CUR_1 FOR V_SQL ;
LOOP
FETCH CUR_1 INTO R_1;
EXIT WHEN CUR_1%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(R_1.RV || '的主房號為' || R_1.MRV);
END LOOP;
CLOSE CUR_1;
END;

-
在電腦版的Line輸入文字時,遇到需要換行的情形時,我都是用記事本先寫好再複製上去,這樣就可以有換行的效果,可是這樣的做法好像失去Line的便利性。 於是查了一下,原來有一個設定可以指定Enter換行,而不是發訊息出去。 完成設定之後,要發送訊息就改用Al...
-
Windows7 / Windows8 kill process Linux下要刪除某個程序通常會使用 ps 配合 kill 來刪除程序。 例如:ps -ef |grep [PROCESS NAME] kill -9 [PID] 在Windows下,通常是...
-
Excel有許多實用的公式,善用這些公式可以達成大部份的功能,但是萬一公式無法滿足需求時,可以自訂公式來解決。 自訂公式其實就是自訂函數,先開啟Visual Basic(VBA) 新增一個「模組」 ...