ORA-06502: PL/SQL: 数字或值错误，我贴出来，大家帮我改一下，以前没怎么写过存储过程。。

执行EXEC SQM_RESULT_PRO ;
ORA-06502: PL/SQL: 数字或值错误
ORA-06512: 在"TELEUSER.SQM_RESULT_PRO", line 30
ORA-06512: 在line 2

create or replace procedure SQM_RESULT_PRO is
str varchar2(4096);--最终拼的字符串
str2 varchar2(4096);--最终拼的字符串
ndate varchar2(64); --当天日期
cnum NUMBER(6);--当天的条数
CURSOR resname1 IS select resname from sqm_result_log where restype='1';
CURSOR resname2 IS select resname from sqm_result_log where restype='2';
begin
--开始
select to_char(sysdate,'yyyy-MM-dd') into ndate from dual;
select count(*) into cnum from sqm_result_log where to_char(restime,'yyyy-MM-dd')=ndate;
--判断当天的是否为6个文件
if cnum = 6 then
--系统运行正常
str:='系统运行正常';
else if cnum<6 then
--系统运行不正常
str:='系统运行不正常';
end if;
end if;
--open resname1 for select resname from sqm_result_log where restype='1';
--close resname1;
--open resname2 for select resname from sqm_result_log where restype='2';
--close resname2;
OPEN resname1;
loop
fetch resname1 into str2;
str:=str||' '||str2;
exit when resname1 % NOTFOUND;
end loop;
CLOSE resname1;

str2:='';

OPEN resname2;
loop
fetch resname2 into str2;
str:=str||' '||str2;
exit when resname2 % NOTFOUND;
end loop;
CLOSE resname2;

insert into testsqm values(str);
end SQM_RESULT_PRO;

---

刚刚看了一下，语法没有太大问题，怀疑是变量长度不够造成的问题。
把str、str2、cnum的手余长度修改知薯汪一下，字符串改为32767，这个是最大的长度，number不限定长度，修改如下：
Str VARCHAR2(32767); --最终拼的字符串搭仔
Str2 VARCHAR2(32767); --最终拼的字符串
Ndate VARCHAR2(64); --当天日期
Cnum NUMBER; --当天的条数

---

ORA-6502: 数字或值错旅肢误，一般出现在将字符串（varchar）类型转换为派镇余数值尘滚类型失败时候出现
检查下程序中变量和表列的数据类型是否一致

---

fetch resname2. resname into str2;

---