金蝶云二开引入excel的方法

需求背景：
部分单据的单据体数据行非常多，在单据维护界面录入效率不高，需要在Excel中录入后导入

技术难点：
1. 如何上传文件？
2. 如何读取上传的Excel文件？

案例设计：
此案例，需要包含两个界面，一个是需要引入单据体的单据A，另外一个，是用于上传文件的动态表单B。

在单据A上：
1. 增加一个菜单，引入单据体；
2. 用户点击引入单据体菜单后，弹出一个新窗口（文件上传动态表单B），供用户上传Excel文件
3. 确定文件上传完毕，调用第三方工具，读取Excel内容为DataSet对象
4. 把DataSet中的数据，逐行、逐字段，填写到单据体中

文件上传动态表单B：
1. 添加一个文件上传控件，设置文件后缀，必须为*.xls
2. 添加确定、取消两个按钮
3. 默认情况下，确定按钮时锁定的，只有上传文件完毕，才解锁

效果示意：
图一：在单据上增加引入单据体菜单

图二：文件上传界面

图三：待引入的单据体数据

示例代码：
//*************************************************************

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.ComponentModel;
using System.Data;

using Kingdee.BOS;
using Kingdee.BOS.Util;
using Kingdee.BOS.JSON;
using Kingdee.BOS.Core;
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.DynamicForm.PlugIn;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.Bill;
using Kingdee.BOS.Core.Bill.PlugIn;
using Kingdee.BOS.Core.Metadata;
using Kingdee.BOS.Core.Metadata.FieldElement;
using Kingdee.BOS.ServiceHelper.Excel;

namespace JDSample.FormPlugIn.Bill
{
/// <summary>
/// 引入单据体
/// </summary>
[Description("引入单据体")]
public class S151209ImportEntryEdit : AbstractBillPlugIn
{
      /// <summary>
      /// 菜单点击事件
      /// </summary>
      /// <param name="e"></param>
      public override void AfterBarItemClick(AfterBarItemClickEventArgs e)
      {
         if (e.BarItemKey.EqualsIgnoreCase("tb_JD_ImportEntry"))
         {
            // 显示文件上传界面，上传Excel文件
            DynamicFormShowParameter showParam = new DynamicFormShowParameter();
            showParam.FormId = "a6fe71c4beda4f7baf60411c4b5f3b3e";
            this.View.ShowForm(showParam,
                  new Action<FormResult>((formResult) =>
                     {
                        if (formResult != null && formResult.ReturnData != null)
                        {
                              string fullFileName = formResult.ReturnData.ToString();
                              this.DoImportEntry(fullFileName);
                        }
                     }));
         }
      }
      /// <summary>
      /// 开始导入单据体
      /// </summary>
      /// <param name="fullFileName">Excel文件</param>
      /// <remarks>
      /// 特别说明：此函数仅演示如何把Excel转换为DataSet，
      /// 并读取DataSet内容，填写到单据体，
      /// 未进行任何的安全处理，实际生产环境，需要对数据的合法性进行严格的判断
      /// </remarks>
      private void DoImportEntry(string fullFileName)
      {
         using (ExcelOperation helper = new ExcelOperation(this.View))
         {
            // 利用ExcelOperation对象，把xml文件，转为DataSet对象
            // 参数说明：
            // filePath : 完整的文件名，包含了物理目录
            // dataStartIndex : 数据开始行索引，从0开始。通常第一行为标题，第二行开始为数据行
            // colNameIndex : 列名所在行索引，从0开始。如此参数为0，表明第一行为列名行
            DataSet ds = helper.ReadFromFile(fullFileName, 1, 0);

            // 取第一个表格中的数据导入
            DataTable dt = ds.Tables[0];
            int rowIndex = this.Model.GetEntryRowCount("FEntity");
            foreach (DataRow dataRow in dt.Rows)
            {
                  // 单据体增加新行，并更新行索引
                  this.Model.CreateNewEntryRow("FEntity");
                  this.Model.SetEntryCurrentRowIndex("FEntity",rowIndex);
                  // 设置基础资料字段值
                  this.Model.SetItemValueByNumber(
                     "F_JD_MaterialId", Convert.ToString(dataRow["物料编码"]), rowIndex);
                  // 设置普通字段值
                  this.Model.SetValue("F_JD_Qty", dataRow["数量"], rowIndex);
                  // TODO : 设置其他字段值，此处略
                  rowIndex++;
            }
         }
      }
}

/// <summary>
/// 上传单据体数据文件
/// </summary>
/// <remarks>
/// 界面说明：
/// 1. 添加一个文件上传控件，设置文件后缀，必须为*.xls
/// 2. 添加确定、取消两个按钮
/// 3. 默认情况下，确定按钮时锁定的，只有上传文件完毕，才解锁
/// </remarks>
[Description("上传单据体数据文件")]
public class S151209ImportFileUpdateEdit : AbstractDynamicFormPlugIn
{
      /// <summary>
      /// 上传上来的文件名：完整的文件名，包含了物理路径
      /// </summary>
      private string _fullFileName = string.Empty;
      public override void AfterBindData(EventArgs e)
      {
         this.View.GetControl("F_JD_BTNOK").Enabled = false;
      }
      /// <summary>
      /// 文件上传完毕，触发此事件：通过此事件获取上传上来的文件名
      /// </summary>
      /// <param name="e"></param>
      public override void CustomEvents(CustomEventsArgs e)
      {
         if (e.Key.EqualsIgnoreCase("F_JD_FileUpdate"))
         {
            this.View.GetControl("F_JD_FileUpdate").SetCustomPropertyValue("NeedCallback", true);
            this.View.GetControl("F_JD_FileUpdate").SetCustomPropertyValue("IsRequesting", false);
            if (e.EventName.EqualsIgnoreCase("FileChanged"))
            {// 文件上传完毕
                  // 取文件上传参数，文件名
                  JSONObject uploadInfo = KDObjectConverter.DeserializeObject<JSONObject>(e.EventArgs);
                  if (uploadInfo != null)
                  {
                     JSONArray json = new JSONArray(uploadInfo["NewValue"].ToString());
                     if (json.Count > 0)
                     {
                        // 取上传的文件名
                        string fileName = (json[0] as Dictionary<string, object>)["ServerFileName"].ToString();
                        this._fullFileName = this.GetFullFileName(fileName);
                        // 解锁确定按钮
                        this.View.GetControl("F_JD_BTNOK").Enabled = true;
                     }
                     else
                     {
                        // 锁定确定按钮
                        this.View.GetControl("F_JD_BTNOK").Enabled = false;
                     }
                  }
            }
         }
      }
      /// <summary>
      /// 按钮点击事件
      /// </summary>
      /// <param name="e"></param>
      public override void ButtonClick(ButtonClickEventArgs e)
      {
         if (e.Key.EqualsIgnoreCase("F_JD_BTNOK"))
         {// 确定
            this.View.ReturnToParentWindow(new FormResult(this._fullFileName));
            this.View.Close();
         }
         else if (e.Key.EqualsIgnoreCase("F_JD_BTNCancel"))
         {// 取消
            this.View.Close();
         }
      }
      /// <summary>
      /// 产生完整的文件名，包含了物理路径
      /// </summary>
      /// <param name="fileName"></param>
      /// <returns></returns>
      private string GetFullFileName(string fileName)
      {
         string dir = "FileUpLoadServices\\UploadFiles";
         return PathUtils.GetPhysicalPath(dir, fileName);
      }
}
}

金蝶云二开引入excel的方法相关推荐

金蝶K3Wise二开常用数据库表
一.单据基础模板 1.ICTransactionType:该表反映了供需链所有单据的总体情况. 2.ICClassType:单据类别表 3.ICTemplate:该表反映了所有单据的表头的详细情况. ...
泛微E9二次开发,对接金蝶云星空，数据同步，表单同步。
文章目录泛微E9二次开发,对接金蝶云星空一.搭建开发环境,引入相关依赖一.创建项目二.配置javaSDK 三.配置项目依赖四.编写测试代码五.配置编译六.resin远程debug配置二 ...
怎么使用win7计算机开方,Excel开方如何计算，excel开n次方的方法
Excel开方如何计算,excel开n次方的方法,excel中平方根和立方根的开方公式还比较好记住,但是excel开n次方的怎么实现的,今天就给大家汇总一下excel开方的几种情况. Excel开方之 ...
金蝶二开凭证生成反写二开单据凭证号
金蝶二开凭证生成反写二开单据凭证号 /*** 凭证生成时反写凭证号*/@Overridepublic void reverseSave(Context ctx, IObjectPK srcBillPK ...
解忧云SMS短信服务平台系统短信发送系统源码全解密随时可以二开无后门
解忧云SMS短信服务平台系统短信发送系统全解密完美版经过一系列修复现在程序已经可以完全使用. 并且是全解密随时可以二开.无后门. 一些bug已经完全修复安装教程数据库配置文件路径 .env ...
微信小程序：二开版优化新紫色UI云开发新款壁纸小程序源码
这是一款由旧版https://airymz.com/3387.html进行优化二开的一个新版本本壁纸表情包头像小程序采用(dcloud云开发)所以无需服务器与域名无需服务器.无需域名.云开发直接上 ...
二开版优化新紫色UI云开发新款壁纸小程序源码支持用户投稿在线审核
本壁纸表情包头像小程序采用(dcloud云开发)所以无需服务器与域名无需服务器.无需域名.云开发直接上线特点:支持用户投稿,后台审核后会发订阅消息给用户提示作品审核状态,增加用户粘性,支持后端修改 ...
金蝶云星空二维码整体解决方案金蝶云星空条码管理系统金蝶ERP移动解决方案金蝶云星空条码扫描金蝶云星空WMS仓库移动扫码金蝶安卓PDA扫码方案金蝶云星空出入库盘点出货条码扫码提供源码
本人在ERP实施公司做顾问四五年,参与企业实施ERP十多个项目,非常熟悉企业ERP流程,在实施过程遇到众多问题,提出了不少根据企业具体情况的解决方案. 最近定制开发了一套适合企业的条 ...
点云配准（二）— python open3d ICP方法
上一节中介绍了点云配准的基础知识.本节将采用python open3d来进行点云配准. open3d安装和点云配准介绍,请参考: Open3d读写ply点云文件_Coding的叶子的博客-CSDN博客 ...

金蝶云二开引入excel的方法

金蝶云二开引入excel的方法相关推荐

最新文章

热门文章