Develop/PiolotTH_ReportFrom
9
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
李狗蛋
2025-06-03 13:44:45 +08:00
parent c9a8a895d3
commit 470016f428
20 changed files with 2428 additions and 95 deletions
Download Patch File Download Diff File Expand all files Collapse all files

467
YSKDZGongNeng_JY/LiteVersionPlugIn.cs Normal file
View File

@@ -0,0 +1,467 @@
using Kingdee.BOS.App.Data;
using Kingdee.BOS.Core;
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.Report;
using Kingdee.BOS.Core.Report.PlugIn;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.Util;
using NPOI.HSSF.Util;
using NPOI.SS.Formula.Functions;
using NPOI.SS.UserModel;
using NPOI.SS.Util;
using NPOI.XSSF.UserModel;
using System;
using System.ComponentModel;
using System.Data;
using System.IO;
using System.Linq;
using System.Security.Cryptography;
namespace Pilot.Report.Exploitation.AccountsReceivable
{
/// <summary>
/// 【表单插件】简易版-按钮触发
/// </summary>
[Description("【表单插件】简易版-按钮触发-导出EXCEL"), HotUpdate]
public class LiteVersionPlugIn : AbstractSysReportPlugIn
{
public override void BarItemClick(BarItemClickEventArgs e)
{
base.BarItemClick(e);
// 判断 应收对账单【简易版】按钮
if (e.BarItemKey == "Test_Button_1")
{
string FPath = "应收账款对账单【简易版】.xlsx";
// 在临时文件目录，生成一个完整的文件名: C:\Program Files\Kingdee\K3Cloud\WebSite\...\JD.xls
string filePath = PathUtils.GetPhysicalPath(KeyConst.TEMPFILEPATH, Path.GetFileName(FPath));
// 生成一个供用户下载文件的url地址: http:\\localhost\K3Cloud\...\JD.xls
string fileUrl = PathUtils.GetServerPath(KeyConst.TEMPFILEPATH, Path.GetFileName(FPath));
//打开文件下载界面
DynamicFormShowParameter showParameter = new DynamicFormShowParameter();
showParameter.FormId = "BOS_FileDownload";
showParameter.OpenStyle.ShowType = ShowType.Modal;
showParameter.CustomComplexParams.Add("url", fileUrl);
//显示
this.View.ShowForm(showParameter);
var reportModel = this.SysReportModel;
//单据头
var rptTitles = reportModel.ReportTitles;
string fClient = rptTitles.FirstOrDefault(a => a.TitleKey == "FClient").TitleValue.ToString();
string fDate = rptTitles.FirstOrDefault(a => a.TitleKey == "FDate").TitleValue.ToString();
string fProject = rptTitles.FirstOrDefault(a => a.TitleKey == "FProject").TitleValue.ToString();
string FState = rptTitles.FirstOrDefault(a => a.TitleKey == "FState").TitleValue.ToString();
//单据体
var list = reportModel.DataSource.Rows;
string sqlTest = string.Format(@"/*dialect*/Select FAmount,FDate From MBBA_t_Cust100006 Where Month(FDATE) = Month(DATEADD(MONTH, -1, '{0}'))", fDate);
var sqlTestList = DBUtils.ExecuteDynamicObject(Context, sqlTest);
int Num = 0;
decimal fAmount = 0;
string fDate2 = "";
if (sqlTestList.Count() > 0)
{
Num = 1;
fAmount = Math.Round(Convert.ToDecimal(sqlTestList[0]["FAmount"]),2);
fDate2 = sqlTestList[0]["FDate"].ToString().Split(' ')[0];
}
Main(filePath, fClient, fDate, fProject, list, Num, fAmount, fDate2, Context);
}
}
/// <summary>
/// 赋值EXCEL
/// </summary>
static void Main(string outputFilePath, string fClient, string fDate, string fProject, DataRowCollection list, int Num, decimal fAmount,string fDate2, Kingdee.BOS.Context Context)
{
#region Excel代码
string filePath = @"D:\KingdeeModel\对账单模板.xlsx";
FileStream file = new FileStream(filePath, FileMode.Open, FileAccess.Read);
IWorkbook workbook = new XSSFWorkbook(file);
file.Close();
//获取工作簿中的第一个工作表（索引为0）
ISheet sheet = workbook.GetSheetAt(0);
#endregion
#region 单元格样式
// 创建一个单元格样式-------------------------------
ICellStyle cellStyle = workbook.CreateCellStyle();
// 设置边框样式
cellStyle.BorderTop = BorderStyle.Thin;
cellStyle.BorderBottom = BorderStyle.Thin;
cellStyle.BorderLeft = BorderStyle.Thin;
cellStyle.BorderRight = BorderStyle.Thin;
// 设置水平居中对齐
cellStyle.Alignment = HorizontalAlignment.Center;
// 设置垂直居中对齐
cellStyle.VerticalAlignment = VerticalAlignment.Center;
// 创建一个单元格样式---------------------------------
ICellStyle cellStyle2 = workbook.CreateCellStyle();
// 设置边框样式
cellStyle2.BorderTop = BorderStyle.Thin;
cellStyle2.BorderBottom = BorderStyle.Thin;
cellStyle2.BorderLeft = BorderStyle.Thin;
cellStyle2.BorderRight = BorderStyle.Thin;
// 创建单元格样式---------------------------------------
ICellStyle style = workbook.CreateCellStyle();
// 设置边框样式
style.BorderTop = BorderStyle.Thin;
style.BorderBottom = BorderStyle.Thin;
style.BorderLeft = BorderStyle.Thin;
style.BorderRight = BorderStyle.Thin;
// 创建字体并设置为加粗
IFont font = workbook.CreateFont();
font.IsBold = true; // 设置字体加粗
// 将字体应用到单元格样式
style.SetFont(font);
// 创建单元格样式---------------------------------------
ICellStyle style2 = workbook.CreateCellStyle();
// 创建字体并设置为加粗
IFont font2 = workbook.CreateFont();
font2.IsBold = true; // 设置字体加粗
// 将字体应用到单元格样式
style2.SetFont(font2);
// 创建一个单元格样式-------------------------------
ICellStyle style3 = workbook.CreateCellStyle();
// 设置边框样式
style3.BorderTop = BorderStyle.Thin;
style3.BorderBottom = BorderStyle.Thin;
style3.BorderLeft = BorderStyle.Thin;
style3.BorderRight = BorderStyle.Thin;
// 设置水平居中对齐
style3.Alignment = HorizontalAlignment.Center;
// 设置垂直居中对齐
style3.VerticalAlignment = VerticalAlignment.Center;
// 创建字体并设置为加粗
IFont font3 = workbook.CreateFont();
font3.IsBold = true; // 设置字体加粗
// 将字体应用到单元格样式
style3.SetFont(font3);
#endregion
#region 获取金额汇总数据
decimal YFHpriceSum = 0;
decimal YFPpriceSum = 0;
decimal priceSum = 0;
for (var i = 0; i < list.Count; i++)
{
if (list[i]["Number"].ToString() == "合计")
{
YFHpriceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]), 2);
YFPpriceSum = Math.Round(Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
priceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]) + Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
}
}
#endregion
#region 四行一列修改/六行二列修改/十一行一列修改/十二行一列修改
IRow row = sheet.GetRow(3);
IRow row2 = sheet.GetRow(5);
IRow row22 = sheet.GetRow(6);
IRow ro = sheet.GetRow(11);
ICell cell = row.GetCell(0);
ICell cell2 = row2.GetCell(1);
ICell cell22 = row22.GetCell(8);
ICell cel3 = ro.GetCell(0);
IRow row3 = sheet.GetRow(10);
ICell cell3 = row3.GetCell(0);
//将新创建或获取的单元格的值修改
cell22.SetCellValue("");
var YFHpriceSumZW = ToChineseNumber(YFHpriceSum, Context);
cell3.SetCellValue("贵公司截至 " + fDate + " 共欠我公司货款金额为：" + YFHpriceSum + "元【等于已发货欠款总额】（大写：" + YFHpriceSumZW + "）");
//将新创建或获取的单元格的值修改
cell.SetCellValue("尊敬的 " + fClient + " 客户您好，我公司已根据合同/订单的要求向贵公司交付相关产品并请验收确认，鉴于我公司对贵公司已通知发货部分的交付义务已完成，");
cell2.SetCellValue(fClient);
var fAmountZW = ToChineseNumber(fAmount, Context);
if (Num > 0)
{
cel3.SetCellValue("其中上期（截止" + fDate2 + "共欠我公司货款金额为：" + fAmount + "元（大写：" + fAmountZW + "）");
}
else
{
cel3.SetCellValue("");
}
#endregion
#region 明细赋值
// 将字体应用到单元格样式
style2.SetFont(font2);
int n = 14;
for (var i = 0; i < list.Count; i++)
{
string date = string.IsNullOrWhiteSpace(list[i]["DATE"].ToString()) ? "" : list[i]["DATE"].ToString().Split(' ')[0];
decimal OrderAmount = Math.Round(Convert.ToDecimal(list[i]["OrderAmount"]), 2);
decimal ShipmentsAmount = Math.Round(Convert.ToDecimal(list[i]["ShipmentsAmount"]), 2);
decimal FBillAllAmount = Math.Round(Convert.ToDecimal(list[i]["FBillAllAmount"]), 2);
decimal OrdeFALLAMOUNTFORrAmount = Math.Round(Convert.ToDecimal(list[i]["FALLAMOUNTFOR"]), 2);
decimal PaymentAmount = Math.Round(Convert.ToDecimal(list[i]["PaymentAmount"]), 2);
decimal ShippedDebt = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]), 2);
decimal InvoicedDebt = Math.Round(Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
IRow rowi = sheet.CreateRow(13 + i);
ICell c1 = rowi.CreateCell(0); c1.SetCellValue(list[i]["Number"].ToString()); c1.CellStyle = cellStyle;
ICell c2 = rowi.CreateCell(1); c2.SetCellValue(""+date+""); c2.CellStyle = cellStyle2;
ICell c3 = rowi.CreateCell(2); c3.SetCellValue(list[i]["CONTRACTNUMBER"].ToString()); c3.CellStyle = cellStyle2;
ICell c4 = rowi.CreateCell(3); c4.SetCellValue(list[i]["ProjectName"].ToString()); c4.CellStyle = cellStyle2;
ICell c5 = rowi.CreateCell(4); c5.SetCellValue(""+ OrderAmount + ""); c5.CellStyle = cellStyle;
ICell c6 = rowi.CreateCell(5); c6.SetCellValue("" + ShipmentsAmount + ""); c6.CellStyle = cellStyle;
ICell c7 = rowi.CreateCell(6); c7.SetCellValue("" + FBillAllAmount + ""); c7.CellStyle = cellStyle;
ICell c8 = rowi.CreateCell(7); c8.SetCellValue("" + OrdeFALLAMOUNTFORrAmount + ""); c8.CellStyle = cellStyle;
ICell c9 = rowi.CreateCell(8); c9.SetCellValue("" + PaymentAmount + ""); c9.CellStyle = cellStyle;
ICell c10 = rowi.CreateCell(9); c10.SetCellValue("" + ShippedDebt + ""); c10.CellStyle = cellStyle;
ICell c11 = rowi.CreateCell(10); c11.SetCellValue("" + InvoicedDebt + ""); c11.CellStyle = cellStyle;
ICell c12 = rowi.CreateCell(11); c12.SetCellValue(list[i]["IsEnded"].ToString()); c12.CellStyle = cellStyle;
ICell c13 = rowi.CreateCell(12); c13.SetCellValue(list[i]["Remark"].ToString()); c13.CellStyle = cellStyle2;
n++;
if(list[i]["Number"].ToString() == "合计")
{
c1.CellStyle = style3;
c2.CellStyle = style3;
c3.CellStyle = style3;
c4.CellStyle = style3;
c5.CellStyle = style3;
c6.CellStyle = style3;
c7.CellStyle = style3;
c8.CellStyle = style3;
c9.CellStyle = style3;
c10.CellStyle = style3;
c11.CellStyle = style3;
c12.CellStyle = style3;
c13.CellStyle = style3;
}
}
#endregion
#region 赋值汇总数据行
//获取工作簿中的第一个工作表（索引为1）
ISheet sheet2 = workbook.GetSheetAt(1);
IRow rr1 = sheet2.GetRow(15);
IRow rr2 = sheet2.GetRow(16);
IRow rr3 = sheet2.GetRow(17);
ICell cc1 = rr1.GetCell(6);
ICell cc2 = rr2.GetCell(6);
ICell cc3 = rr3.GetCell(6);
cc1.SetCellValue("" + YFHpriceSum + "");
cc2.SetCellValue("" + YFPpriceSum + "");
cc3.SetCellValue("" + priceSum + "");
#endregion
#region 明细行后模板赋值
IRow R1 = sheet2.GetRow(15);
IRow R2 = sheet2.GetRow(16);
IRow R3 = sheet2.GetRow(17);
IRow R4 = sheet2.GetRow(18);
IRow R5 = sheet2.GetRow(19);
IRow R6 = sheet2.GetRow(20);
IRow R7 = sheet2.GetRow(21);
IRow r1 = sheet.CreateRow(n);
IRow r2 = sheet.CreateRow(n + 1);
IRow r3 = sheet.CreateRow(n + 2);
IRow r4 = sheet.CreateRow(n + 3);
IRow r5 = sheet.CreateRow(n + 4);
IRow r6 = sheet.CreateRow(n + 5);
IRow r7 = sheet.CreateRow(n + 6);
//第一行
for (int i = 0; i < R1.LastCellNum; i++)
{
var test1 = "";
if (R1.GetCell(i) != null)
{
test1 = R1.GetCell(i).ToString();
}
ICell CR1 = r1.CreateCell(i);
CR1.SetCellValue(test1);
if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
{
CR1.CellStyle = style;
}
else
{
CR1.CellStyle = style2;
}
}
//第二行
for (int i = 0; i < R2.LastCellNum; i++)
{
var test1 = "";
if (R2.GetCell(i) != null)
{
test1 = R2.GetCell(i).ToString();
}
ICell CR1 = r2.CreateCell(i);
CR1.SetCellValue(test1);
if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
{
CR1.CellStyle = style;
}
else
{
CR1.CellStyle = style2;
}
}
//第三行
for (int i = 0; i < R3.LastCellNum; i++)
{
var test1 = "";
if (R3.GetCell(i) != null)
{
test1 = R3.GetCell(i).ToString();
}
ICell CR1 = r3.CreateCell(i);
CR1.SetCellValue(test1);
if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
{
CR1.CellStyle = style;
}
else
{
CR1.CellStyle = style2;
}
}
//第四行
for (int i = 0; i < R4.LastCellNum; i++)
{
var test1 = "";
if (R4.GetCell(i) != null)
{
test1 = R4.GetCell(i).ToString();
}
ICell CR1 = r4.CreateCell(i);
CR1.SetCellValue(test1);
CR1.CellStyle = style2;
}
//第五行
for (int i = 0; i < R5.LastCellNum; i++)
{
var test1 = "";
if (R5.GetCell(i) != null)
{
test1 = R5.GetCell(i).ToString();
}
ICell CR1 = r5.CreateCell(i);
CR1.SetCellValue(test1);
if (i >= 4)
{
CR1.CellStyle = style2;
}
}
//第六行
for (int i = 0; i < R6.LastCellNum; i++)
{
var test1 = "";
if (R6.GetCell(i) != null)
{
test1 = R6.GetCell(i).ToString();
}
ICell CR1 = r6.CreateCell(i);
CR1.SetCellValue(test1);
if (i >= 4)
{
CR1.CellStyle = style2;
}
}
//第七行
for (int i = 0; i < R7.LastCellNum; i++)
{
var test1 = "";
if (R7.GetCell(i) != null)
{
test1 = R7.GetCell(i).ToString();
}
ICell CR1 = r7.CreateCell(i);
CR1.SetCellValue(test1);
if (i >= 4)
{
CR1.CellStyle = style2;
}
}
//合并单元格
for (int i = 0; i < 7; i++)
{
// 合并单元格的起始行、结束行、起始列和结束列
int firstRow = n + i; // 比如第一行
int lastRow = n + i; // 合并到第三行（0-based index）
int firstCol = 4; // 比如第一列
int firstCol2 = 7; // 比如第一列
int firstCol3 = 0; // 比如第一列
int lastCol = 5; // 合并到第三列（0-based index）
int lastCol2 = 9; // 合并到第三列（0-based index）
int lastCol3 = 3; // 合并到第三列（0-based index）
// 创建CellRangeAddress对象
CellRangeAddress cellRangeAddress = new CellRangeAddress(firstRow, lastRow, firstCol, lastCol);
CellRangeAddress cellRangeAddress2 = new CellRangeAddress(firstRow, lastRow, firstCol2, lastCol2);
CellRangeAddress cellRangeAddress3 = new CellRangeAddress(firstRow, lastRow, firstCol3, lastCol3);
// 合并单元格
sheet.AddMergedRegion(cellRangeAddress);
sheet.AddMergedRegion(cellRangeAddress2);
sheet.AddMergedRegion(cellRangeAddress3);
}
#endregion
#region Excel代码2
string folderPath = Path.GetDirectoryName(outputFilePath);
if (!Directory.Exists(folderPath))
{
Directory.CreateDirectory(folderPath);
}
FileStream exportFile = new FileStream(outputFilePath, FileMode.Create, FileAccess.Write);
workbook.Write(exportFile);
exportFile.Close();
#endregion
}
public static string ToChineseNumber(decimal number, Kingdee.BOS.Context Context)
{
//Select top 1 dbo.ConvertAmountToChineseWords(12345.14) as 'PriceText' From T_SAL_ORDER
string sql = string.Format(@"/*dialect*/Select top 1 dbo.ConvertAmountToChineseWords({0}) as 'PriceText' From T_SAL_ORDER", number);
var list = DBUtils.ExecuteDynamicObject(Context, sql);
return list[0]["PriceText"].ToString();
}
}
}

71
YSKDZGongNeng_JY/ProgramNumber.cs Normal file
View File

@@ -0,0 +1,71 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace Pilot.Report.Exploitation.AccountsReceivable
{
public class ProgramNumber
{
public static void Main()
{
decimal number = 1234567.89m;
string chineseNumber = ToChineseNumber(number);
Console.WriteLine($"数字 {number} 的中文大写数字是：{chineseNumber}");
}
public static string ToChineseNumber(decimal number)
{
// 定义数字和单位
string[] digits = { "零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖" };
string[] units = { "", "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿" };
// 将数字转换为整数和小数部分
string numberStr = number.ToString("N2").Replace(",", ""); // 去掉千分位分隔符
string[] parts = numberStr.Split('.');
string integerPart = parts[0];
string decimalPart = parts.Length > 1 ? parts[1] : "00";
// 处理整数部分
string result = "";
for (int i = 0; i < integerPart.Length; i++)
{
int digit = int.Parse(integerPart[integerPart.Length - i - 1].ToString());
int unitIndex = integerPart.Length - i - 1;
if (digit != 0)
{
result = digits[digit] + units[unitIndex] + result;
}
else
{
result = "零" + result;
}
}
// 处理小数部分
if (decimalPart != "00")
{
result += "点";
foreach (char c in decimalPart)
{
result += digits[int.Parse(c.ToString())];
}
}
// 去掉多余的零
result = result.Replace("零零", "零").Replace("零万", "万").Replace("零亿", "亿");
if (result.StartsWith("零"))
{
result = result.Substring(1);
}
if (result.EndsWith("零"))
{
result = result.Substring(0, result.Length - 1);
}
return result;
}
}
}

115
YSKDZGongNeng_JY/YourDataPlugIn.cs Normal file
View File

@@ -0,0 +1,115 @@
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.Report.PlugIn;
using Kingdee.BOS.Util;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using Kingdee.BOS.App.Data;
namespace Pilot.Report.Exploitation.AccountsReceivable
{
/// <summary>
/// 【表单插件】简易版-确认按钮
/// </summary>
[Description("【表单插件】简易版-确认按钮-添加数据库"), HotUpdate]
public class YourDataPlugIn: AbstractSysReportPlugIn
{
public override void BarItemClick(BarItemClickEventArgs e)
{
base.BarItemClick(e);
// 判断 应收对账单【简易版】确认生成单据按钮
if (e.BarItemKey == "Test_Button_2")
{
#region 应收账款对账单数据添加
var reportModel = this.SysReportModel;
//单据头
var rptTitles = reportModel.ReportTitles;
string fClient = rptTitles.FirstOrDefault(a => a.TitleKey == "FClient").TitleValue.ToString();
string fDate = rptTitles.FirstOrDefault(a => a.TitleKey == "FDate").TitleValue.ToString();
int creatorId = Convert.ToInt32(this.Context.UserId);
DateTime fDate2 = DateTime.Now;
//单据体
var list = reportModel.DataSource.Rows;
string sqlKH = string.Format(@"/*dialect*/Select FCUSTID From T_BD_CUSTOMER_L Where FNAME = '{0}'", fClient);
var sqlKHList = DBUtils.ExecuteDynamicObject(Context, sqlKH);
int fClientId = Convert.ToInt32(sqlKHList[0]["FCUSTID"]);
string sqlTest = string.Format(@"/*dialect*/Select * From MBBA_t_Cust100006 Where FClient = '{0}' AND Month(FDATE) = Month('{1}')", fClientId, fDate);
var sqlTestList = DBUtils.ExecuteDynamicObject(Context, sqlTest);
if (sqlTestList.Count() == 0)
{
decimal YFHpriceSum = 0;
for (var i = 0; i < list.Count; i++)
{
if (list[i]["Number"].ToString() == "合计")
{
YFHpriceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]), 2);
}
}
string sqlSelect = string.Format(@"/*dialect*/Select top 1 FId,FBillNo From MBBA_t_Cust100006 Order By FID DESC");
var sqlSelectList = DBUtils.ExecuteDynamicObject(Context, sqlSelect);
int FId = 1;
string FBillNo = "YSDZ0001";
string FBillNoSplit = "";
if (sqlSelectList.Count > 0)
{
FId = sqlSelectList[0]["FId"].Long2Int();
FId = FId + 1;
FBillNoSplit = sqlSelectList[0]["FBillNo"].ToString();
int n = Convert.ToInt32(FBillNoSplit.Split('Z')[1]);
if (n < 1000)
{
FBillNo = "YSDZ" + "0" + (n + 1);
}
else if (n < 100)
{
FBillNo = "YSDZ" + "00" + (n + 1);
}
else if (n < 10)
{
FBillNo = "YSDZ" + "000" + (n + 1);
}
}
string sql = string.Format(@"Insert into MBBA_t_Cust100006 Values('{5}','{6}','A','{3}','{4}','',null,'{0}','{1}','{2}')",
fClientId, fDate, YFHpriceSum, creatorId, fDate2, FId, FBillNo);
int num = DBUtils.Execute(Context, sql);
if (num > 0)
{
this.View.ShowMessage("应收账款对账单生成完毕，已存储数据库！");
}
else
{
this.View.ShowErrMessage("数据添加失败！");
}
}
else
{
this.View.ShowErrMessage("数据添加失败，已存在相同客户相同期间的对账单！");
}
#endregion
}
}
}
}