ERP事业部咨询实施客户化开发部
输入，只能由字母和数字组成。 菜单的多语名称，将在U8左树菜单里显示 如果是文件夹这里选否 如果控制功能权限，这里就选是 这里选择UAP表单
UAP表单时，此项无效。 形如 输入，只能由字母和数字组成。 菜单的多语名称，将在U8左树菜单里显示 如果是文件夹这里选否 如果控制功能权限，这里就选是 这里选择UAP表单 UAP列表时，此项无效。 形如 3、示例代码 具体实例见\\\\U890客开资料\\UAP开发篇Demo \\文件夹下 1.1.7 如何不使用菜单调整工具增加和修改菜单 1.1.7.1 相关表说明 1.1.7.1.1 UA_Menu字段名 AutoID cMenu_Id cMenu_Name cMenu_Eng cSub_Id IGrade cSupMenu_Id bEndGrade cAuth_Id iOrder iImgIndex Paramters Depends Flag 1.1.7.1.2 UFMenu_Business_Lang字段名 MenuId Caption LocaleId 数据类型 Nvarchar64 Nvarchar512 Nvarchar32 表结构 数据类型 uid String String String String Int16 String Boolean String Int32 Int32 String String Int 含义 自动编号 菜单编号，自动产生，不可修改 菜单名称，输入 菜单英文名称 模块标识 级次，根据当前选中菜单程序自动处理 上级菜单编号，根据当前选中菜单程序自动处理 是否末级，输入 功能权限编号，程序内部处理，控制权限时有效 显示顺序号，程序处理 图标索引号，暂不用 参数，输入，只有末级菜单才允许录入参数 依赖，暂不用 标志，暂不用 表结构（菜单的多语表） 含义 菜单标识，对应UA_Menu表的cMenu_Id值 菜单显示名称（简体中文名称显示的是UA_Menu表的cMenu_Name值） 语言区域 ZH-CN――简体中文 ZH-TW――繁体中文 第17页 共 329页 ERP事业部咨询实施客户化开发部 EN-US――英文 注：U8的系统菜单在UFSystem库里，UAP新增或者菜单调整工具新增的菜单在UFData库里，二次开发增加的菜单也要求在UFData库里。 1.1.7.1 示例 具体实例见\\\\U890客开资料\\U8基础开发篇Demo\\门户\\文件夹下 1.2 界面设计与开发 1.2.1 单据开发 1.2.1.1 功能介绍 单据控件实现各业务产品组中各单据的数据处理，该控件实现数据分层处理。单据控件以 OCX提供给各个业务模块使用（包括WEB组），业务组在使用前初始化单据控件，最终业务模块从单据控件取得数据按各自的业务规则检查合法后保存。 U890版本的单据控件有以下新特性： ? 支持Web ? 对后台数据实现分层处理 ? 支持各种模版样式 ? 支持无表体单据样式 ? 支持无表头单据样式 ? 数据更新状态智能标记 ? 支持表头、表体附件 ? 表体汇总 ? 表体批量修改 1.2.1.2 使用环境 支持环境为U890以上版本 1.2.1.3 使用说明 在VB中引用单据控件 在VB中点击主菜单中的“工程->部件”或者直接按Ctrl+T热键，随后出现的“部件”对话框中选中“UAPVoucherControl85”，然后点击“确定”，左侧的工具条中将出现该控件的图 第18页 共 329页 ERP事业部咨询实施客户化开发部 标，如下图所示： OCX文件的方法函数图例如下： 单据控件的主要属性: 第19页 共 329页 ERP事业部咨询实施客户化开发部 ? BackColor,BackColorBkg,BackColorFixed,BackColorSel,BackColorTotal属性： 返回或设置单据控件不同的背景颜色 语法: voucher.BackColor [=color] voucher.BackColorBkg [=color] voucher. [=color] voucher.Back BackColorFixed ColorSel [=color] voucher.BackColorTotal [=color] 参数说明: 参数 Voucher Color 备注: 下图为Voucher属性设置效果 描述 单据控件名称 一个指定的颜色值 举例： Note：如要设置这些属性值，必需在设置完模板数据后再设置才能起作用。 Private Sub Form_Load () Timer1.Interval =500 End Sub Private Sub Timer1_Timer () Voucher1.BackColorBkg =QBColor(Rnd * 15) Voucher1.BackColorFixed =QBColor(Rnd * 10) Voucher1.BackColorSel =QBColor(Rnd * 10) Voucher1.BackColorSelTotal =QBColor(Rnd * 10) End Sub ? Col, Row,ColSel,RowSel 属性 第20页 共 329页