请教调用储存过程后输出结果断节问题！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请教调用储存过程后输出结果断节问题！

此主题相关图片如下：在sql分析器执行正常.jpg

下载信息 [文件大小：下载次数： ]
点击浏览该文件:_sql过程.txt

上图在是SQL分析器执行输出结果正常。

此主题相关图片如下：软件调用储存过程结果异常.png

上图是在软件中调用过程输出异常。

以下是调用储存过程定义：

If _db00.DataRows.Count > 0 Then '如果有查询到记录

pb01=1

pb02=_db00.DataRows.Count '保存最大记录数

For Each dr1 As DataRow In _db00.DataRows '收集入库单号

dr1("rkdh01")=Nothing '用于集中填写入库单号

dr1("lldh01")=Nothing '用于集中领料单号

dr1("cgdh01")=Nothing ' 用于集中收集采购单号

pb01=pb01+1 '进度条+1

pb1.Value=round2(pb01/pb02*100,0) '显示进度条最大数

If pb1.value>100 Then pb1.value=100

pb1.Visible=True

str01=dr1("DOC_NO").trim() '指令单号

str02=dr1("ITEM_CODE").trim() '产品编号

str03=dr1("i2icode").trim() '材料号

Dim s As new StringBuilder '大规模字符串合并

''------------------以下是收集产品入库单号

str04=Nothing

'----------以下是获取入库单号,领料单号,采购单号过程调用

Dim cmd9 As new sqlcommand

cmd9.C

cmd9.commandtext="mo_docno_01"

cmd9.StoredProcedure=True

cmd9.Parameters.add("@str01",str01) '输入参数'指令单号

cmd9.Parameters.add("@str03",str03) '输入参数'材料编号

cmd9.Parameters.add("@mr1no"," ",True) '输出参数

cmd9.Parameters.add("@lldh01"," ",True) '输出参数

cmd9.Parameters.add("@cgdh01"," ",True) '输出参数

cmd9.ExecuteNonQuery

dr1("rkdh01")=cmd9.parameters("@mr1no") '用于汇聚入库单号

dr1("lldh01")=cmd9.parameters("@lldh01") '用于集中领料单号

dr1("cgdh01")=cmd9.parameters("@cgdh01") ' 用于集中收集采购单号

'----------以是上获取入库单号,领料单号,采购单号过程调用

end if

还请专家指点一下，不知调用SQL过程的什么地方定义错误？

非常感谢！

[此贴子已经被作者于2019/6/14 19:25:59编辑过]

主题：请教调用储存过程后输出结果断节问题！