达梦存储过程的语法与oracle的高度相似，但有好多细节还是有差异。我在这次项目迁移中踩过不少小坑，在这里给大家分享一下。
说明一下，我用的版本是达梦8，迁移时碰到的问题有些我已经反馈给达梦的官方群管理员，估计以后会有修复。
rpad问题
达梦的rpad函数，计算中文时永远是认为一个中文字符中两个字节，即使数据库设置的字符集是utf8（目前就发现rpad/lpad函数有这个问题，其它字符串函数都能正确识别，当字符集是utf8时能识别出来一个字符中3个字节）
测试代码：
select rpad('我是hch', 6), lengthb('我是hch') from dual -- 达梦输出"我是hc 9"union allselect rpad('我是hch', 5), length('我是hch') from dual -- 达梦输出"我是h 5" union allselect rpad('我是hch', 3), length('我是hch') from dual; -- 达梦输出"我 5"这个问题达梦的工作人员说以后会修复，目前我的解决方法是自己写一个rpad函数
function rpad_dm(string varchar2, padded_length number, pad_string varchar2 := ' ') return varchar2 IS v_len number := lengthb(string); BEGIN dbms_output.put_line('v_len - padded_length = ' ); if padded_length < v_len THEN return substrb(string, 1, padded_length); --如果输入长度小于原字符串长度，则调用substrb截断 elsif padded_length = v_len THEN return string; --如果长度相等直接返回原串即可 else return string || rpad(' ', padded_length - v_len, pad_string); --如果长度大于原字符串，则在后面补空格 end if; END;短路问题
一般编程语言都会提供短路功能，在计算与或逻辑时，如果前半段逻辑已经能确定真假时，后半段逻辑不会执行。
plsql里面也实现了短路功能，我们一般会利用这个特性减少一些代码，例如先判断变量是否为空，如果不为空再使用变量做运算：
if (var is not null and va.exists('error') ) then dbms_output.put_line('yes'); fi;
但在达梦的存储过程，短路却没有实现。上面的代码不管var是否为空，都会进行va.exists('error')这个逻辑。如果不幸var的变量是空的，就会导致运行异常。
测试代码1：
dbms_output.enable;declare v_flag boolean;begin -- 请问这个存储过程执行异常，报"非法的参数数据" 是不是达梦的bug oracle下是可以正常运行的 -- 还是有什么设置可以让存储过程正常执行 if (to_number('1') != 1) and to_number('abc') = 1 then dbms_output.put_line('yes'); end if; dbms_output.put_line('ok');end;测试代码2：
dbms_output.enable;declare TYPE TEST_RPT_LIST IS TABLE OF number INDEX BY PLS_INTEGER; o_demo_list TEST_RPT_LIST; i_report_id number := 17410491;BEGIN -- 验证达梦8 if短路 select 1 BULK COLLECT INTO o_demo_list from dual; dbms_output.put_line('o_demo_list(1) = ' || o_demo_list(1)); if o_demo_list(1) = 1 or o_demo_list(2) = 2 THEN -- or 短路没问题 dbms_output.put_line('or yes'); -- or yes能正常输出 end if; if o_demo_list(1) != 1 and o_demo_list(2) = 2 THEN -- o_demo_list(1) != 1 不成立 为什么还要执行o_demo_list(2) = 2判断 dbms_output.put_line('and yes'); -- 这里永远不应该输出 end if; dbms_output.put_line('done'); -- 走不到doneEXCEPTION WHEN no_data_found THEN dbms_output.put_line('no_data_found tbl_demo_tab ' || 'ID ' || to_char(i_report_id)); WHEN OTHERS THEN -- RAISE; dbms_output.put_line('err:' || sqlcode || sqlerrm);END;不只是if有短路问题，decode，case when等类似的都会有短路问题。
"case 判断 when 表达式1 else 表达式2 end" 在oracle是如果条件成立则执行条件1并返回其值，而在达梦是同时执行表达式1和表达式2，并根据判断结果返回一个值。
解决方法是不要偷懒，不依赖短路实现，多写几个if判断，或者把decode拆成多个if else语句。
深浅拷贝问题
oracle的table数组变量的赋值，默认是值复制（即深拷贝），而达梦默认是引用复制（即浅拷贝）。
也就是说在oracle使用 tmpArr := arr (tmpArr 和arr 都是数组)，然后对这个tmpArr操作，不会影响arr的值，而在达梦，修改tmpArr数组元素的内容就是在修改arr
测试代码
FOR vv IN 1 .. 5 -- crontab 初始化赋值 LOOP CASE vv WHEN 1 THEN v_obj.minutes := tmpArr; WHEN 2 THEN v_obj.hours := tmpArr; WHEN 3 THEN v_obj.days := tmpArr; WHEN 4 THEN v_obj.months := tmpArr; WHEN 5 THEN v_obj.weeks := tmpArr; END CASE; END LOOP;在oracle对v_obj这样赋值后，v_obj.minutes和v_obj.hours是两个不同的变量，分别对两个变量修改，相互之间不会出现干扰。而在达梦8，v_obj下面所有变量都指向同一个数组，对v_obj任意一个成员修改，都会同时影响其它成员的值。
解决方法是自己写一个数组拷贝函数，例如这样：
function copy1kList(v_input t_str_list) return t_str_list IS v_tmplist t_str_list; v_ind PLS_INTEGER; begin --TYPE t_str_list IS TABLE OF VARCHAR2(1024) INDEX BY PLS_INTEGER; if v_input.count > 0 then /* //在v_input里面的元素不连续时，这样会有bug for vv in v_input.first .. v_input.last LOOP v_tmplist(vv) := v_input(vv); end loop; */ v_ind = v_input.first; while v_ind is not null loop v_tmplist(v_ind) := v_input(v_ind); v_ind = v_input.next(v_ind); end loop; end if; return v_tmplist; end;使用这个函数代替数组变量赋值就能维持代码行为与oracle一致。
今天暂时先分享这三个问题，后面有时间再整理其它坑。这些坑比较隐蔽，花了我不少时间调试才发现，我把它们总结出来，希望能对你有所帮助。
No comments:
Post a Comment