金蝶K3进度03K3WISE插件代码调试.docx
- 文档编号:14438642
- 上传时间:2023-06-23
- 格式:DOCX
- 页数:2
- 大小:53.22KB
金蝶K3进度03K3WISE插件代码调试.docx
《金蝶K3进度03K3WISE插件代码调试.docx》由会员分享,可在线阅读,更多相关《金蝶K3进度03K3WISE插件代码调试.docx(2页珍藏版)》请在冰点文库上搜索。
金蝶K3进度03K3WISE插件代码调试
1.配置K3业务单据操作时,触发代码调试
2.设置断点
3.触发调试
4.变量跟踪
我们在制作第二个进度案例时,实际上有段代码是通过反复进行代码调试写出来的,并不是轻易就搞定的一件事情。
代码如下:
就是画红框里面的这几句代码经过了我们反复的调试完成的。
而调试前的原始代码是这样写的:
1.配置K3业务单据操作时,触发代码调试
1.1.把进度2的项目复制一份,重命名为“进度3代码调试”
1.2.把其中GridChange事件的代码改写如下:
PrivateSubm_BillTransfer_GridChange(ByValColAsLong,ByValRowAsLong,ByValValueAsVariant,ByValbNewBillAsBoolean,CancelAsBoolean)
'测试下单据头、单据体字段取值
DimRowCountAsInteger
DimRowSumAsLong
DimtWidthAsString
DimtLengthAsString
RowSum=0
Withm_BillTransfer
'面积=长*宽)
.SetGridTextRow,iFEntrySelfS0170,.GetGridText(Row,iFEntrySelfS0168)*.GetGridText(Row,iFEntrySelfS0169)
RowCount=.BillForm.get_MaxEntry
Fori=1ToRowCount
If.GetGridText(i,iFEntrySelfS0170)<>""ThenRowSum=RowSum+CLng(.GetGridText(i,iFEntrySelfS0170))
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 金蝶 K3 进度 03 K3WISE 插件 代码 调试
![提示](https://static.bingdoc.com/images/bang_tan.gif)