工艺子路线
指引卡开工单 完工单 使用 进出站新增模块
| | |
| | | //委外工序发出反序列化 |
| | | string msg2 = "[" + sArray[0].ToString() + "]"; |
| | | string user = sArray[1].ToString(); |
| | | string OperationType = sArray[2].ToString(); |
| | | string HComputerName = SystemInformation.ComputerName; //设备名称 |
| | | |
| | | //判断是否有编辑权限 |
| | |
| | | ",HProcNo,HOrderProcNO,HMainInterID,HPRDOrgID" + |
| | | ",HmaterOutqty" + |
| | | ") " + |
| | | " values('" + BillType + "','" + BillType + "'," + HInterID + ",'" + HBillNo + "'," + HBillStatus + ",getdate(),'" + HMaker + "',getdate()" + |
| | | " values('" + BillType + "','" + (OperationType=="5"?"SUB":BillType) + "'," + HInterID + ",'" + HBillNo + "'," + HBillStatus + ",getdate(),'" + HMaker + "',getdate()" + |
| | | "," + HYear + "," + HPeriod + ",'" + HRemark + "'" + |
| | | "," + HICMOInterID + ",'" + HICMOBillNo + "'," + HProcPlanInterID + "," + HProcPlanEntryID + ",'" + HProcPlanBillNo + "'," + HProcExchInterID + "," + HProcExchEntryID + |
| | | ",'" + HProcExchBillNo + "'," + HMaterID + "," + HProcID + "," + HICMOQty + "," + HPlanQty + ",getdate()," + HSourceID + |
| | |
| | | //反序列化 |
| | | string msg2 = "[" + sArray[0].ToString() + "]"; |
| | | string user = sArray[1].ToString();//用户名 |
| | | string OperationType = sArray[2].ToString();//类型 |
| | | string HComputerName = SystemInformation.ComputerName; //设备名称 |
| | | |
| | | //判断是否有编辑权限 |
| | |
| | | long HPRDOrgID = list[0].HPRDOrgID;//组织ID |
| | | double HmaterOutqty = list[0].HmaterOutqty;//白坯发布 |
| | | double HProcPriceRate = list[0].HProcPriceRate;//工价系数 |
| | | int HTemporaryAreaID = list[0].HTemporaryAreaID;//暂放区 |
| | | |
| | | LogService.Write($"1.字段赋值,用时" + sw.Elapsed ); |
| | | |
| | |
| | | // return objJsonResult; |
| | | //} |
| | | |
| | | LogService.Write($"2.条件判断,用时" + sw.Elapsed); |
| | | //LogService.Write($"2.条件判断,用时" + sw.Elapsed); |
| | | |
| | | var num = 0; |
| | | LogService.Write($"3.事务开始,用时" + sw.Elapsed); |
| | | //LogService.Write($"3.事务开始,用时" + sw.Elapsed); |
| | | |
| | | //若MAINDI重复则重新获取 |
| | | oCN.BeginTran(); |
| | |
| | | ",HSupID,HQty,HPrice,HMoney,HBadCount,HCenterID,HProcNo,HOrderProcNO,HSourceNameList" + |
| | | ",HMainSourceInterID,HMainSourceBillNo,HMainSourceBillType,HLastSubProc" + |
| | | ",HEmpID2,HEmpID3,HEmpID4,HEmpID5,HDSQty,HChongQty,HPriceRate,HWorkTimes,HQCCheckID,HMainInterID,HPRDOrgID" + |
| | | ",HmaterOutqty,HProcPriceRate" + |
| | | ",HmaterOutqty,HProcPriceRate,HTemporaryAreaID" + |
| | | ") " + |
| | | " values('" + BillType + "','" + HBillSubType + "'," + HInterID + ",'" + HBillNo + "'," + HBillStatus + ",getdate(),'" + HMaker + "',getdate(),'" + HMouldNum + "'" + |
| | | " values('" + BillType + "','" + (OperationType == "5" ? "SUB" : HBillSubType) + "'," + HInterID + ",'" + HBillNo + "'," + HBillStatus + ",getdate(),'" + HMaker + "',getdate(),'" + HMouldNum + "'" + |
| | | "," + HYear + "," + HPeriod + ",'" + HRemark + "','" + HSourceName + "'," + HPieceQty + "," + HWasterQty + "," + HPlanPieceQty + "," + HBadPNL + |
| | | "," + HICMOInterID + ",'" + HICMOBillNo + "'," + HProcPlanInterID + "," + HProcPlanEntryID + ",'" + HProcPlanBillNo + "'," + HProcExchInterID + "," + HProcExchEntryID + |
| | | ",'" + HProcExchBillNo + "'," + HMaterID + "," + HProcID + "," + HICMOQty + "," + HPlanQty + ",getdate()," + HSourceID + "," + HPayProcID + |
| | |
| | | "," + HSupID + "," + HQty + "," + HPrice + "," + HMoney + "," + HBadCount + "," + HCenterID + "," + HProcNo + ",'" + HOrderProcNO + "'" + ",'" + HSourceNameList + "'" + |
| | | "," + HMainSourceInterID + ",'" + HMainSourceBillNo + "','" + HMainSourceBillType + "'," + Convert.ToString(HLastSubProc ? 1 : 0) + |
| | | "," + HEmpID2 + "," + HEmpID3 + "," + HEmpID4 + "," + HEmpID5 + "," + HDSQty + "," + HChongQty + "," + HPriceRate + "," + HWorkTimes + "," + HQCCheckID + "," + HMainInterID + "," + HPRDOrgID + |
| | | ","+ HmaterOutqty + "," + HProcPriceRate + ") "); |
| | | ","+ HmaterOutqty + "," + HProcPriceRate + ","+ HTemporaryAreaID + ") "); |
| | | |
| | | LogService.Write($"4.新增结束,用时" + sw.Elapsed); |
| | | LogService.Write("用户:" + user + ",日期:" + DateTime.Now + ",新增工序出站单据:" + HBillNo); |
| | |
| | | ",HQty=" + HQty + |
| | | ",HDSQty=" + HDSQty + |
| | | ",HChongQty=" + HChongQty + |
| | | ",HTemporaryAreaID=" + HTemporaryAreaID + |
| | | ",HMouldNum='" + HMouldNum + "'" + |
| | | ",HSourceNameList='" + HSourceNameList + "'" + |
| | | ",HWasterQty=" + HWasterQty + |
| | |
| | | } |
| | | //主表 |
| | | |
| | | LogService.Write($"5.系统控制查询判断,用时" + sw.Elapsed); |
| | | //LogService.Write($"5.系统控制查询判断,用时" + sw.Elapsed); |
| | | ds = oCN.RunProcReturn("exec h_p_MES_StationOutBill_QtyCtrl " + HInterID + "", "h_p_MES_StationOutBill_QtyCtrl"); |
| | | if (ds == null) |
| | | { |
| | |
| | | objJsonResult.data = null; |
| | | return objJsonResult; |
| | | } |
| | | LogService.Write($"5.1,用时" + sw.Elapsed); |
| | | //LogService.Write($"5.1,用时" + sw.Elapsed); |
| | | if (ds.Tables[0].Rows.Count == 0) |
| | | { |
| | | oCN.RollBack(); |
| | |
| | | objJsonResult.data = null; |
| | | return objJsonResult; |
| | | } |
| | | LogService.Write($"5.2,用时" + sw.Elapsed); |
| | | //LogService.Write($"5.2,用时" + sw.Elapsed); |
| | | if (ClsPub.isStrNull(ds.Tables[0].Rows[0]["HBack"]) == "2") |
| | | { |
| | | oCN.RollBack(); |
| | |
| | | objJsonResult.data = null; |
| | | return objJsonResult; |
| | | } |
| | | LogService.Write($"6.判断结束,用时" + sw.Elapsed); |
| | | //LogService.Write($"6.判断结束,用时" + sw.Elapsed); |
| | | oCN.RunProc("exec h_p_Mes_ProcessExchangeRelationQty_Out " + HInterID + ","+ num + ""); |
| | | LogService.Write($"6.1,用时" + sw.Elapsed); |
| | | //LogService.Write($"6.1,用时" + sw.Elapsed); |
| | | oCN.RunProc("exec h_p_Mes_ProcessExchangeChangeStatus " + HInterID + " "); |
| | | LogService.Write($"6.2,用时" + sw.Elapsed); |
| | | //LogService.Write($"6.2,用时" + sw.Elapsed); |
| | | oCN.RunProc("exec h_p_Mes_StationOutBillBackBarCode " + HInterID + " "); |
| | | LogService.Write($"7.存储过程结束,用时" + sw.Elapsed); |
| | | //LogService.Write($"7.存储过程结束,用时" + sw.Elapsed); |
| | | //判断是否是 末道工序 |
| | | ds1 = oCN.RunProcReturn(" select HLastProc,HFstProc from Sc_ProcessExchangeBillMain a " + |
| | | " inner join Sc_ProcessExchangeBillSub b on a.HInterID=b.HInterID " + |
| | |
| | | //判断末道 生产汇报汇报 是否勾选 |
| | | if (oSystemParameter.omodel.MES_StationOutBill_LastAutoICMOReport == "Y") //系统参数 |
| | | { |
| | | LogService.Write($"7.1,用时" + sw.Elapsed); |
| | | //LogService.Write($"7.1,用时" + sw.Elapsed); |
| | | //同步生产汇报单 |
| | | objJsonResult = (json)SaveICMOReportBill(HInterID.ToString(), user, HBillNo, HPRDOrgID.ToString()); |
| | | LogService.Write($"7.2,用时" + sw.Elapsed); |
| | | //LogService.Write($"7.2,用时" + sw.Elapsed); |
| | | if (objJsonResult.count == 0) |
| | | { |
| | | oCN.RollBack(); |
| | |
| | | objJsonResult.data = null; |
| | | return objJsonResult; |
| | | } |
| | | LogService.Write($"8.生产汇报结束,用时" + sw.Elapsed); |
| | | //LogService.Write($"8.生产汇报结束,用时" + sw.Elapsed); |
| | | } |
| | | //判断末道 生产入库 是否勾选 |
| | | else if (oSystemParameter.omodel.MES_StationOutBill_AutoStockIn == "Y") //系统参数 |
| | | { |
| | | LogService.Write($"8.1,用时" + sw.Elapsed); |
| | | //LogService.Write($"8.1,用时" + sw.Elapsed); |
| | | //同步生产入库单 |
| | | objJsonResult =(json)SaveProcdutInBill(HBillNo); |
| | | LogService.Write($"8.2,用时" + sw.Elapsed); |
| | | //LogService.Write($"8.2,用时" + sw.Elapsed); |
| | | if (objJsonResult.count == 0) |
| | | { |
| | | oCN.RollBack(); |
| | |
| | | objJsonResult.data = null; |
| | | return objJsonResult; |
| | | } |
| | | LogService.Write($"9.生产入库结束,用时" + sw.Elapsed); |
| | | //LogService.Write($"9.生产入库结束,用时" + sw.Elapsed); |
| | | } |
| | | |
| | | } |
| | |
| | | } |
| | | |
| | | |
| | | LogService.Write($"10.事务结束,用时" + sw.Elapsed); |
| | | //LogService.Write($"10.事务结束,用时" + sw.Elapsed); |
| | | oCN.Commit(); |
| | | string sReturn = ""; |
| | | if (oSystemParameter.ShowBill(ref sReturn) == true) |
| | |
| | | string msg3 = sArray[1].ToString(); |
| | | |
| | | //int hentryid = int.Parse(sArray[2].ToString());//子表的顺序id |
| | | int OperationType = int.Parse(sArray[2].ToString());//数据类型 1添加 3修改 2 复制 |
| | | int OperationType = int.Parse(sArray[2].ToString());//数据类型 1添加 3修改 2 复制 4添加子工艺路线 |
| | | string user = sArray[3].ToString();//用户名 |
| | | string HComputerName = SystemInformation.ComputerName; //设备名称 |
| | | user_LongShan = sArray[3].ToString();//用户名 |
| | |
| | | HName_LongShan = mainList[0].HName;//工艺路线名称 |
| | | |
| | | |
| | | if (oSystemParameter.omodel.WMS_CampanyName == "") |
| | | if (oSystemParameter.omodel.WMS_CampanyName == "凯贝奈特") |
| | | { |
| | | if (HPicNumVer == "") |
| | | { |
| | |
| | | |
| | | ds = oCN.RunProcReturn("select * from h_v_Gy_RoutingBillList where hmainid=" + HInterID + " and 单据号='" + HBillNo + "'", "h_v_Gy_RoutingBillList"); |
| | | |
| | | if ((OperationType == 1 || OperationType == 2) && ds.Tables[0].Rows.Count == 0)//新增 |
| | | if ((OperationType == 1 || OperationType == 2|| OperationType == 4) && ds.Tables[0].Rows.Count == 0)//新增 |
| | | { |
| | | //主表 |
| | | oCN.RunProc("Insert Into Gy_RoutingBillMain " + |
| | | "(HBillType,HInterID,HBillNo,HDate" + |
| | | "(HBillType,HBillSubType,HInterID,HBillNo,HDate" + |
| | | ",HYear,HPeriod,HRemark,HMaker,Hmakedate,HMaterID,HName,HMaterTypeID" + |
| | | ",HRoutingGroupID,HUnitID,HMaterNumber,HUnitNumber,HStandard" + |
| | | ",HMainGroupID,HMainProcID,HMainCenterID,HMainTimeUnit,HMainUnitTime,HMainWorkQty" + |
| | | ",HMainPrice,HStdSourceQty,HAddSourceRate,HPRDORGID,HDelSourceRate" + |
| | | ",HPicNumVer,HPicNumAssemble,HMaterTexture,HProductNum,HVerNum,HOrgID) " + " values('" + BillType + "'," + HInterID + ",'" + HBillNo + "','" + HDate + "'" + |
| | | ",HPicNumVer,HPicNumAssemble,HMaterTexture,HProductNum,HVerNum,HOrgID) " + |
| | | " values('" + BillType + "','"+(OperationType==4?"SUB":"") +"'," + HInterID + ",'" + HBillNo + "','" + HDate + "'" + |
| | | "," + HYear + "," + HPeriod + ",'" + HRemark + "','" + HMaker + "',getdate()," + HMaterID + ",'" + HName + "'," + HMaterTypeID + |
| | | "," + HRoutingGroupID + "," + HUnitID + ",'" + HMaterNumber + "','" + HUnitNumber + "'," + Convert.ToString(HStandard ? 1 : 0) + |
| | | "," + HMainGroupID + "," + HMainProcID + "," + HMainCenterID + ",'" + HMainTimeUnit + "'," + HMainUnitTime + "," + HMainWorkQty + |
| | |
| | | oCN.RunProc("exec Gy_RoutingBill_LastProNo " + HInterID); |
| | | } |
| | | } |
| | | else if (IsProNo == 1 && OperationType == 1) |
| | | else if (IsProNo == 1 && (OperationType == 1 || OperationType == 4)) |
| | | { |
| | | ds = oCN.RunProcReturn("select * from Gy_Process Where HTProcessFlag = 1 and HNumber='9999' ", "Gy_Process"); |
| | | |