请教，动态处理的问题。谢谢

declare intablename varchar2(200):='test_zkm';
pkfieldname varchar2(200);
vsql varchar2(500);
swapvalue integer:=0;
outvalue varchar2(500);
BEGIN
--select count(1) into outvalue from test_zkm where tid='1';
pkfieldname := '';
vsql := 'select a.column_name from user_cons_columns a,user_constraints b where a.constraint_name=b.constraint_name and b.TABLE_NAME=:itabname and b.constraint_type=''P''';
--怎么处理数据为null的情况？
execute immediate vsql into pkfieldname using upper(intablename);
if nvl(pkfieldname,'')= '' then
dbms_output.put_line('the result is null or is empty');
outvalue := '';
else
dbms_output.put_line('the result is not null');
--处理最大值
vsql := 'select max(' || pkfieldname || ') from ' || intablename;
--怎么处理数据为null的情况？
execute immediate vsql into swapvalue;
swapvalue:= swapvalue +1;
outvalue := swapvalue;
end if;
dbms_output.put_line(outvalue);
END;

--备注
以上是代码，我的问题是在执行 execute immediate vsql into pkfieldname using upper(intablename);的时候当结果为null的情况下如何处理，除了在这之前用count先判断的方法，谢谢