02-Epicor二次开发常用代码

总结自己一年来开发Epicor常常用到的代码，并且也时整理出目录便于以后快速查询。
使用语言：vb.net
有问题可以邮箱交流：328288107@qq.com
本文为本人原创，转载请注明出处

1、获取到的完整的SQL，可以将SQL语句弹出来，用于测试

If oTrans.Session.UserId="19874" Then Epicor.MIS.Pub.PubFun.MsgShow("提示",strSql)

2、EPICOR各种数据的位置

• 1、水晶报表文件位置 \192.168.100.250\EpicorData\CustomReports
• 2、图片位置 \192.168.100.250\EpicorData\CustomReports\mis
• 3、外挂写好的dll存放位置 \192.168.100.250\wwwroot\dll
• 4、客制如有新增加UD表和UD字段，必須增加到文件服務器的記錄表中。
  K:\MIS-Epicor系统\ERP Group\客制资料\Epicor字段使用\Epicor字段使用一览表.xls

3、Form_Load事件中常见的代码（格式化、初始化等）

• 1、禁止Form工具栏的新建、保存、删除、刷新等功能
• 2、隐藏左侧导航栏、模板栏等
  
• 3、初始化Session以及db
  
• 4、界面的Dock铺满状况
  
• 5、日期控件格式化、赋值
  
• 6、Label文字左对齐
  
• 7、界面初始化选中某一界面作为显示界面
  
• 8、控件的宽度、高度设置
  
• 9、窗体最大化
  

4、将DataSet的数据写成XML，供设计水晶报表的数据源（在[管理分析-SD（C）-库存管理-快递对账单]中可以参考）

ds.WriteXML("E:awen\"+name+".xml", XmlWriteMode.WriteSchema)

打印方法

5、将UtraGriew的数据Excel导出

6、系统的常量标志符：vbCrLf等

• vbCrLf 回车/换行字符组合。
• vbCr 回车字符。
• vbLf 换行字符。
• vbNewLine 换行字符。
• vbNullChar 空字符。
• vbNullString 不等于零长度字符串（“”）; 用于调用外部过程。
• vbObjectError 错误号。用户定义的错误号应大于此值。例如： Err.Raise（数字）= vbObjectError + 1000
• vbTab 标签字符。
• vbBack 退格字符。

7、循环表格，并将当中的CheckBox全选、或全取消

8、EPICOR数据字典

在【系统管理-系统维护-数字字典浏览器】可以看到

9、更改菜单的名称

这里只是改中文的，但是如果是更改英文的话，要去【菜单维护】将这里更改掉成想要的英文
然后再在【语言维护】这里新增一个翻译的文本
ERP已经设置底部语言是英文，只能由英翻译为中

10、增加表字段

11、初始下拉选择框的数据（在[管理分析-SD（C）-库存管理-快递对账单]或者资产新增中可以参考）

12、双击后打开其他菜单界面

13、发送邮件

14、查询报表被哪个公司使用了

15、系统适配器方法更新标准字段(参考界面：物料-库存-一般-资产管理-普通资产处置------品质管理-来料检验处理)

16、初始化时候的中英文界面标题

17、抛出自定义异常

18、查询SQL并提示

db.ExecuteSql(sql)
db.ExecuteDt(sql)
db.ExecuteDs(sql)

19、猜测原有的报表样式选择项目

先找到客制化的名称前缀

然后根据前缀到报表样式猜测正确的报表去添加项目即可

20、处理数据为DBNULL的情况，去除DBNULL

if not ISDBNULL(OBJ)

21、页面放置图片（可参考管理分析-DS-生产日报）

放置一个PictureBox,然后代码写如下：

22、SQL写入界面的勾选框

23、PT、DT、IT、ST的数据源

PT直接取LaborDtl里面的数据源
DT、ST取视图LaborTimeCost
IT有两个数据源：LaborTimeCost、
select TOP 100 number01,ShortChar05 from ice.ud21 where key4=‘97’ and key5=‘TITIME’

24、点击查询设备、资源、物料等适配器获取值的方式

常见适配器 ResourceGroupAdapter
ResourceAdapter
EquipAdapter
FAssetAdapter
PartAdapter
JCDeptAdapter
EquipStatusAdapter
EquipLocAdapter
方式一
参考【管理分析-SDC-生产-生产设备追踪】

方式二
参考【物料-库存-一般-资产-外购模具验收】

方式三

方式四 快速搜索（参考来料检验处理）

方式五 通过快速搜索得到值

方式六 使用“眼镜”查询加载数据

25、清空UltraGrid的数据行

26、标准方法修改表的值（有出现当前行已经被修改时的错误）

26、获取DT里面的值

27、移除DataTable的行数据

28、for循环反向

主要需要步长设置为负

29、更新数据库字段后需要重新加载数据（参考外购模具、或者来料检验处理）

有时候使用oTrans.Refresh()无法刷新，则建议使用此方法
先SQL更新

db.ExecuteSql("UPDATE ICE.UD32 SET ShortChar03='20' WHERE Company='" + oTrans.Session.CompanyID + "' AND Key1='" & edvUD32.dataView(edvUD32.Row)("Key1") & "' AND Key5='" + strKey5 + "'")

后重新加载数据

30、获取标准界面的数据

31、用户删除记录，弹出确认窗体后再删除