public void CallRfcBackFlush()
{
if (!isRun)
{
sfcdb = new OleExec(DBName, false);
//判斷是否有其他執行
TR_SYNC_LOCK = new T_R_SYNC_LOCK(sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle);
string lockIP = "";
string sapMessage = "";
bool isLock = TR_SYNC_LOCK.IsLock("BACKFLUSH", sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle, out lockIP);
if (isLock)
{
throw new Exception("BackFlush Is Running,Please Wait!");
}
else
{
TR_SYNC_LOCK.SYNC_Lock(BU, IP, "HWD", "BACKFLUSH", "Interface", sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle);
isRun = true;
}
if (InterfacePublicValues.IsMonthly(sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle))
{
//月結不給拋賬
throw new Exception("This time is monthly,can't BackFlush");
}
if (setCtrlEnableDelegate != null)
{
setCtrlEnableDelegate("btnCallRFC", false);
setCtrlEnableDelegate("btnStart", false);
}
try
{
ZRFC_SFC_NSG_0009 RFC = new ZRFC_SFC_NSG_0009(_BU);
ZRFC_SFC_NSG_0022 RW_RFC = new ZRFC_SFC_NSG_0022(_BU);
string[] ReWorks = REWORK.Split(new char[] { ',' });
int curCount = 0;
T_R_BACKFLUSH_HISTORY TR_BACKFLUSH_HISTORY = new T_R_BACKFLUSH_HISTORY(sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle);
string ConfigPostDate = InterfacePublicValues.GetPostDate(sfcdb);
foreach (R_BACKFLUSH_CHECK item in bkList)
{
try
{
curCount++;
if (processRateDelegate != null)
{
processRateDelegate("BackFlushProgressBar", "labBackFlushProgress", bkList.Count, curCount);
}
if (item.DIFF_QTY > 0)
{
bool isRework = false;
for (int i = 0; i < ReWorks.Length; i++)
{
if (item.WORKORDERNO.IndexOf(ReWorks[i]) == 0)
{
isRework = true;
break;
}
}
if (isRework)
{
RW_RFC.SetValue(item.WORKORDERNO, ConfigPostDate, item.DIFF_QTY.ToString(), item.SAP_STATION);
RW_RFC.CallRFC();
MESDataObject.Module.R_BACKFLUSH_HISTORY his = new MESDataObject.Module.R_BACKFLUSH_HISTORY();
his.WORKORDERNO = item.WORKORDERNO;
his.WORKORDER_QTY = (double?)item.WORKORDER_QTY;
his.SFC_QTY = (double?)item.SFC_QTY;
his.SFC_STATION = item.SFC_STATION;
his.SKUNO = item.SKUNO;
his.SAP_STATION = item.SAP_STATION;
his.LAST_SFC_QTY = (double?)item.LAST_SFC_QTY;
his.DIFF_QTY = (double?)item.DIFF_QTY;
his.DIFF_QTY1 = (double?)item.DIFF_QTY1;
his.BACK_DATE = GetDBTime(sfcdb);
his.TIMES = 0;
his.DIFF_QTY2 = (double?)item.DIFF_QTY2;
his.MRB_QTY = (double?)item.MRB_QTY;
string resu = RW_RFC.GetValue("O_FLAG");
if (resu == "0")
{
his.RESULT = "Y";
resu = RW_RFC.GetValue("O_FLAG1");
if (resu == "1")
{
WriteLog.WriteIntoMESLog(sfcdb, _BU, "Interface",
"MESInterface.HWD.BackFlush.BackFlushHelp",
"CallRfcBackFlush", his.WORKORDERNO + ","
+ his.SAP_STATION + ",521 fail:" +
RW_RFC.GetValue("O_MESSAGE1"), "", "System");
}
}
else
{
his.RESULT = "N";
}
TR_BACKFLUSH_HISTORY.Add(his, sfcdb);
}
else
{
RFC.SetValue(item.WORKORDERNO,
item.SAP_STATION,
item.DIFF_QTY.ToString(), ConfigPostDate);
RFC.CallRFC();
MESDataObject.Module.R_BACKFLUSH_HISTORY his = new MESDataObject.Module.R_BACKFLUSH_HISTORY();
his.WORKORDERNO = item.WORKORDERNO;
his.WORKORDER_QTY = (double?)item.WORKORDER_QTY;
his.SFC_QTY = (double?)item.SFC_QTY;
his.SFC_STATION = item.SFC_STATION;
his.SKUNO = item.SKUNO;
his.SAP_STATION = item.SAP_STATION;
his.LAST_SFC_QTY = (double?)item.LAST_SFC_QTY;
his.DIFF_QTY = (double?)item.DIFF_QTY;
his.DIFF_QTY1 = (double?)item.DIFF_QTY1;
his.BACK_DATE = GetDBTime(sfcdb);
his.TIMES = 0;
his.DIFF_QTY2 = (double?)item.DIFF_QTY2;
his.MRB_QTY = (double?)item.MRB_QTY;
string resu = RFC.GetValue("O_FLAG");
if (resu == "0")
{
his.RESULT = "Y";
}
else
{
his.RESULT = "N";
sapMessage = RFC.GetValue("O_MESSAGE");
WriteLog.WriteIntoMESLog(sfcdb, _BU, "Interface", "MESInterface.HWD.BackFlush.BackFlushHelp", "CallRfcBackFlush",
item.WORKORDERNO + "," + item.SAP_STATION + ":" + sapMessage, "", "System");
}
TR_BACKFLUSH_HISTORY.Add(his, sfcdb);
}
}
}
catch (Exception ex)
{
WriteLog.WriteIntoMESLog(sfcdb, _BU, "Interface",
"MESInterface.HWD.BackFlush.BackFlushHelp",
"CallRfcBackFlush", item.WORKORDERNO + "," + item.SAP_STATION + ":" + ex.Message, "", "System");
continue;
}
}
isRun = false;
TR_SYNC_LOCK.SYNC_UnLock(BU, IP, "HWD", "BACKFLUSH", "Interface", sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle);
if (setCtrlEnableDelegate != null)
{
setCtrlEnableDelegate("btnStart", true);
}
}
catch (Exception ex)
{
WriteLog.WriteIntoMESLog(sfcdb, _BU, "Interface",
"MESInterface.HWD.BackFlush.BackFlushHelp",
"CallRfcBackFlush", ex.Message, "", "System");
isRun = false;
TR_SYNC_LOCK.SYNC_UnLock(BU, IP, "HWD", "BACKFLUSH", "Interface", sfcdb, MESDataObject.DB_TYPE_ENUM.Oracle);
if (setCtrlEnableDelegate != null)
{
setCtrlEnableDelegate("btnStart", true);
}
}
}
}
private void WOToMRBBackFlush()
{
MRBGTList = new List <R_MRB_GT>();
MRBTable = new DataTable();
sql = $@" update r_mrb_gt set sap_flag = '3' where (sap_flag = '2' or sap_flag = '0') and zcpp_flag = 0 and sap_station_code is not null ";
SFCDB.ExecSQL(sql);
sql = $@" select * from r_mrb_gt where sap_flag = 3 and zcpp_flag = 0 and sap_station_code is not null ";
MRBTable = SFCDB.RunSelect(sql).Tables[0];
if (MRBTable != null && MRBTable.Rows.Count > 0)
{
foreach (DataRow row in MRBTable.Rows)
{
rowR_MRBGT = (Row_R_MRB_GT)R_MRB_GT.NewRow();
rowR_MRBGT.loadData(row);
MRBGTList.Add(rowR_MRBGT.GetDataObject());
}
sql = " update r_mrb_gt set sap_flag = '4' where sap_flag = '3' and zcpp_flag = 0 and sap_station_code is not null ";
SFCDB.ExecSQL(sql);
}
postDate = InterfacePublicValues.GetPostDate(SFCDB);
if (MRBGTList != null && MRBGTList.Count > 0)
{
foreach (R_MRB_GT r_mrb_gt in MRBGTList)
{
rowR_MRBGT = null;
rowH_MRBGT = null;
logMessage = "";
zrfc_sfc_nsg_0020.SetValue("I_AUFNR", r_mrb_gt.WORKORDERNO);
zrfc_sfc_nsg_0020.SetValue("I_BUDAT", postDate);
zrfc_sfc_nsg_0020.SetValue("I_FLAG", r_mrb_gt.CONFIRMED_FLAG);
zrfc_sfc_nsg_0020.SetValue("I_LGORT_TO", r_mrb_gt.TO_STORAGE);
zrfc_sfc_nsg_0020.SetValue("I_LMNGA", r_mrb_gt.TOTAL_QTY.ToString());
zrfc_sfc_nsg_0020.SetValue("I_STATION", r_mrb_gt.SAP_STATION_CODE);
try
{
zrfc_sfc_nsg_0020.CallRFC();
}
catch (Exception ex)
{
//write log
WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.MrbBackFlush", "WOToMRBBackFlush", r_mrb_gt.WORKORDERNO + ";" + ip + ";" + ex.ToString(), "", "interface");
continue;
}
if (zrfc_sfc_nsg_0020.GetValue("O_FLAG1") == "1")
{
rowR_MRBGT = (Row_R_MRB_GT)R_MRB_GT.GetObjByID(r_mrb_gt.ID, SFCDB);
rowR_MRBGT.SAP_FLAG = "2";
rowR_MRBGT.CONFIRMED_FLAG = "1";
try
{
SFCDB.ExecSQL(rowR_MRBGT.GetUpdateString(DB_TYPE_ENUM.Oracle));
}
catch (Exception ex)
{
WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.MrbBackFlush", "WOToMRBBackFlush", r_mrb_gt.WORKORDERNO + ";" + ip + ";update r_mrb_gt fail," + ex.Message, "", "interface");
}
}
try
{
logMessage = " M:" + zrfc_sfc_nsg_0020.GetValue("O_MESSAGE")
+ " M1:" + zrfc_sfc_nsg_0020.GetValue("O_MESSAGE1")
+ " M2" + zrfc_sfc_nsg_0020.GetValue("O_MESSAGE2");
rowH_MRBGT = (Row_H_MRB_GT)H_MRB_GT.NewRow();
rowH_MRBGT.ID = H_MRB_GT.GetNewID(BU, SFCDB);
rowH_MRBGT.WORKORDERNO = r_mrb_gt.WORKORDERNO;
rowH_MRBGT.SAP_STATION_CODE = r_mrb_gt.SAP_STATION_CODE;
rowH_MRBGT.FROM_STORAGE = r_mrb_gt.FROM_STORAGE;
rowH_MRBGT.TO_STORAGE = r_mrb_gt.TO_STORAGE;
rowH_MRBGT.TOTAL_QTY = r_mrb_gt.TOTAL_QTY;
rowH_MRBGT.CONFIRMED_FLAG = r_mrb_gt.CONFIRMED_FLAG;
rowH_MRBGT.ZCPP_FLAG = r_mrb_gt.ZCPP_FLAG;
rowH_MRBGT.SAP_FLAG = r_mrb_gt.SAP_FLAG;
rowH_MRBGT.SKUNO = r_mrb_gt.SKUNO;
rowH_MRBGT.SAP_MESSAGE = logMessage;
rowH_MRBGT.EDIT_EMP = "interface";
rowH_MRBGT.EDIT_TIME = InterfacePublicValues.GetDBDateTime(SFCDB, DB_TYPE_ENUM.Oracle);
SFCDB.ExecSQL(rowH_MRBGT.GetInsertString(DB_TYPE_ENUM.Oracle));
//WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.MrbBackFlush", "WOToMRBBackFlush" , r_mrb_gt.WORKORDERNO + ";" + ip + ";" + logMessage, "", "interface");
}
catch (Exception ex)
{
WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.MrbBackFlush", "WOToMRBBackFlush", r_mrb_gt.WORKORDERNO + ";" + ip + ";inert into h_mrb_gt fail," + ex.Message, "", "interface");
}
SFCDB.CommitTrain();
}
}
}
public void CallRFCBackFlush()
{
IsRuning = synLock.IsLock("HWD_StockInBackFlush", SFCDB, DB_TYPE_ENUM.Oracle, out lockIp);
if (IsRuning)
{
throw new Exception("HWD StockInBackFlush interface is running on " + lockIp + ",Please try again later");
}
if (InterfacePublicValues.IsMonthly(SFCDB, DB_TYPE_ENUM.Oracle))
{
//月結不給拋賬
throw new Exception("This time is monthly,can't BackFlush");
}
synLock.SYNC_Lock(BU, ip, "HWD_StockInBackFlush", "HWD_StockInBackFlush", "interface", SFCDB, DB_TYPE_ENUM.Oracle);
SFCDB.CommitTrain();
backFlushList = t_r_sap_temp.GetStockInBackFlushList(SFCDB);
dateTimeNow = DateTime.Parse(InterfacePublicValues.GetPostDate(SFCDB));
if (backFlushList != null)
{
foreach (R_SAP_TEMP temp in backFlushList)
{
logMsg = "";
sapMsg = "";
r_sap_temp = null;
zcmm_nsbg_0051.SetValue(Plant, temp.SKUNO, temp.FROM_STORAGE, temp.TO_STORAGE, temp.QTY.ToString(), temp.TYPE, dateTimeNow, "311");
zcmm_nsbg_0051.CallRFC();
r_sap_temp = (Row_R_SAP_TEMP)t_r_sap_temp.GetObjByID(temp.ID, SFCDB);
if (zcmm_nsbg_0051.GetValue("O_FLAG") == "1")
{
//失敗
sapMsg = " T:" + dateTimeNow.ToString("yyyy/MM/dd HH:mm:ss") + "M1:" + zcmm_nsbg_0051.GetValue("O_MESSAGE");
try
{
sapMsg += " M2:" + zcmm_nsbg_0051.GetTableValue("OUT_TAB").Rows[0]["MESSAGE"].ToString();
}
catch
{
sapMsg += " M2:null";
}
r_sap_temp.FAIL_COUNT = r_sap_temp.FAIL_COUNT + 1;
if (r_sap_temp.FAIL_COUNT >= 100)
{
r_sap_temp.SAP_FLAG = "3";
}
BackFlushOK = false;
}
else
{
//成功
sapMsg = "OK:" + zcmm_nsbg_0051.GetValue("O_MBLNR") + " T:" + dateTimeNow.ToString("yyyy/MM/dd HH:mm:ss");
r_sap_temp.EDIT_TIME = dateTimeNow;
r_sap_temp.SAP_FLAG = "2";
BackFlushOK = true;
}
SFCDB.ExecSQL(r_sap_temp.GetUpdateString(DB_TYPE_ENUM.Oracle));
logMsg = temp.SKUNO + ":" + temp.QTY.ToString() + ":" + sapMsg;
// write mes log
//WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.StockInBackFlush", "CallRFCB", ip + ";" + logMsg, "", "interface");
// write r_saplog
try
{
r_saplog = (Row_R_SAPLOG)t_r_saplog.NewRow();
r_saplog.ID = t_r_saplog.GetNewID(BU, SFCDB);
r_saplog.WORKTIME = temp.EDIT_TIME;
r_saplog.SKUNO = temp.SKUNO;
r_saplog.QTY = temp.QTY;
r_saplog.ERRORTYPE = "STOCKIN";
r_saplog.ERRORMESSAGE = sapMsg;
SFCDB.ExecSQL(r_saplog.GetInsertString(DB_TYPE_ENUM.Oracle));
StockInBackFlush_UI.OutPutMessage(temp.SKUNO + ":" + temp.QTY.ToString(), sapMsg, BackFlushOK);
}
catch (Exception ex)
{
logMsg = temp.SKUNO + ":" + temp.QTY + ";insert into r_saplog fail" + ex.Message;
WriteLog.WriteIntoMESLog(SFCDB, BU, "MESInterface", "MESInterface.HWD.StockInBackFlush", "CallRFCB", ip + ";" + logMsg, "", "interface");
}
SFCDB.CommitTrain();
}
}
synLock.SYNC_UnLock(BU, ip, "HWD_StockInBackFlush", "HWD_StockInBackFlush", "interface", SFCDB, DB_TYPE_ENUM.Oracle);
SFCDB.CommitTrain();
}