1.
鍩烘湰缁撴瀯
CREATE OR REPLACE PROCEDURE
瀛樺偍杩囩▼鍚嶅瓧
(
鍙傛暟
1 IN NUMBER,
鍙傛暟
2 IN NUMBER
) IS
鍙橀噺
1 INTEGER :=0;
鍙橀噺
2 DATE;
BEGIN
END
瀛樺偍杩囩▼鍚嶅瓧
绛旓細
--
杈撳嚭璁㈠崟鍙峰強浜ゆ槗鏃ユ湡
Declare
--
瀹氫箟鍙傛暟
p_po_num_f
number
;
锛?/p>
鍙傛暟鐢?/p>
P
寮�澶?/p>
锛?/p>
p_po_num_t
number
;
--
瀹氫箟鍙橀噺
l_po_num cux_po_headers_all.po_num%
type
;
锛?/p>
鍙橀噺鐢?/p>
L
寮�澶?/p>
锛?/p>
l_transaction_date
--
瀹氫箟甯搁噺
cux_po_headers_all.transaction_date%
type
;
c_desc
varchar2
(
20
) :=
'
璁㈠崟鍙?/p>
: '
;
锛?/p>
甯搁噺鐢?/p>
C
寮�澶?/p>
锛?/p>
--
姝ゆ父鏍囩敤浜庤幏鍙栧弬鏁拌寖鍥村唴璁㈠崟鐩稿叧淇℃伅
锛堝畾涔変竴涓父鏍囷級
cursor c_header is
select cph.po_num, cph.transaction_date
from cux.cux_po_headers_all cph
where 1 = 1
and (cph.po_num between &p_po_num_f and &p_po_num_t);
锛堟樉寮忎娇鐢ㄦ父鏍囷級
begin
open c_header;--
鎵撳紑娓告爣
锛堝惊鐜級
loop
fetch c_header
鈥?/p>
鎻愬彇娓告爣