private void DumpErrorObject(ITransaction transaction, FSTIError fstiErrorObject)
{
listResult.Items.Add("Transaction Error:");
logtxt("Transaction Error:");
listResult.Items.Add("");
logtxt("");
listResult.Items.Add(String.Format("Transaction: {0}", transaction.Name));
logtxt(String.Format("Transaction: {0}", transaction.Name));
listResult.Items.Add(String.Format("Description: {0}", fstiErrorObject.Description));
logtxt(String.Format("Description: {0}", fstiErrorObject.Description));
listResult.Items.Add(String.Format("MessageFound: {0} ", fstiErrorObject.MessageFound));
logtxt(String.Format("MessageFound: {0} ", fstiErrorObject.MessageFound));
listResult.Items.Add(String.Format("MessageID: {0} ", fstiErrorObject.MessageID));
logtxt(String.Format("MessageID: {0} ", fstiErrorObject.MessageID));
listResult.Items.Add(String.Format("MessageSource: {0} ", fstiErrorObject.MessageSource));
logtxt(String.Format("MessageSource: {0} ", fstiErrorObject.MessageSource));
listResult.Items.Add(String.Format("Number: {0} ", fstiErrorObject.Number));
logtxt(String.Format("Number: {0} ", fstiErrorObject.Number));
listResult.Items.Add(String.Format("Fields in Error: {0} ", fstiErrorObject.NumberOfFieldsInError));
logtxt(String.Format("Fields in Error: {0} ", fstiErrorObject.NumberOfFieldsInError));
for (int i = 0; i < fstiErrorObject.NumberOfFieldsInError; i++)
{
int field = fstiErrorObject.GetFieldNumber(i);
listResult.Items.Add(String.Format("Field[{0}]: {1}", i, field));
logtxt(String.Format("Field[{0}]: {1}", i, field));
ITransactionField myField = transaction.get_Field(field);
listResult.Items.Add(String.Format("Field name: {0}", myField.Name));
logtxt(String.Format("Field name: {0}", myField.Name));
}
}
private void DumpErrorObject(ITransaction transaction, FSTIError fstiErrorObject)
{
DetailError.Clear();
try
{
DetailError.Add("Transaction Error:");
DetailError.Add("");
DetailError.Add("Transaction: " + transaction.Name);
DetailError.Add("Description: " + fstiErrorObject.Description);
DetailError.Add("MessageFound: " + fstiErrorObject.MessageFound);
DetailError.Add("MessageID: " + fstiErrorObject.MessageID);
DetailError.Add("MessageSource: " + fstiErrorObject.MessageSource);
DetailError.Add("Number: " + fstiErrorObject.Number);
DetailError.Add("Fields in Error: " + fstiErrorObject.NumberOfFieldsInError);
for (int i = 0; i < fstiErrorObject.NumberOfFieldsInError; i++)
{
int field = fstiErrorObject.GetFieldNumber(i);
DetailError.Add("Field[" + i.ToString() + "]: " + field);
ITransactionField myField = transaction.get_Field(field);
DetailError.Add("Field name: " + myField.Name);
}
}
catch (Exception ex)
{
DetailError.Clear();
DetailError.Add("Transaction Error description: " + _fstiClient.TransactionError);
DetailError.Add("Detailed Error Exeption: " + ex.Message);
}
}
public bool AmalgammaFSTI_POMT12(string FSTI_fields, string Ammalgamma_User)
{
POMT12 MyPOMT12 = new POMT12();
#region Campos
//PO_Number, PO_Line, Item_Num, Promissed Date
//0 , 1 , 2 , 3
string[] Fields_Array = FSTI_fields.Split(',');
//PO_Number
MyPOMT12.PONumber.Value = Fields_Array[0];
//PO_Line
MyPOMT12.POLineNumber.Value = Fields_Array[1];
//Item_Num
MyPOMT12.ItemNumber.Value = Fields_Array[2];
//Promissed Date
MyPOMT12.PromisedDateOld.Value = Fields_Array[3];
//single delivery line
MyPOMT12.POLineSubType.Value = "S";
//Line Satus
MyPOMT12.POLineStatus.Value = "5";
#endregion
#region Ejecucion
CDFResponse = MyPOMT12.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyPOMT12, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT12", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT12", Trans_Error_Msg);
DetailError.Clear();
DumpErrorObject(MyPOMT12, itemError);
return(false);
}
#endregion
}
private bool FSTI_ProcessTransaction(ITransaction Transaction, string TransactionID, string Ammalgamma_User)
{
CDFResponse = Transaction.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(Transaction, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, TransactionID, "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, TransactionID, Trans_Error_Msg);
return(false);
}
}
private bool ExecuteTransaction(string ItemKey)
{
string update = "";
try
{
if (_fstiClient.ProcessId(myItem, null))
{
// success, get the response and display it using a list box
listResult.Items.Add("Success:");
listResult.Items.Add("");
listResult.Items.Add(_fstiClient.CDFResponse);
update = "UPDATE _CAP_Shipment_Line SET [FSTI_TransactionStatus] = 1,[FSTI_Error] = 0" +
",[FSTI_TransactionMessage] = '" + _fstiClient.CDFResponse + "' WHERE ItemKey=" + ItemKey;
Cliente_SQL.Execute_Command(update);
couterGood++;
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
FSTIError itemError = _fstiClient.TransactionError;
DumpErrorObject(myItem, itemError);
update = "UPDATE _CAP_Shipment_Line SET [FSTI_TransactionStatus] = 1" +
",[FSTI_Error] = 1" +
",[FSTI_TransactionMessage] = 'Error: " + itemError.Description +// " Transaction: "+myItem.GetString(TransactionStringFormat.fsCDF)+
"' WHERE ItemKey=" + ItemKey;
Cliente_SQL.Execute_Command(update);
counterBad++;
errors.Add("Part Number: " + myItem.ItemNumber.Value.ToString() + " Error Message: " + itemError.Description);
}
return(false);
}
catch (Exception ex)
{
StopServer();
string EmailTo = "*****@*****.**";
string Subject = "FS Movements Error " + DateTime.Now.ToString("MM-dd-yyy hh-mm");;
//AlternateView body=
string Body = "Server Error: " + ex.Message;
mail.CreateMessage(EmailTo, Subject, Body);
mail.SendEmail();
//MessageBox.Show(ex.Message,"Server Error");
return(true);
}
}
public bool AmalgammaFSTI_POMT00(string FSTI_fields, string Ammalgamma_User)
{
POMT00 MyPOMT00 = new POMT00();
#region Campos
//PO_Number, Vendor_ID, Terms
//0 , 1 , 2
string[] Fields_Array = FSTI_fields.Split(',');
//PO_Number
MyPOMT00.PONumber.Value = Fields_Array[0];
//Vendor_ID
MyPOMT00.VendorID.Value = Fields_Array[1];
//Terms
MyPOMT00.TermsCode.Value = Fields_Array[2];
#endregion
#region Ejecucion
CDFResponse = MyPOMT00.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyPOMT00, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT00", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT00", Trans_Error_Msg);
return(false);
}
#endregion
}
public bool AmalgammaFSTI_ITMB03(string FSTI_fields, string Ammalgamma_User)
{
ITMB03 MyITMB03 = new ITMB03();
//IntemNumber,Planer,Buyer
string[] Fields_Array = FSTI_fields.Split(',');
//Item Number
string ItemNo = Fields_Array[0];
//Item Planer
string NewPlaner = Fields_Array[1];
//Item Buyer
string NewBuyer = Fields_Array[1];
MyITMB03.ItemNumber.Value = ItemNo;
MyITMB03.Planner.Value = NewPlaner;
MyITMB03.Buyer.Value = NewBuyer;
//myMORV00.
CDFResponse = MyITMB03.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyITMB03, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "ITMB03", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "ITMB03", Trans_Error_Msg);
return(false);
}
}
public string[] DumpError(ITransaction transaction, FSTIError fstiErrorObject)
{
List <string> errorLog = new List <string>();
errorLog.Add("Transaction Error:");
errorLog.Add("");
errorLog.Add(String.Format("Transaction: {0}", transaction.Name));
errorLog.Add(String.Format("Description: {0}", fstiErrorObject.Description));
errorLog.Add(String.Format("MessageFound: {0} ", fstiErrorObject.MessageFound));
errorLog.Add(String.Format("MessageID: {0} ", fstiErrorObject.MessageID));
errorLog.Add(String.Format("MessageSource: {0} ", fstiErrorObject.MessageSource));
errorLog.Add(String.Format("Number: {0} ", fstiErrorObject.Number));
errorLog.Add(String.Format("Fields in Error: {0} ", fstiErrorObject.NumberOfFieldsInError));
for (int i = 0; i < fstiErrorObject.NumberOfFieldsInError; i++)
{
int field = fstiErrorObject.GetFieldNumber(i);
errorLog.Add(String.Format("Field[{0}]: {1}", i, field));
ITransactionField myField = transaction.get_Field(field);
errorLog.Add(String.Format("Field name: {0}", myField.Name));
}
return(errorLog.ToArray());
}
public bool AmalgammaFSTI_POMT11(string FSTI_fields, string Ammalgamma_User)
{
POMT11 MyPOMT11 = new POMT11();
#region Campos
//PO_Number, PO_Line, Line_QTY, Line_Status, Item_Num, StartDate, EndDate, Unit_price, PromDate, Line_Type
//0 , 1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9
string[] Fields_Array = FSTI_fields.Split(',');
//PO_Number
MyPOMT11.PONumber.Value = Fields_Array[0];
//PO_Line
MyPOMT11.POLineNumber.Value = Fields_Array[1];
//Line_QTY
MyPOMT11.LineItemOrderedQuantity.Value = Fields_Array[2];
//Line_Status
MyPOMT11.POLineStatus.Value = Fields_Array[3];
//Item_Num
MyPOMT11.ItemNumber.Value = Fields_Array[4];
//Star Date
MyPOMT11.NeededDate.Value = Fields_Array[5];
//End Date
MyPOMT11.PromisedDate.Value = Fields_Array[6];
//Unit_price
MyPOMT11.ItemUnitCost.Value = Fields_Array[7];
//Prom_date
MyPOMT11.PromisedDateOld.Value = Fields_Array[8];
//Line_Type
MyPOMT11.POLineSubType.Value = Fields_Array[9];
#endregion
#region Ejecucion
CDFResponse = MyPOMT11.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyPOMT11, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT11", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
DetailError.Clear();
DumpErrorObject(MyPOMT11, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT11", Trans_Error_Msg);
return(false);
}
#endregion
}
public bool AmalgammaFSTI_POMT10(string FSTI_fields, string Ammalgamma_User)
{
POMT10 MyPOMT10 = new POMT10();
#region Campos
//PO_Number, Line_QTY, Line_Status, Line_Type, Item_Num, Prom_Date, Blanket, UM, Unit_price
//0 , 1 , 2 , 3 , 4 , 5 , 6 , 7 , 8
string[] Fields_Array = FSTI_fields.Split(',');
//PO_Number
MyPOMT10.PONumber.Value = Fields_Array[0];
//Line_QTY
MyPOMT10.LineItemOrderedQuantity.Value = Fields_Array[1];
//Line_Type
MyPOMT10.POLineStatus.Value = Fields_Array[2];
//Line_Type
MyPOMT10.POLineType.Value = Fields_Array[3];
//Item_Num
MyPOMT10.ItemNumber.Value = Fields_Array[4];
//Prom_date
MyPOMT10.PromisedDate.Value = "102013";
MyPOMT10.NeededDate.Value = "021414";
//MyPOMT10.PromisedDate.Value = Fields_Array[5];
//MyPOMT10.NeededDate.Value = Fields_Array[5];
//Blanket
MyPOMT10.IsBlanketOrNonBlanket.Value = Fields_Array[6];
//PO_UM
MyPOMT10.POLineUM.Value = Fields_Array[7];
//Unit_price
MyPOMT10.ItemUnitCost.Value = Fields_Array[8];
#endregion
#region Ejecucion
CDFResponse = MyPOMT10.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyPOMT10, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT10", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
DetailError.Clear();
DumpErrorObject(MyPOMT10, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "POMT10", Trans_Error_Msg);
return(false);
}
#endregion
}
public bool AmalgammaFSTI_PORV01(string FSTI_fields, string Ammalgamma_User)
{
//Transaction Object
PORV01 MyPORV01 = new PORV01();
#region Campos
//PO_Number, Ln#, Receiving_Type, Quantity_Received, Stk, Bin, Item, Promised_Date
//0 , 1 , 2 , 3 , 4 , 5 , 6 , 7
string[] Fields_Array = FSTI_fields.Split(',');
//PO_Number
MyPORV01.PONumber.Value = Fields_Array[0];
//PO_Line#
MyPORV01.POLineNumber.Value = Fields_Array[1];
//Receiving_Type
MyPORV01.POReceiptActionType.Value = Fields_Array[2];
//QTY RECV
MyPORV01.ReceiptQuantity.Value = Fields_Array[3];//TOTAL
MyPORV01.ReceiptQuantityMove1.Value = Fields_Array[3];
//STK
MyPORV01.Stockroom1.Value = Fields_Array[4];//TOTAL
//BIN
MyPORV01.Bin1.Value = Fields_Array[5];
//Item Number
MyPORV01.ItemNumber.Value = Fields_Array[6];
//Line Tipe
MyPORV01.POLineType.Value = "P";
//Lot assign
MyPORV01.LotNumberAssignmentPolicy.Value = "";
//Promised Date
MyPORV01.PromisedDate.Value = Fields_Array[7];
//Receipt Date
MyPORV01.POReceiptDate.Value = DateTime.Now.ToString("MMddyy");
#endregion
#region Ejecucion
CDFResponse = MyPORV01.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyPORV01, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "PORV01", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
DumpErrorObject(MyPORV01, itemError);
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "PORV01", Trans_Error_Msg);
return(false);
}
#endregion
}
public bool AmalgammaFSTI_IMTR01(string FSTI_fields, string Ammalgamma_User)
{
//Transaction Object
IMTR01 MyIMTR01 = new IMTR01();
//IntemNumber,STK-BINFrom,InvCatFrom,STK-BINTo,InvCatTo,Qty
string[] Fields_Array = FSTI_fields.Split(',');
//Item Number
MyIMTR01.ItemNumber.Value = Fields_Array[0];
//from
string[] LocFrom = Fields_Array[1].Split('-');
string BinFrom = "";
if (LocFrom.Count() > 2)
{
for (int i = 1; i < LocFrom.Count(); i++)
{
if (i == 1)
{
BinFrom += LocFrom[i];
}
else
{
BinFrom += "-" + LocFrom[i];
}
}
}
else
{
BinFrom = LocFrom[1];
}
MyIMTR01.StockroomFrom.Value = LocFrom[0];
MyIMTR01.BinFrom.Value = BinFrom;
MyIMTR01.InventoryCategoryFrom.Value = Fields_Array[2];
//to
//IntemNumber,STK-BINFrom,InvCatFrom,STK-BINTo,InvCatTo,Qty
string[] LocTo = Fields_Array[3].Split('-');
string BinTo = "";
if (LocTo.Count() > 2)
{
for (int i = 1; i < LocTo.Count(); i++)
{
if (i == 1)
{
BinTo += LocTo[i];
}
else
{
BinTo += "-" + LocTo[i];
}
}
}
else
{
BinTo = LocTo[1];
}
MyIMTR01.StockroomTo.Value = LocTo[0];
MyIMTR01.BinTo.Value = BinTo;
MyIMTR01.InventoryCategoryTo.Value = Fields_Array[4];
//QTY
MyIMTR01.InventoryQuantity.Value = Fields_Array[5];
MyIMTR01.LotIdentifier.Value = "N";
CDFResponse = MyIMTR01.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(MyIMTR01, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "ITMB03", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
// DumpErrorObject(myItem, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "ITMB03", Trans_Error_Msg);
return(false);
}
}
public bool AmalgammaFSTI_MORV00(string FSTI_fields, string Ammalgamma_User)
{
MORV00 myMORV00 = new MORV00();
string[] Fields_Array = FSTI_fields.Split(',');
#region Fields
//fields= MO_NO,LN_NO,RECV_QTY,ITEM,STK,BIN
string MO_NO = Fields_Array[0]; //
string LN_NO = Fields_Array[1]; //
string RECV_TYPE = "R"; //
string RECV_QTY = Fields_Array[2]; //
string LN_TYPE = "M"; //
string ITEM = Fields_Array[3]; //
string MOVE_QTY = RECV_QTY;
string STK = Fields_Array[4];
string BIN = Fields_Array[5];
string INV_CAT = "O";
string INSP_CODE = "G";
string NEW_LOT = "";
string LOT_ASSIGN_POL = "";
//MO Number
myMORV00.MONumber.Value = MO_NO;
//MO Line
myMORV00.MOLineNumber.Value = LN_NO;
//MO Line Type
myMORV00.MOLineType.Value = LN_TYPE;
//Reciving Type
myMORV00.ReceivingType.Value = RECV_TYPE;
//Reciving QTY
myMORV00.ReceiptQuantity.Value = RECV_QTY;
//Item Number
myMORV00.ItemNumber.Value = ITEM;
//Move QTY
myMORV00.MoveQuantity1.Value = RECV_QTY;
//Stock
myMORV00.Stockroom1.Value = STK;
//Bin
myMORV00.Bin1.Value = BIN;
//Inventory Category
myMORV00.InventoryCategory1.Value = INV_CAT;
//Inspection Code
myMORV00.InspectionCode1.Value = INSP_CODE;
//myMORV00.
#endregion
CDFResponse = myMORV00.GetString(TransactionStringFormat.fsCDF);
if (_fstiClient.ProcessId(myMORV00, null))
{
//
FSTI_ErrorMsg = "";
Trans_Error_Msg = "";
FSTI_Log(CDFResponse, Ammalgamma_User, "MORV00", "");
return(true);
}
else
{
// failure, retrieve the error object
// and then dump the information in the list box
itemError = null;
itemError = _fstiClient.TransactionError;
Trans_Error_Msg = itemError.Description;
DumpErrorObject(myMORV00, itemError);
FSTI_Log(CDFResponse, Ammalgamma_User, "MORV00", Trans_Error_Msg);
return(false);
}
}
