using NPOI.SS.Util; using System; using System.Collections.Generic; using System.Data; using System.Drawing; using System.Text; using System.Text.RegularExpressions; using System.Windows.Forms; using UAS_LabelMachine.Entity; using UAS_LabelMachine.PublicMethod; namespace UAS_LabelMachine { public partial class 生成条码 : Form { AutoSizeFormClass asc = new AutoSizeFormClass(); DataHelper dh; DataTable dt; StringBuilder sql = new StringBuilder(); string pi_id; //用于提示超出数量的物料 Dictionary NotPass = new Dictionary(); //前缀条件 string Prefix = ""; string Suffix = ""; //生成条码的流水号 int serialnum = 0; //客户的流水号 int custserialnum = 0; //是否生成过条码 bool FirstCode = false; //客户编号 string CustCode = ""; //编码规则编号 string NrCode = ""; string DataType = ""; public 生成条码(string PI_INOUTNO) { InitializeComponent(); pi_inoutno.Text = PI_INOUTNO; } public 生成条码(string PI_INOUTNO, string type) { InitializeComponent(); pi_inoutno.Text = PI_INOUTNO; DataType = type; } private void 生成条码_Load(object sender, EventArgs e) { dh = SystemInf.dh; ChooseAll.ChooseAll(ProdIoInfDGV); //如果传进了出入库单号则默认执行一次取数据 if (pi_inoutno.Text != "") { bi_inoutno_KeyDown(sender, new KeyEventArgs(Keys.Enter)); } pr_kind.Text = "全部"; asc.controllInitializeSize(this); Width = Width - 1; } private void bi_inoutno_KeyDown(object sender, KeyEventArgs e) { if (e.KeyCode == Keys.Enter) { LoadData(); } } private void 生成条码_SizeChanged(object sender, EventArgs e) { asc.controlAutoSize(this); } /// /// 筛选按钮 /// /// /// private void Screen_Click(object sender, EventArgs e) { bi_inoutno_KeyDown(sender, new KeyEventArgs(Keys.Enter)); } /// /// 生成条码 /// /// /// private void GenerateBarCode_Click(object sender, EventArgs e) { try { //获取编码规则 DataTable Nr = (DataTable)dh.ExecuteSql("select nrd_detno,nrd_name,nrd_type,nrd_radix,nrd_sql,nrd_length,nr_code,nvl(nrd_iscombine,-1)nrd_iscombine from NoRuleDetail left join norule on nrd_nrid=nr_id where nr_custcode='" + CustCode + "' order by nrd_detno", "select"); //如果没有则取公共规则 if (Nr.Rows.Count == 0) Nr = (DataTable)dh.ExecuteSql("select nrd_detno,nrd_name,nrd_radix,nrd_type,nrd_sql,nrd_length,nr_code,nvl(nrd_iscombine,-1)nrd_iscombine from NoRuleDetail left join norule on nrd_nrid=nr_id where nr_custcode is null and nr_isdefault <> 0 order by nrd_detno", "select"); //用于过滤参数的正则表达式 if (Nr.Rows.Count > 0) { NrCode = Nr.Rows[0]["nr_code"].ToString(); } Regex match = new Regex("{\\w+}"); //用于存放每一项的明细的数据 string[] NrData = new string[Nr.Rows.Count]; //流水号的索引 int SerialNumIndex = 0; //流水长度 int SerialNumLength = 0; //存放键值对 int Radix = 10; string PrefixFixed = ""; for (int m = 0; m < Nr.Rows.Count; m++) { switch (Nr.Rows[m]["nrd_type"].ToString()) { //常量直接进行拼接 case "常量": NrData[m] = Nr.Rows[m]["nrd_sql"].ToString(); Prefix += NrData[m]; Suffix += NrData[m]; break; case "SQL": string SQL = Nr.Rows[m]["nrd_sql"].ToString(); DataTable Temp; //如果不包含参数替换 if (SQL.IndexOf("{") == 0) { Temp = (DataTable)dh.ExecuteSql(SQL, "select"); } else { //替换参数后重新执行SQL foreach (Match mch in match.Matches(SQL)) { SQL = SQL.Replace(mch.Value.Trim(), "'" + pi_inoutno.Text + "'"); } Temp = (DataTable)dh.ExecuteSql(SQL, "select"); } if (Temp.Rows.Count > 0) { NrData[m] = Temp.Rows[0][0].ToString(); Prefix += NrData[m]; Suffix += NrData[m]; } else { NrData[m] = ""; Prefix += NrData[m]; Suffix += NrData[m]; } break; //流水需要通过MaxNumber去取 case "流水": NrData[m] = dh.getFieldDataByCondition("RuleMaxNum", "rmn_maxnumber", "rmn_nrcode='" + NrCode + "'").ToString(); Suffix = ""; PrefixFixed = Prefix; //设置当前流水 custserialnum = int.Parse(NrData[m] == "" ? "0" : NrData[m]); SerialNumIndex = m; SerialNumLength = int.Parse(Nr.Rows[m]["nrd_length"].ToString()); Radix = int.Parse(Nr.Rows[m]["nrd_radix"].ToString()); break; default: break; } } //获取最大的流水号 string maxnum = dh.getFieldDataByCondition("RuleMaxNum", "rmn_maxnumber", "rmn_nrcode='" + NrCode + "' and rmn_prefix='" + Prefix + "'").ToString(); //如果流水号为空则插入一条新记录,从1开始取 if (maxnum == "") { dh.ExecuteSql("insert into RuleMaxNum(rmn_id,rmn_nrcode,rmn_prefix,rmn_maxnumber) values(RuleMaxNum_seq.nextval,'" + NrCode + "','" + Prefix + "','1')", "insert"); custserialnum = 1; } //如果流水号不为空则取当前流水 else { custserialnum = int.Parse(maxnum); } //有错误需要提醒的内容 int CheckedRowCount = 0; string ErrRowIndex = ""; //遍历整个Grid,勾选的项目全部进行条码生成 for (int i = 0; i < ProdIoInfDGV.RowCount; i++) { if (ProdIoInfDGV.Rows[i].Cells["Choose"].FormattedValue.ToString() == "True") { CheckedRowCount++; List pib_inqty = new List(); string pd_id = ProdIoInfDGV.Rows[i].Cells["pd_id"].FormattedValue.ToString(); string pd_prodcode = ProdIoInfDGV.Rows[i].Cells["pd_prodcode"].FormattedValue.ToString(); string pr_id = ProdIoInfDGV.Rows[i].Cells["pr_id"].FormattedValue.ToString(); string pd_ordercode = ProdIoInfDGV.Rows[i].Cells["pd_ordercode"].FormattedValue.ToString(); string pd_pdno = ProdIoInfDGV.Rows[i].Cells["pd_pdno"].FormattedValue.ToString(); string pd_orderdetno = ProdIoInfDGV.Rows[i].Cells["pd_orderdetno"].FormattedValue.ToString(); string pr_brand = ProdIoInfDGV.Rows[i].Cells["pr_brand"].FormattedValue.ToString(); //总数 decimal pd_totalqty = decimal.Parse(ProdIoInfDGV.Rows[i].Cells["pd_totalqty"].FormattedValue.ToString()); //本次数量 decimal pd_qty = decimal.Parse(ProdIoInfDGV.Rows[i].Cells["pd_qty"].FormattedValue.ToString()); //最小包装数 decimal pr_zxbzs = decimal.Parse(ProdIoInfDGV.Rows[i].Cells["pr_zxbzs"].FormattedValue.ToString()); //中盒容量 int mid_qty; try { mid_qty = int.Parse(ProdIoInfDGV.Rows[i].Cells["mid_qty"].FormattedValue.ToString()); } catch (Exception) { MessageBox.Show("请检查中盒容量"); return; } //如果中盘盒数量为1且有尾数则表示一箱未装满 int mid_num = int.Parse(ProdIoInfDGV.Rows[i].Cells["mid_num"].FormattedValue.ToString()); //中盒尾数 decimal mid_remain = decimal.Parse(ProdIoInfDGV.Rows[i].Cells["mid_remain"].FormattedValue.ToString()); string pib_barcode = dh.getFieldDataByCondition("prodiobarcode", "max(pib_barcode)", "PIB_INOUTNO='" + pi_inoutno.Text + "'").ToString(); //中盒数量*中盒容量=需要打印的单盘标签 ArrayList midcode = new ArrayList(); ArrayList barcode = new ArrayList(); ArrayList custbarcode = new ArrayList(); decimal restqty1 = 0; if (ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value != null && ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value.ToString() != "") { string[] restqty = ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value.ToString().Split(','); for (int k = 0; k < restqty.Length; k++) { string mid_code = dh.getFieldDataByCondition("PRODIOBARCODE", "nvl(max(to_number(PIB_OUTBOXCODE1)),0)+1", "PIB_INOUTNO='" + pi_inoutno.Text + "'").ToString(); decimal.TryParse(restqty[k], out restqty1); barcode.Add(BarcodeMethod1(pd_id, pr_id, pib_barcode)); custbarcode.Add(BarcodeMethod1(PrefixFixed, Suffix, SerialNumIndex, SerialNumLength, Radix)); midcode.Add(mid_code); pib_inqty.Add(restqty1.ToString()); //剩余生成的数量需要减掉尾数 } } //循环中盒号的个数,取当前出入库单最大 的中盒号+1 for (int j = 0; j < mid_num; j++) { //获取中盘的编号 string mid_code = dh.getFieldDataByCondition("PRODIOBARCODE", "nvl(max(to_number(PIB_OUTBOXCODE1)),0)+" + (j + 1), "PIB_INOUTNO='" + pi_inoutno.Text + "'").ToString(); //如果尾数不为0,并且已经遍历到了最后一箱(未装满的箱) int count = 0; decimal AddNum = pr_zxbzs; if (mid_remain != 0 && j + 1 == mid_num) { //剩下的尾数刚好够整数的最小包或者加上一个未装满的最小包 int num = 0; if (int.TryParse((mid_remain % pr_zxbzs).ToString(), out num)) { //如果小于最小包装数就是一条尾数 if (mid_remain > pr_zxbzs) { if (mid_remain % pr_zxbzs != 0) count = int.Parse(Math.Floor(mid_remain / pr_zxbzs).ToString()) + 1; else count = int.Parse(Math.Floor(mid_remain / pr_zxbzs).ToString()); } else count = 1; } else { count = int.Parse(Math.Ceiling(mid_remain / pr_zxbzs).ToString()); } } else { //循环中盒的箱内容量 count = mid_qty; } for (int k = 0; k < count; k++) { //将箱号添加进List barcode.Add(BarcodeMethod1(pd_id, pr_id, pib_barcode)); custbarcode.Add(BarcodeMethod1(PrefixFixed, Suffix, SerialNumIndex, SerialNumLength, Radix)); midcode.Add(mid_code); if (mid_remain % pr_zxbzs != 0 && k + 1 == count && j + 1 == mid_num) AddNum = mid_remain % pr_zxbzs; pib_inqty.Add(AddNum.ToString()); } } if (barcode.Count > 0) { //插入条码 sql.Clear(); sql.Append("insert into prodiobarcode (PIB_ID,PIB_PRODCODE,pib_inman,PIB_INDATE,PIB_INOUTNO,PIB_PIID,pib_brand,PIB_BARCODE,PIB_CUSTBARCODE,PIB_PDNO,"); sql.Append("PIB_PDID,PIB_PICLASS,PIB_QTY,PIB_PRODID,PIB_OUTBOXCODE1,PIB_IFPRINT,PIB_IFPICK,PIB_ORDERCODE,PIB_CUSTPO,pib_orderdetno)"); sql.Append(" values (prodiobarcode_seq.nextval,'" + pd_prodcode + "','" + User.UserName + "',sysdate,'" + pi_inoutno.Text + "'," + pi_id + ",'" + pr_brand + "',:barcode,:custbarcode,'" + pd_pdno + "','" + pd_id + "',"); sql.Append("'" + pi_class.Text + "',:pib_inqty,'" + pr_id + "',:midcode,0,0,'" + pd_ordercode + "','','" + pd_orderdetno + "')"); dh.BatchInsert(sql.ToString(), new string[] { "barcode", "custbarcode", "pib_inqty", "midcode" }, barcode.ToArray(), custbarcode.ToArray(), pib_inqty.ToArray(), midcode.ToArray()); //更新最大流水号 dh.UpdateByCondition("RuleMaxNum", "rmn_maxnumber='" + custserialnum + "'", "rmn_nrcode='" + NrCode + "' and rmn_prefix='" + Prefix + "'"); } else { ErrRowIndex += (i + 1) + ","; } } } if (ErrRowIndex != "") { MessageBox.Show(ErrRowIndex + "行无可用条码,请检查本次数量"); return; } if (CheckedRowCount > 0) { LoadData(); MessageBox.Show("生成条码成功!"); } else { MessageBox.Show("未勾选需要生成的明细!"); } //如果含有内容不符合的选项,进行提示 string str = ""; foreach (string ss in NotPass.Values) { str += ss + "\n"; } if (str != "") MessageBox.Show(str); } catch (Exception ex) { MessageBox.Show(ex.Message + ex.StackTrace); } } //生成唯一条码 public string BarcodeMethod1(string pd_id, string pr_id, string pib_barcode) { if (pib_barcode != "") { if (FirstCode) { serialnum = serialnum + 1; } //第一次的时候去获取数据库查询出来的值 else { serialnum = int.Parse(pib_barcode.Substring(pib_barcode.Length - 4)) + 1; FirstCode = true; } } else { serialnum = serialnum + 1; } string serialcode = serialnum.ToString(); for (int i = serialnum.ToString().Length; i < 4; i++) { serialcode = "0" + serialcode; } return pd_id + "-" + pr_id + "-" + serialcode; } //生成客户条码 public string BarcodeMethod1(string Prefix, string Suffix, int Index, int Length, int radix) { string str = Prefix; //如果是流水则需要在前面加0 string serialcode = BaseUtil.DToAny(custserialnum, radix); for (int j = serialcode.ToString().Length; j < Length; j++) { serialcode = "0" + serialcode; } str += serialcode; str += Suffix; custserialnum = custserialnum + 1; return str; } private static string lpad(int length, string number) { while (number.Length < length) { number = "0" + number; } number = number.Substring(number.Length - length, length); return number; } /// /// 重绘指定列的背景色 /// /// /// private void ProdIoInfDGV_CellPainting(object sender, DataGridViewCellPaintingEventArgs e) { bool mouseOver = e.CellBounds.Contains(this.PointToClient(Cursor.Position)); if (e.ColumnIndex > 0) if (ProdIoInfDGV.Columns[e.ColumnIndex].Name == "pr_zxbzs" || ProdIoInfDGV.Columns[e.ColumnIndex].Name == "pd_qty" || ProdIoInfDGV.Columns[e.ColumnIndex].Name == "mid_qty" || ProdIoInfDGV.Columns[e.ColumnIndex].Name == "pib_restqty1") { SolidBrush solidBrush = new SolidBrush(Color.FromArgb(51, 153, 255)); e.Graphics.FillRectangle(mouseOver ? solidBrush : Brushes.LightSeaGreen, e.CellBounds); Rectangle border = e.CellBounds; border.Width -= 1; e.Graphics.DrawRectangle(Pens.White, border); e.PaintContent(e.CellBounds); e.Handled = true; } } /// /// 计算中盘尾数的方法 /// /// /// private void ProdIoInfDGV_CellEndEdit(object sender, DataGridViewCellEventArgs e) { object pr_zxbzs = ProdIoInfDGV.Rows[e.RowIndex].Cells["pr_zxbzs"].Value; object pd_qty = ProdIoInfDGV.Rows[e.RowIndex].Cells["pd_qty"].Value; object mid_qty = ProdIoInfDGV.Rows[e.RowIndex].Cells["mid_qty"].Value; object pd_totalqty = ProdIoInfDGV.Rows[e.RowIndex].Cells["pd_totalqty"].Value; decimal restqty1 = 0; if (ProdIoInfDGV.Rows[e.RowIndex].Cells["pib_restqty1"].Value != null && ProdIoInfDGV.Rows[e.RowIndex].Cells["pib_restqty1"].Value.ToString() != "") { string[] restqty = ProdIoInfDGV.Rows[e.RowIndex].Cells["pib_restqty1"].Value.ToString().Split(','); for (int k = 0; k < restqty.Length; k++) { decimal qty = 0; decimal.TryParse(restqty[k], out qty); restqty1 += qty; } } //ProdIoInfDGV.Rows[e.RowIndex].Cells["pd_qty"].Value = decimal.Parse(pd_qty.ToString()) - restqty1; pd_qty = decimal.Parse(pd_qty.ToString()) - restqty1; if (pr_zxbzs != null && pd_qty != null && mid_qty != null) { decimal 最小包装量 = decimal.Parse(pr_zxbzs.ToString()); decimal 中盘容量 = decimal.Parse(mid_qty.ToString()); decimal 本次数量 = decimal.Parse(pd_qty.ToString()); decimal 总数 = decimal.Parse(pd_totalqty.ToString()); //计算中盘数量 decimal mid_num = 本次数量 / (最小包装量 * 中盘容量); int num = 0; if (int.TryParse(mid_num.ToString(), out num)) { ProdIoInfDGV.Rows[e.RowIndex].Cells["mid_num"].Value = mid_num; ProdIoInfDGV.Rows[e.RowIndex].Cells["mid_remain"].Value = 本次数量 - mid_num * 最小包装量 * 中盘容量; } else { ProdIoInfDGV.Rows[e.RowIndex].Cells["mid_num"].Value = Math.Floor(mid_num) + 1; ProdIoInfDGV.Rows[e.RowIndex].Cells["mid_remain"].Value = 本次数量 - Math.Floor(mid_num) * 最小包装量 * 中盘容量; } } } //设置全部中盒容量 private void SetMidCapacity_Click(object sender, EventArgs e) { for (int i = 0; i < ProdIoInfDGV.Rows.Count; i++) { ProdIoInfDGV.Rows[i].Cells["mid_qty"].Value = MidCapacity.Text; decimal restqty1 = 0; if (ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value != null && ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value.ToString() != "") { string[] restqty = ProdIoInfDGV.Rows[i].Cells["pib_restqty1"].Value.ToString().Split(','); for (int k = 0; k < restqty.Length; k++) { decimal qty = 0; decimal.TryParse(restqty[k], out qty); restqty1 += qty; } } object pr_zxbzs = ProdIoInfDGV.Rows[i].Cells["pr_zxbzs"].Value; object pd_qty = ProdIoInfDGV.Rows[i].Cells["pd_qty"].Value; object mid_qty = ProdIoInfDGV.Rows[i].Cells["mid_qty"].Value; object pd_totalqty = ProdIoInfDGV.Rows[i].Cells["pd_totalqty"].Value; if (ProdIoInfDGV.Rows[i].Cells["pr_zxbzs"].Value.ToString() != "" && ProdIoInfDGV.Rows[i].Cells["pd_qty"].Value.ToString() != "" && ProdIoInfDGV.Rows[i].Cells["mid_qty"].Value.ToString() != "" && ProdIoInfDGV.Rows[i].Cells["pr_zxbzs"].Value.ToString() != "0") { decimal 最小包装量 = decimal.Parse(pr_zxbzs.ToString()); decimal 中盘容量 = decimal.Parse(mid_qty.ToString()); decimal 本次数量 = decimal.Parse(pd_qty.ToString()); decimal 总数 = decimal.Parse(pd_totalqty.ToString()); //计算中盘数量 decimal mid_num = 本次数量 / (最小包装量 * 中盘容量); int num = 0; if (int.TryParse(mid_num.ToString(), out num)) { ProdIoInfDGV.Rows[i].Cells["mid_num"].Value = mid_num; ProdIoInfDGV.Rows[i].Cells["mid_remain"].Value = 本次数量 - mid_num * 最小包装量 * 中盘容量; } else { ProdIoInfDGV.Rows[i].Cells["mid_num"].Value = Math.Floor(mid_num) + 1; ProdIoInfDGV.Rows[i].Cells["mid_remain"].Value = 本次数量 - Math.Floor(mid_num) * 最小包装量 * 中盘容量; } } } } private void LoadData() { //获取客户编号 CustCode = dh.getFieldDataByCondition("ProdInOut", "pi_cardcode", "pi_inoutno='" + pi_inoutno.Text + "'").ToString(); //用于存放每一项的明细的数据 dt = (DataTable)dh.ExecuteSql("select pi_class,pi_id from prodinout where pi_inoutno='" + pi_inoutno.Text + "'", "select"); if (dt.Rows.Count > 0) { pi_id = dt.Rows[0]["pi_id"].ToString(); BaseUtil.SetFormValue(this.Controls, dt); string outsql = ""; switch (pi_class.Text) { case "出货单": LogicHandler.GenerateBarCode(pi_id, CustCode + "|" + DataType, out outsql); sql.Clear(); sql.Append(outsql); break; case "完工入库单": sql.Clear(); sql.Append("select pd_piid,pd_id,pr_id,pr_brand,pr_madein,pr_unit,pr_detail,pr_spec,pr_zxbzs,inqty pd_totalqty,pd_ordercode,pd_orderdetno,pd_pdno,pd_prodcode,"); sql.Append("pd_piclass,pd_qty from (select pd_piid,pd_id,pr_id,pr_brand,pr_madein,pr_unit,pr_detail,pr_spec,pr_zxbzs,inqty,pd_ordercode,pd_orderdetno,pd_pdno,"); sql.Append("pd_prodcode,pd_piclass,inqty-nvl((select sum(nvl(pib_qty,0)) from PRODIOBARCODE where PIB_PIID=pd_piid and pib_pdno=pd_pdno ),0)pd_qty "); sql.Append("from (select pd_piid,min(pd_id) pd_id,sum(pd_inqty)inqty,pd_ordercode,pd_orderdetno,pd_pdno,max(pd_prodcode)pd_prodcode,max(pd_piclass)pd_piclass "); sql.Append("from prodiodetail group by pd_piid,pd_ordercode, pd_orderdetno,pd_pdno)T left join product "); sql.Append("on pr_code=pd_prodcode ) where pd_piid='" + pi_id + "' order by pd_pdno"); break; case "其它出库单": LogicHandler.GenerateBarCode(pi_id, CustCode + "|" + DataType, out outsql); sql.Clear(); sql.Append(outsql); break; default: break; } dt = (DataTable)dh.ExecuteSql(sql.ToString(), "select"); BaseUtil.FillDgvWithDataTable(ProdIoInfDGV, dt); } else { MessageBox.Show("当前单据不存在"); pi_inoutno.Text = ""; } } private void ResetSerialNum_Click(object sender, EventArgs e) { dt = (DataTable)dh.ExecuteSql("select pi_class,pi_id from prodinout where pi_inoutno='" + pi_inoutno.Text + "'", "select"); if (dt.Rows.Count > 0) { if (NrCode != "") { dh.UpdateByCondition("RuleMaxNum", "rmn_maxnumber=1", "rmn_nrcode='" + NrCode + "' and rmn_prefix='" + Prefix + "'"); MessageBox.Show("流水重置成功"); } else MessageBox.Show("当前客户无对应条码规则"); } else { MessageBox.Show("当前单据不存在"); pi_inoutno.Text = ""; } } } }