全局变量需要在程序中也要进行初始化
CREATE OR REPLACE PACKAGE BODY cux_test IS
g_num NUMBER := 0;
PROCEDURE g_num_add IS
BEGIN
g_num := g_num + 1;
END;
PROCEDURE g_num_test IS
BEGIN
g_num := 0; --不加该行 g_num会自动累增,并不是从0开始,因此一定要再在程序里进行初始化
INSERT INTO cux_test_log
VALUES
(SYSDATE
,'g_num--' || g_num);
FOR i IN 1 .. 10 LOOP
g_num_add;
END LOOP;
END;
end;
CREATE OR REPLACE PACKAGE BODY cux_test IS
g_num NUMBER := 0;
PROCEDURE g_num_add IS
BEGIN
g_num := g_num + 1;
END;
PROCEDURE g_num_test IS
BEGIN
g_num := 0; --不加该行 g_num会自动累增,并不是从0开始,因此一定要再在程序里进行初始化
INSERT INTO cux_test_log
VALUES
(SYSDATE
,'g_num--' || g_num);
FOR i IN 1 .. 10 LOOP
g_num_add;
END LOOP;
END;
end;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/29961585/viewspace-2140495/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/29961585/viewspace-2140495/