SET SERVEROUTPUT ON;
DECLARE
lv_test VARCHAR2(200);
PROCEDURE check_null(pi_varchar IN VARCHAR2)
IS
BEGIN
IF pi_varchar IS NULL THEN
dbms_output.put_line('variable is null');
ELSE
dbms_output.put_line('variable is not null');
END IF;
END;
BEGIN
dbms_output.put_line('set var NULL');
lv_test := NULL;
check_null(lv_test);
dbms_output.put_line('set var ''some value''');
lv_test := 'Some value';
check_null(lv_test);
dbms_output.put_line('set var ''''');
lv_test := '';
check_null(lv_test);
END;
/