oracle 存储过程编译报错！请各位高数帮忙看看，小弟在线等待...
SQL codecreate or replace procedure P_UpdateMissingParameters( --输入参数 userOrderId in varchar2 , --用户订单ID InResAttributeCode in varchar2 ,--资源属性编码 insertValue in varchar2 --用户输入的值 --输出参数 --InResTable out varchar2 ,--资源属性表 --InResTableColumn out varchar2--资源属性表字段 )/***************************author:hsh@si-tech.com.cndate :2012-02-13/***************************/ --定义常量 is icount number(8) not null; product_id varchar2(50); --产品ID net_type_code varchar2(50); --连接方式 in_res_table varchar2(50); --资源属性表名称 in_res_table_pk varchar2(50); --资源属性表主键 in_res_table_column varchar(50); --资源属性表字段 in_busi_res_kind_code varchar2(50); --业务资源种类编码 -- fcount number(8) not null; resCount number(8) not null; resId varchar2(20); --业务资源ID resKindCount number(8) not null; atom_res_kind_code varchar2(20); --原子资源种类 shebeiId varchar2(20); --连接端口设备ID duanziId varchar2(20); --连接端子ID cableId varchar2(20); --连接光缆的ID pairId varchar2(20); --连接纤芯的ID luojiId varchar2(20); --逻辑号码ID wuliID varchar2(20); --物理号码ID begin --通过用户订单ID查询用户订单表中是否有这条记录 /* select count(*) into fcount from rt_userorder_info ri where ri.user_order_id=userOrderId; if fcount is null then fcount:=0; end if;*/ --根据输入参数用户订单ID统计多少条记录 select count(*) into icount from rt_userorder_info ri where ri.user_order_id=userOrderId; if icount=1 then --如果通过用户订单ID统计只有一条记录则 查询出产品ID和连接方式 select ri.product_id,ri.net_type_id into product_id,net_type_code from rt_userorder_info ri where ri.user_order_id=userOrderId; --通过产品ID和连接方式查询出 资源属性表名称、资源属性表主键、资源属性表字段、业务资源种类编码 select rd.in_res_table, rd.in_res_table_pk, rd.in_res_table_column, in_res_kind_code into in_res_table, in_res_table_pk, in_res_table_column, in_busi_res_kind_code from rt_resreturnconfig_dict rd where rd.product_id = product_id and rd.net_type_code = net_type_code and rd.in_res_attribute_code = InResAttributeCode; dbms_output.put_line('更新前资源属性表名称:'||in_res_table); dbms_output.put_line('更新钱资源属性表主键:'||in_res_table_pk); dbms_output.put_line('更新前资源属性表字段:'||in_res_table_column); dbms_output.put_line('更新前业务资源种类编码:'||in_busi_res_kind_code); elsif icount>1 then --如果通过用户订单ID统计的总数大于或者等于2条以上记录 dbms_output.put_line('TOO_MANY_ROWS:一个用户订单ID对应只有一条记录，请核对！'); else dbms_output.put_line('NO_DATA_FOUND:没有找到合法的数据！'); end if; --根据用户订单ID和业务资源种类编码判断是否有记录 select count(*) into resCount from rt_workres_info rw where rw.user_order_id = userOrderId and rw.res_kind_code = in_busi_res_kind_code; if resCount=1 then --根据用户订单ID和业务资源种类编码查询出业务资源ID (res_id) select res_id into resId from rt_workres_info rw where rw.user_order_id = userOrderId and rw.res_kind_code = in_busi_res_kind_code; dbms_output.put_line('更新前业务资源ID:'||resID); elsif resCount>1 then --如果通过用户订单ID和业务资源种类编码统计的总数大于或者等于2条以上记录 dbms_output.put_line('TOO_MANY_ROWS:通过用户订单ID和业务资源种类编码过滤出业务资源ID应该只有一条记录，请核对！'); else dbms_output.put_line('NO_DATA_FOUND:没有找到合法的数据！'); end if; --根据业务资源ID查找工单原子资源表判断是否有记录 select count(*) into resKindCount from rt_WorkAtomRes_info rwi where rwi.res_id=resId; if resKindCount=1 then --根据业务资源ID查找工单原子资源表中(原子资源种类编码) select rwi.atom_res_kind_code into atom_res_kind_code from rt_workatomres_info rwi where rwi.res_id=resId; dbms_output.put_line('更新前业原子资源种类编码:'||atom_res_kind_code); elsif resKindCount>1 then --如果通过业务资源ID统计的总数大于或者等于2条以上的记录 dbms_output.put_line('TOO_MANY_ROWS:通过业务资源ID过滤出应该只有一条记录，请核对！'); else dbms_output.put_line('NO_DATA_FOUND:没有找到合法的数据！'); --根据原子资源种类表中编码 判断value1存放的值是端口或者是缆线 --atom_res_kind_code=10 value1为端口（连接设备ID） value2为端子 if atom_res_kind_code=10 then --如果原子资源种类编码为10 则根据业务资源ID找出value1:连接端口设备ID，value2:连接端子ID select rwi.value1,rwi.value2 into shebeiId,duanziId from rt_workatomres_info rwi where rwi.res_id=resId; dbms_output.put_line('更新前连接端口设备ID:'||shebeiID||'-------'||'||更新前连接端子ID:'||duanziId); --根据设备ID 更新对应的哪张表的 哪一列的字段值。 if in_res_table='RT_PORT_INFO ' then --如果从资源反馈配置表中查询对应的表为RT_PORT_INFO(端口信息表) 则根据端子ID 更新记录 update in_res_table set in_res_table_column=insertValue where in_res_table_pk=duanziId; dbms_output.put_line('更新后资源属性表为:'||in_res_table||'--------'||'更新后的资源属性表字段key:'||in_res_table_column||'----'||'更新后的资源属性表字段值value:'||insertValue); commit; else --如果从资源反馈配置表中查询对应的表为RT_DEVICE_INFO、RT_DEVICEONU_INFO(设备信息表、ONU表) 则根据设备ID更新记录 update in_res_table set in_res_table_column=insertValue where in_res_table_pk=shebeiId; dbms_output.put_line('更新后资源属性表为:'||in_res_table||'--------'||'更新后的资源属性表字段key:'||in_res_table_column||'----'||'更新后的资源属性表字段值value:'||insertValue); commit; end if; elsif atom_res_kind_code=20 then --如果原子资源种类表面吗为20 则根据业务资源ID找出value1:连接缆线ID，value2:连接纤芯ID select rwi.value1,rwi.value2 into cableId,pairId from rt_workatomres_info rwi where rwi.res_id=resId; dbms_output.put_line('更新前连接缆线ID:'||cableId||'--------'||'更新钱连接纤芯ID:'||pairId); --根据缆线ID 更新对应的哪张表的 哪一列的字段值 update in_res_table set in_res_table_column=insertValue where in_res_table_pk=cableId; dbms_output.put_line('资源种类编码=20（缆线线序）更新后的资源属性表字段值value:'||insertValue); commit; elsif atom_res_kind_code=30 then --如果原子资源种类编码为30 则根据业务资源ID 找出value1对应的逻辑号码ID select rwi.value1 into luojiId from rt_workatomres_info rwi where rwi.res_id=resId; --根据逻辑号码ID更新记录 update in_res_table set in_res_table_column=insertValue where in_res_table_pk=luojiId; dbms_output.put_line('更新后资源属性表为:'||in_res_table||'--------'||'更新后的资源属性表字段key:'||in_res_table_column); dbms_output.put_line('资源种类编码=30（逻辑号码）更新后的资源属性表字段值value:'||insertValue); commit; elsif atom_res_kind_code=40 then --如果原子资源种类编码为40 则根据业务资源ID找出value1对应的物理号码ID select rwi.value1 into wuliId from rt_workatomres_info rwi where rwi.res_id=resId; --根据物理号码ID更新记录 update in_res_table set in_res_table_column=insertValue where in_res_table_pk=wuliId; dbms_output.put_line('更新后资源属性表为:'||in_res_table||'--------'||'更新后的资源属性表字段key:'||in_res_table_column); dbms_output.put_line('资源种类编码=40（物理号码）更新后的资源属性表字段值value:'||insertValue); commit; --特殊情况处理:处理存在默认值的情况。这类情况不同处理。 else dbms_output.put_line('这种情况什么都不处理！'); end if; end P_UpdateMissingParameters; 报错信息如下：PROCEDURE IRMS_HTB1.P_UPDATEMISSINGPARAMETERS 编译错误错误：PLS-00103: 出现符号 "P_UPDATEMISSINGPARAMETERS"在需要下列之一时： if行：184文本：end P_UpdateMissingParameters;