public static void Unir_DataTables(SAPbouiCOM.DataTable DT1, SAPbouiCOM.DataTable DT2)
{
try
{
for (int iRow = 0; iRow <= DT2.Rows.Count - 1; iRow++)
{
DT1.Rows.Add();
int nRow = DT1.Rows.Count - 1;
for (int iCol = 0; iCol <= DT2.Columns.Count - 1; iCol++)
{
try
{
DT1.SetValue(iCol, nRow, DT2.GetValue(iCol, iRow));
}
catch (Exception)
{
}
}
}
}
catch (Exception)
{
}
}
public SAPbouiCOM.DataTable GenerarEncabezado(SAPbouiCOM.DataTable DT_SQL, SAPbouiCOM.DataTable DT_HEAD)
{
try
{
string FechaPago = DT_SQL.GetValue(0, 0).ToString();
string CantidadPagos = DT_SQL.GetValue(0, 1).ToString();
string MontoPagos = DT_SQL.GetValue(0, 2).ToString();//.Replace(".","");
string[] SeparaTotal = MontoPagos.Split('.');
string MontoEntero = SeparaTotal[0];
string MontoDecimal = SeparaTotal.Count() == 1 ? "00" : MontoPagos.Split('.')[1];
string sql = @"EXEC [dbo].[Min_Bancos_Generar_Encabezado_Archivo_PagoTXT]
@U_FechaPago = N'" + FechaPago + @"',
@U_CantidadPago = N'" + CantidadPagos + @"',
@U_MontoTotal = N'" + MontoEntero + MontoDecimal + "'";
DT_HEAD.ExecuteQuery(sql);
//Hay que establecer la columana de tipo TEXT para que puedan agregarse posteriormente los rgistros de detalle
string RC = DT_HEAD.GetValue(0, 0).ToString().Trim();
DT_HEAD.Clear();
DT_HEAD.Columns.Add("Info", SAPbouiCOM.BoFieldsType.ft_Text);
DT_HEAD.Rows.Add(1);
DT_HEAD.SetValue("Info", 0, RC);
//DT_HEAD.SetValue("Info", 0, "RC00354803021120160000100000000016184000578509689910000968991000 [email protected]");
}
catch (Exception) {}
return(DT_HEAD);
}
public override void etAfterCfl(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
{
base.etAfterCfl(ref pVal, ref BubbleEvent);
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.DataTable dtSel = oCFLEvento.SelectedObjects;
if (pVal.ItemUID == txSupplier.Item.UniqueID)
{
if (dtSel != null && dtSel.Rows.Count > 0)
{
string strCode = dtSel.GetValue("CardCode", 0).ToString();
string strName = dtSel.GetValue("CardName", 0).ToString();
dtHead.SetValue("CardCode", 0, strCode);
dtHead.SetValue("CardName", 0, strName);
}
}
}
public static void Cargar_ComboBox(SAPbouiCOM.ComboBox oComboBox, SAPbouiCOM.DataTable oDataTable, string Query, int ValorValue, int ValorDescription, bool ValorVacio)
{
try
{
//oForm = Application.SBO_Application.Forms.Item(FormId) ;
//oComboBox = (SAPbouiCOM.ComboBox) oForm.Items.Item(ComboID).Specific;
//oDTTable = oForm.DataSources.DataTables.Item(DataTableID) ;
oDataTable.ExecuteQuery(Query);
if (ValorVacio) // Agrega primera linea de ComboBox Vacia
{
oComboBox.ValidValues.Add("", "");
}
for (int i = 0; i <= oDataTable.Rows.Count - 1; i++)
{
oComboBox.ValidValues.Add(Convert.ToString(oDataTable.GetValue(ValorValue, i)), Convert.ToString(oDataTable.GetValue(ValorDescription, i)));
}
}
catch (Exception)
{
throw;
}
}
public override void etAfterCfl(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
{
base.etAfterCfl(ref pVal, ref BubbleEvent);
if (pVal.ItemUID == txActCod.Item.UniqueID)
{
int rowind = pVal.Row;
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.DataTable dtSel = oCFLEvento.SelectedObjects;
if (dtSel == null)
{
return;
}
if (dtSel.Rows.Count > 0)
{
string strCode = dtSel.GetValue("AcctCode", 0).ToString();
string strName = dtSel.GetValue("AcctName", 0).ToString();
string strFC = dtSel.GetValue("FormatCode", 0).ToString();
dtHeads.SetValue("AccCode", 0, strCode);
dtHeads.SetValue("AccFC", 0, strFC);
dtHeads.SetValue("AcctName", 0, strName);
//bt.Item.Click();
}
}
if (pVal.ItemUID == "txFAC")
{
int rowind = pVal.Row;
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.DataTable dtSel = oCFLEvento.SelectedObjects;
if (dtSel == null)
{
return;
}
if (dtSel.Rows.Count > 0)
{
string strCode = dtSel.GetValue("ItemCode", 0).ToString();
string strName = dtSel.GetValue("ItemName", 0).ToString();
dtHeads.SetValue("FAC", 0, strCode);
dtHeads.SetValue("FAN", 0, strName);
//bt.Item.Click();
}
}
}
public override void etAfterCfl(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
{
base.etAfterCfl(ref pVal, ref BubbleEvent);
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.DataTable dtSel = oCFLEvento.SelectedObjects;
if (pVal.ItemUID == txDfltExp.Item.UniqueID)
{
if (dtSel != null && dtSel.Rows.Count > 0)
{
string strCode = dtSel.GetValue("AcctCode", 0).ToString();
string strName = dtSel.GetValue("AcctName", 0).ToString();
dtSetting.SetValue("dfltExp", 0, strCode);
oForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
private void addEmptyRow(SAPbouiCOM.Matrix mt, SAPbouiCOM.DataTable dt, string firstCol)
{
if (dt.Rows.Count == 0)
{
dt.Rows.Add(2);
dt.Rows.Remove(1);
dt.SetValue("Id", 0, "1");
mt.AddRow(1, mt.RowCount + 1);
}
else
{
if (Convert.ToString(dt.GetValue(firstCol, dt.Rows.Count - 1)) == "")
{
string strCostCode = Convert.ToString(dt.GetValue(firstCol, dt.Rows.Count - 1));
}
else
{
mt.AddRow(1, mt.RowCount + 1);
mt.SetLineData(mt.RowCount);
mt.FlushToDataSource();
dt.SetValue("Id", dt.Rows.Count - 1, dt.Rows.Count.ToString());
dt.SetValue(firstCol, dt.Rows.Count - 1, "");
BOQD.SetValue("STD", dt.Rows.Count - 1, "");
BOQD.SetValue("ETD", dt.Rows.Count - 1, "");
BOQD.SetValue("WBL", dt.Rows.Count - 1, "");
BOQD.SetValue("WBD", dt.Rows.Count - 1, "");
BOQD.SetValue("Type", dt.Rows.Count - 1, "");
BOQD.SetValue("Code", dt.Rows.Count - 1, "");
BOQD.SetValue("Name", dt.Rows.Count - 1, "");
BOQD.SetValue("Remarks", dt.Rows.Count - 1, "");
BOQD.SetValue("Qty", dt.Rows.Count - 1, "0");
BOQD.SetValue("UP", dt.Rows.Count - 1, "0");
BOQD.SetValue("BGTC", dt.Rows.Count - 1, "0");
mt.SetLineData(mt.RowCount);
}
}
// mt.LoadFromDataSource();
}
public SAPbouiCOM.DataTable GenerarArchivoDT(SAPbouiCOM.DataTable DT_HEAD, SAPbouiCOM.DataTable DT_ROWS, SAPbouiCOM.DataTable DT_TXT)
{
try
{
for (int j = 0; j <= DT_ROWS.Rows.Count - 1; j++)
{
string Linea = Convert.ToString(DT_ROWS.GetValue(0, j));
DT_HEAD.Rows.Add();
DT_HEAD.SetValue(0, DT_HEAD.Rows.Count - 1, DT_ROWS.GetValue(0, j).ToString());
//Linea = Convert.ToString(DT_HEAD.GetValue(0, DT_HEAD.Rows.Count - 1));
}
DT_TXT.CopyFrom(DT_HEAD);
}
catch (Exception) { }
return(DT_TXT);
}
private void AddTravelExpenses(TravelExpMovTypesEnum pEnumMovType, int pIntRepeat, int pIntDays = 1)
{
try
{
for (int i = 0; i < pIntRepeat; i++)
{
dtTravelExp.Rows.Add();
dtTravelExp.SetValue("#", dtTravelExp.Rows.Count - 1, dtTravelExp.Rows.Count + 1);
dtTravelExp.SetValue("MovType", dtTravelExp.Rows.Count - 1, pEnumMovType);
dtTravelExp.SetValue("MovCode", dtTravelExp.Rows.Count - 1, ((int)pEnumMovType).ToString());
dtTravelExp.SetValue("Commts", dtTravelExp.Rows.Count - 1, string.Empty);
dtTravelExp.SetValue("TravDays", dtTravelExp.Rows.Count - 1, mIntDaysTotal);
if (pEnumMovType == TravelExpMovTypesEnum.DayExpenses.Value) //operadores
{
dtTravelExp.SetValue("EmpCode", dtTravelExp.Rows.Count - 1, (mDtEmployees.GetValue(1, i).ToString() == "0") ? mStrSupervisorCode : mDtEmployees.GetValue(1, i));
dtTravelExp.SetValue("EmpName", dtTravelExp.Rows.Count - 1, string.IsNullOrEmpty(mDtEmployees.GetValue(2, i).ToString()) ? mStrSupervisorName : mDtEmployees.GetValue(2, i));
dtTravelExp.SetValue("AcctCode", dtTravelExp.Rows.Count - 1, mStrExpDayAcct);
dtTravelExp.SetValue("TravPrice", dtTravelExp.Rows.Count - 1, mDblExpDayPrice);
dtTravelExp.SetValue("TravImp", dtTravelExp.Rows.Count - 1, mIntDaysTotal * mDblExpDayPrice);
dtTravelExp.SetValue("EmpType", dtTravelExp.Rows.Count - 1, EmployeesTypesEnum.Operators.GetDescription());
}
else if (pEnumMovType == TravelExpMovTypesEnum.TravelExpenses) //supervisor
{
dtTravelExp.SetValue("EmpCode", dtTravelExp.Rows.Count - 1, mStrSupervisorCode);
dtTravelExp.SetValue("EmpName", dtTravelExp.Rows.Count - 1, mStrSupervisorName);
dtTravelExp.SetValue("AcctCode", dtTravelExp.Rows.Count - 1, mStrViaticExpAcct);
dtTravelExp.SetValue("TravPrice", dtTravelExp.Rows.Count - 1, mDblViaticPrice);
dtTravelExp.SetValue("TravImp", dtTravelExp.Rows.Count - 1, mIntDaysTotal * mDblViaticPrice);
dtTravelExp.SetValue("EmpType", dtTravelExp.Rows.Count - 1, EmployeesTypesEnum.Supervisors.GetDescription());
}
else if (pEnumMovType == TravelExpMovTypesEnum.MinorExpenses) //supervisor
{
dtTravelExp.SetValue("EmpCode", dtTravelExp.Rows.Count - 1, mStrSupervisorCode);
dtTravelExp.SetValue("EmpName", dtTravelExp.Rows.Count - 1, mStrSupervisorName);
dtTravelExp.SetValue("AcctCode", dtTravelExp.Rows.Count - 1, mStrMinorPurchAcct);
dtTravelExp.SetValue("TravPrice", dtTravelExp.Rows.Count - 1, 0);
dtTravelExp.SetValue("TravImp", dtTravelExp.Rows.Count - 1, 0);
dtTravelExp.SetValue("EmpType", dtTravelExp.Rows.Count - 1, EmployeesTypesEnum.Supervisors.GetDescription());
}
}
mtxTravelExp.LoadFromDataSource();
mtxTravelExp.AutoResizeColumns();
if (pEnumMovType == TravelExpMovTypesEnum.MinorExpenses) //supervisor
{
SAPbouiCOM.CommonSetting lObjCmmnSetting = mtxTravelExp.CommonSetting;
lObjCmmnSetting.SetCellEditable(dtTravelExp.Rows.Count, 3, true);
lObjCmmnSetting.SetCellEditable(dtTravelExp.Rows.Count, 5, true);
}
}
catch (Exception lObjException)
{
throw new Exception(string.Format("Error al agregar la solicitud de consumible {0}", lObjException.Message));
}
}
public static List <string> GetColumnValueAsList(this SAPbouiCOM.DataTable control, object column)
{
List <string> values = new List <string>();
for (int i = 0; i < control.Rows.Count; i++)
{
values.Add(control.GetValue(column, i).ToString());
}
return(values);
}
private void Matrix1_LinkPressedBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
{
if (pVal.ColUID == "batch")
{
string batchParam = (Matrix1.Columns.Item("batch").Cells.Item(indexRow).Specific as SAPbouiCOM.EditText).Value;
var batch = AdoNetQueries.getAbsEntry(batchParam);
if (batch != null)
{
this.UIApp.OpenForm((SAPbouiCOM.BoFormObjectEnum) 10000044, null, batch);
}
}
if (pVal.ColUID == "code")
{
SAPbouiCOM.ISBOChooseFromListEventArg chflarg = (SAPbouiCOM.ISBOChooseFromListEventArg)pVal;
SAPbouiCOM.DataTable dt = chflarg.SelectedObjects;
if (dt == null)
{
this.UIAPIRawForm.Freeze(false);
}
string ItemName = dt.GetValue("ItemName", 0).ToString();
string ItemCode = dt.GetValue("ItemCode", 0).ToString();
this.UIAPIRawForm.Items.Item("Item_33").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
Matrix1.Columns.Item("code").Editable = false;
Matrix1.Columns.Item("title").Editable = false;
(Matrix1.Columns.Item("code").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemCode;
(Matrix1.Columns.Item("title").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemName;
Matrix1.Columns.Item("code").Editable = true;
Matrix1.Columns.Item("title").Editable = true;
Matrix1.Columns.Item("batch").Editable = true;
Matrix1.Columns.Item("batch").ChooseFromListUID = "CFL_BatchNumber";
Matrix1.AddRow();
}
BubbleEvent = true;
}
public List <InventoryItemsLinesDTO> DataTableToDTO(SAPbouiCOM.DataTable pObjDataTable)
{
List <InventoryItemsLinesDTO> lLstGoodIssuesLines = new List <InventoryItemsLinesDTO>();
for (int i = 0; i < pObjDataTable.Rows.Count; i++)
{
InventoryItemsLinesDTO lObjGoodIssuesLine = new InventoryItemsLinesDTO();
lObjGoodIssuesLine.ItemCode = pObjDataTable.GetValue("ItemCode", i).ToString();
lObjGoodIssuesLine.ItemName = pObjDataTable.GetValue("ItemName", i).ToString();
//lObjGoodIssuesLine.OriginalQty = double.Parse(pObjDataTable.GetValue("OrigQty", i).ToString());
lObjGoodIssuesLine.Quantity = double.Parse(pObjDataTable.GetValue("Quantity", i).ToString());
lObjGoodIssuesLine.ActivoFijo = pObjDataTable.GetValue("ActiveF", i).ToString();
lObjGoodIssuesLine.Category = pObjDataTable.GetValue("Category", i).ToString();
lLstGoodIssuesLines.Add(lObjGoodIssuesLine);
}
return(lLstGoodIssuesLines);
}
private void Matrix1_ChooseFromListAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal)
{
if (pVal.ColUID == "code")
{
SAPbouiCOM.ISBOChooseFromListEventArg chflarg = (SAPbouiCOM.ISBOChooseFromListEventArg)pVal;
SAPbouiCOM.DataTable dt = chflarg.SelectedObjects;
if (dt == null)
{
this.UIAPIRawForm.Freeze(false); return;
}
string ItemName = dt.GetValue("ItemName", 0).ToString();
string ItemCode = dt.GetValue("ItemCode", 0).ToString();
this.UIAPIRawForm.Items.Item("Item_23").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
Matrix1.Columns.Item("code").Editable = false;
Matrix1.Columns.Item("title").Editable = false;
(Matrix1.Columns.Item("code").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemCode;
(Matrix1.Columns.Item("title").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemName;
Matrix1.Columns.Item("code").Editable = true;
Matrix1.Columns.Item("title").Editable = true;
Matrix1.Columns.Item("batch").Editable = true;
Matrix1.Columns.Item("batch").ChooseFromListUID = "CFL_BatchNumber";
Matrix1.AddRow();
(Matrix1.Columns.Item("insID").Cells.Item(pVal.Row + 1).Specific as SAPbouiCOM.EditText).Value = EditText7.Value;
}
if (pVal.ColUID == "batch")
{
SAPbouiCOM.ISBOChooseFromListEventArg chflarg = (SAPbouiCOM.ISBOChooseFromListEventArg)pVal;
SAPbouiCOM.DataTable dt = chflarg.SelectedObjects;
if (dt == null)
{
this.UIAPIRawForm.Freeze(false); return;
}
try
{
var a = dt.GetValue("BatchNum", 0).ToString();
(Matrix1.Columns.Item("batch").Cells.Item(indexRow).Specific as SAPbouiCOM.EditText).Value = a;
}
catch
{
(Matrix1.Columns.Item("batch").Cells.Item(indexRow).Specific as SAPbouiCOM.EditText).Value = dt.GetValue("BatchNum", 0).ToString();
UIApp.Forms.ActiveForm.Close();
}
indexRow = pVal.Row;
}
}
/// <summary>
/// Create a new SAP Datatable and copy the contents from the table passed as parameter
/// </summary>
/// <param name="tempBatches">DataTable to copy from</param>
/// <returns>Return a new SAP DataTable</returns>
private System.Data.DataTable CopySelectedBatchesDataTable(SAPbouiCOM.DataTable tempBatches)
{
System.Data.DataTable newDataTable = new System.Data.DataTable();
newDataTable.Columns.Add("Batch", typeof(string));
newDataTable.Columns.Add("Selected Qty", typeof(string));
for (int x = 0; x < tempBatches.Rows.Count; x++)
{
System.Data.DataRow dr = newDataTable.NewRow();
var batchValue = tempBatches.GetValue("Batch", x);
var batchQuantity = tempBatches.GetValue("Selected Qty", x);
if (batchValue.ToString() != string.Empty && batchQuantity.ToString() != string.Empty)
{
dr["Batch"] = tempBatches.GetValue("Batch", x);
dr["Selected Qty"] = tempBatches.GetValue("Selected Qty", x);
newDataTable.Rows.Add(dr);
}
}
return(newDataTable);
}
private static void GestionarSeleccionCFL(SAPbouiCOM.Form oForm, SAPbouiCOM.ItemEvent pVal)
{
SAPbouiCOM.IChooseFromListEvent oCFLEvento = null;
String CflID = string.Empty;
SAPbouiCOM.ChooseFromList oCFL = null;
SAPbouiCOM.DataTable oDataTable = null;
try
{
oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal));
CflID = oCFLEvento.ChooseFromListUID;
oCFL = oForm.ChooseFromLists.Item(CflID);
oDataTable = oCFLEvento.SelectedObjects;
if (oDataTable != null)
{
switch (CflID)
{
case "CflCC":
oForm.DataSources.UserDataSources.Item("ds_Acc").Value = oDataTable.GetValue("AcctCode", 0).ToString();
break;
case "CflDim1":
oForm.DataSources.UserDataSources.Item("ds_Dim1").Value = oDataTable.GetValue("OcrCode", 0).ToString();
break;
case "CflDim2":
oForm.DataSources.UserDataSources.Item("ds_Dim2").Value = oDataTable.GetValue("OcrCode", 0).ToString();
break;
case "CflDim3":
oForm.DataSources.UserDataSources.Item("ds_Dim3").Value = oDataTable.GetValue("OcrCode", 0).ToString();
break;
case "CflDim4":
oForm.DataSources.UserDataSources.Item("ds_Dim4").Value = oDataTable.GetValue("OcrCode", 0).ToString();
break;
case "CflDim5":
oForm.DataSources.UserDataSources.Item("ds_Dim5").Value = oDataTable.GetValue("OcrCode", 0).ToString();
break;
default:
break;
}
}
}
catch (Exception ex)
{
Conexion_SBO.m_SBO_Appl.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
}
finally
{
FuncionesComunes.LiberarObjetoGenerico(oCFLEvento);
FuncionesComunes.LiberarObjetoGenerico(oCFL);
FuncionesComunes.LiberarObjetoGenerico(oDataTable);
}
}
public override void etAfterCfl(ref SAPbouiCOM.ItemEvent pVal, ref bool BubbleEvent)
{
base.etAfterCfl(ref pVal, ref BubbleEvent);
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.DataTable dtSel = oCFLEvento.SelectedObjects;
if (pVal.ItemUID == txCode.Item.UniqueID)
{
if (dtSel != null && dtSel.Rows.Count > 0)
{
string strCode = dtSel.GetValue("ItemCode", 0).ToString();
string strName = dtSel.GetValue("ItemName", 0).ToString();
string Remarks = dtSel.GetValue("U_B1_BOQREM", 0).ToString();
string Qty = dtSel.GetValue("U_B1_BOQQty", 0).ToString();
double APC = getAPCCost(strCode);
BOQH.SetValue("ItemCode", 0, strCode);
BOQH.SetValue("ItemName", 0, strName);
BOQH.SetValue("Remarks", 0, Remarks);
BOQH.SetValue("Qty", 0, Qty);
BOQH.SetValue("APC", 0, APC);
fillDetails(strCode);
getIndirectCost(strCode);
addEmptyRow(mtDC, BOQD, "CostCode");
}
}
if (pVal.ItemUID == mtDC.Item.UniqueID && pVal.ColUID == "cCode")
{
if (dtSel != null && dtSel.Rows.Count > 0)
{
SAPbouiCOM.ComboBox cbColType = (SAPbouiCOM.ComboBox)mtDC.Columns.Item("cType").Cells.Item(pVal.Row).Specific;
if (cbColType.Selected.Value == "I")
{
string strCode = dtSel.GetValue("ItemCode", 0).ToString();
string strName = dtSel.GetValue("ItemName", 0).ToString();
BOQD.SetValue("Code", pVal.Row - 1, strCode);
BOQD.SetValue("Name", pVal.Row - 1, strName);
}
if (cbColType.Selected.Value == "S")
{
string strCode = dtSel.GetValue("AcctCode", 0).ToString();
string strName = dtSel.GetValue("AcctName", 0).ToString();
BOQD.SetValue("Code", pVal.Row - 1, strCode);
BOQD.SetValue("Name", pVal.Row - 1, strName);
}
mtDC.LoadFromDataSource();
}
}
}
/// <summary>
/// Create a new SAP Datatable and copy the contents from the table passed as parameter
/// </summary>
/// <param name="tempBatches">DataTable to copy from</param>
/// <returns>Return a new SAP DataTable</returns>
private System.Data.DataTable CopyBatchesDataTable(SAPbouiCOM.DataTable tempBatches)
{
System.Data.DataTable newDataTable = new System.Data.DataTable();
newDataTable.Columns.Add("ItemCode", typeof(string));
newDataTable.Columns.Add("DistNumber", typeof(string));
newDataTable.Columns.Add("Quantity", typeof(string));
newDataTable.Columns.Add("WhsCode", typeof(string));
newDataTable.Columns.Add("AvgPrice", typeof(double));
newDataTable.Columns.Add("Selected Qty", typeof(string));
for (int x = 0; x < tempBatches.Rows.Count; x++)
{
System.Data.DataRow dr = newDataTable.NewRow();
dr["ItemCode"] = tempBatches.GetValue("ItemCode", x);
dr["DistNumber"] = tempBatches.GetValue("DistNumber", x);
dr["Quantity"] = tempBatches.GetValue("Quantity", x);
dr["WhsCode"] = tempBatches.GetValue("WhsCode", x);
dr["AvgPrice"] = tempBatches.GetValue("AvgPrice", x);
dr["Selected Qty"] = tempBatches.GetValue("Selected Qty", x);;
newDataTable.Rows.Add(dr);
}
return(newDataTable);
}
private void gvRecBatches_ValidateBefore(object sboObject, SAPbouiCOM.SBOItemEventArg pVal, out bool BubbleEvent)
{
var bubbleEventResult = true;
var enteredValue = dtRecBatches.GetValue(pVal.ColUID, pVal.Row).ToString();
var totalQuantityNeeded = Convert.ToDouble(dtRecDocuments.GetValue("TotalNeeded", currentRecDocumentIndex));
double totalSelectedValue = 0;
if (pVal.ColUID.Equals("Selected Qty"))
{
if (enteredValue == string.Empty || !Utilities.IsNumber(enteredValue))
{
Application.SBO_Application.MessageBox("Only numbers allowed");
bubbleEventResult = false;
}
else
{
for (int i = 0; i < dtRecBatches.Rows.Count; i++)
{
var selectedQuantity = (string)dtRecBatches.GetValue("Selected Qty", i) == string.Empty ? 0 : Convert.ToDouble(dtRecBatches.GetValue("Selected Qty", i));
totalSelectedValue += selectedQuantity;
}
if (totalSelectedValue > totalQuantityNeeded)
{
bubbleEventResult = false;
Application.SBO_Application.MessageBox("Quantity is over needed.");
}
else
{
dtRecDocuments.SetValue("TotalSelected", currentRecDocumentIndex, totalSelectedValue);
}
}
}
else
{
bubbleEventResult = true;
}
BubbleEvent = bubbleEventResult;
}
public SAPbouiCOM.DataTable GenerarEncabezadoFormato610(SAPbouiCOM.DataTable DT_SQL, SAPbouiCOM.DataTable DT_RESULT)
{
try
{
string FechaPago = DT_SQL.GetValue(0, 0).ToString();
string CantidadPagos = DT_SQL.GetValue(0, 1).ToString();
string CantidadDocu = DT_SQL.GetValue(0, 3).ToString();;
string MontoPagos = DT_SQL.GetValue(0, 2).ToString();//.Replace(".","");
string[] SeparaTotal = MontoPagos.Split('.');
string MontoEntero = SeparaTotal[0];
string MontoDecimal = SeparaTotal.Count() == 1 ? "00" : MontoPagos.Split('.')[1];
string sql = @"EXEC [dbo].[Min_Bancos_Generar_Encabezado_Archivo_PagoTXT_Formato610]
@U_CantidadPago = N'" + CantidadPagos + @"',
@U_CantidadDocu = N'" + CantidadDocu + @"',
@U_MontoTotal = N'" + MontoEntero + MontoDecimal + "'";
DT_RESULT.ExecuteQuery(sql);
}
catch (Exception) { }
return(DT_RESULT);
}
private void OApplication_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent)
{
BubbleEvent = true;
if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST /*& pVal.FormType.Equals("CFL1")*/)
{
SAPbouiCOM.IChooseFromListEvent oCFLEvento = null;
oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal));
string sCFL_ID = null;
sCFL_ID = oCFLEvento.ChooseFromListUID;
SAPbouiCOM.ChooseFromList oCFl = null;
oCFl = oForm.ChooseFromLists.Item(sCFL_ID);
if (oCFLEvento.BeforeAction == false)
{
SAPbouiCOM.DataTable oDataTable = null;
oDataTable = oCFLEvento.SelectedObjects;
string val = null;
string valN = null;
try
{
val = System.Convert.ToString(oDataTable.GetValue(0, 0));
valN = System.Convert.ToString(oDataTable.GetValue(1, 0));
}
catch
{
}
if (pVal.ItemUID.Equals("EditTxt") | (pVal.ItemUID.Equals("Button")))
{
oForm.DataSources.UserDataSources.Item("EditDS").ValueEx = val;
oForm.DataSources.UserDataSources.Item("EditDSN").ValueEx = valN;
}
}
}
if ((FormUID == "CFL1") & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD))
{
System.Windows.Forms.Application.Exit();
}
}
private void AddSupervisorsCbo()
{
try
{
for (int i = 0; i < mDTTotalsConsumed.Rows.Count; i++)
{
if (!string.IsNullOrEmpty(mDTTotalsConsumed.GetValue("ActCodTR", i).ToString()))
{
cboAF.ValidValues.Add(mDTTotalsConsumed.GetValue("ActCodTR", i).ToString(), mDTTotalsConsumed.GetValue("ActNumTR", i).ToString());
}
}
cboAF.Item.DisplayDesc = true;
if (cboAF.ValidValues.Count > 0)
{
cboAF.Select(0, SAPbouiCOM.BoSearchKey.psk_Index);
}
}
catch (Exception lObjException)
{
throw new Exception(string.Format("Error al cargar el listado de activos fijos: {0}", lObjException.Message));
}
}
private void Matrix0_ChooseFromListAfter(object sboObject, SAPbouiCOM.SBOItemEventArg pVal)
{
SAPbouiCOM.ISBOChooseFromListEventArg chflarg = (SAPbouiCOM.ISBOChooseFromListEventArg)pVal;
SAPbouiCOM.DataTable dt = chflarg.SelectedObjects;
if (dt == null)
{
this.UIAPIRawForm.Freeze(false); return;
}
string ItemName = dt.GetValue("ItemName", 0).ToString();
string ItemCode = dt.GetValue("ItemCode", 0).ToString();
this.UIAPIRawForm.Items.Item("Item_33").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
Matrix0.Columns.Item("code").Editable = false;
Matrix0.Columns.Item("title").Editable = false;
(Matrix0.Columns.Item("code").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemCode;
(Matrix0.Columns.Item("title").Cells.Item(pVal.Row).Specific as SAPbouiCOM.EditText).Value = ItemName;
Matrix0.Columns.Item("code").Editable = true;
Matrix0.Columns.Item("title").Editable = true;
Matrix0.AddRow();
}
public static void Generar_Archivo_TXT(string sRutaArchivo, SAPbouiCOM.DataTable DT_INFO)
{
try
{
StreamWriter archivo = new StreamWriter(sRutaArchivo);
for (int i = 0; i <= DT_INFO.Rows.Count - 1; i++)
{
archivo.WriteLine(DT_INFO.GetValue(0, i).ToString().Replace("<*>", ""));
}
archivo.Close();
}
catch (Exception) {}
}
public static string GetCFL_value(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent, string ItemUID, string CFLID)
{
string ret = "";
BubbleEvent = true;
if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
SAPbouiCOM.IChooseFromListEvent oCFLEvento = null;
oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal));
string sCFL_ID = null;
sCFL_ID = oCFLEvento.ChooseFromListUID;
SAPbouiCOM.Form oForm = null;
oForm = SBO_Application.Forms.Item(FormUID);
SAPbouiCOM.ChooseFromList oCFL = null;
oCFL = oForm.ChooseFromLists.Item(sCFL_ID);
if (oCFLEvento.BeforeAction == false)
{
SAPbouiCOM.DataTable oDataTable = null;
oDataTable = oCFLEvento.SelectedObjects;
string val = null;
try
{
val = System.Convert.ToString(oDataTable.GetValue(0, 0));
}
catch (Exception ex)
{
}
try
{
if (pVal.ItemUID == ItemUID)
{
ret = val;
}
}
catch (Exception ex)
{
SubMain.MessageBox(ex.Message);
}
}
}
if ((FormUID == CFLID) & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD))
{
System.Windows.Forms.Application.Exit();
}
return(ret);
}
public void GetCFL_M1_EDIT(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent, string UDSID, string CFLID)
{
BubbleEvent = true;
if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
SAPbouiCOM.IChooseFromListEvent oCFLEvento = null;
oCFLEvento = ((SAPbouiCOM.IChooseFromListEvent)(pVal));
string sCFL_ID = null;
sCFL_ID = oCFLEvento.ChooseFromListUID;
SAPbouiCOM.Form oForm = null;
oForm = SubMain.SBO_Application.Forms.Item(FormUID);
SAPbouiCOM.ChooseFromList oCFL = null;
oCFL = oForm.ChooseFromLists.Item(sCFL_ID);
if (oCFLEvento.BeforeAction == false)
{
SAPbouiCOM.DataTable oDataTable = null;
oDataTable = oCFLEvento.SelectedObjects;
string val = null;
try
{
val = System.Convert.ToString(oDataTable.GetValue(0, 0));
}
catch (Exception ex)
{
}
try
{
if (pVal.ItemUID == UDSID)
{
if (CFLID == "4")
{
((SAPbouiCOM.EditText)m1.Columns.Item(pVal.ColUID).Cells.Item(pVal.Row).Specific).String = val;
}
}
}
catch (Exception ex)
{
//SubMain.MessageBox(ex.Message);
}
}
}
if ((FormUID == CFLID) & (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_UNLOAD))
{
System.Windows.Forms.Application.Exit();
}
}
private void AfterCFL(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent)
{
BubbleEvent = true;
__Form = __app.Forms.GetForm(pVal.FormTypeEx, pVal.FormTypeCount);
try
{
if (pVal.ItemUID == "Item_0")
{
SAPbouiCOM.EditText BPCode = (SAPbouiCOM.EditText)__Form.Items.Item("Item_0").Specific;
SAPbouiCOM.IChooseFromListEvent chl = (SAPbouiCOM.IChooseFromListEvent)pVal;
SAPbouiCOM.ChooseFromList oCFL = null;
string cflID = chl.ChooseFromListUID;
oCFL = __Form.ChooseFromLists.Item(cflID);
SAPbouiCOM.DataTable dTable = chl.SelectedObjects;
if (dTable != null)
{
try
{
BPCode.String = dTable.GetValue("CardCode", 0);
__Form.Items.Item("Item_1").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
}
catch (Exception ex)
{
__Form.Items.Item("Item_1").Click(SAPbouiCOM.BoCellClickType.ct_Regular);
}
}
}
}
catch (SqlException e)
{
__app.MessageBox(e.Message, 1, "Ok", "", "");
BubbleEvent = false;
}
catch (COMException e)
{
__app.MessageBox(e.Message, 1, "Ok", "", "");
BubbleEvent = false;
}
catch (Exception e)
{
__app.MessageBox(e.Message, 1, "Ok", "", "");
BubbleEvent = false;
}
}
public void ChooseFromListOneValue(object sboObject, SAPbouiCOM.SBOItemEventArg pVal)
{
SAPbouiCOM.EditText uktzedEditText = ((SAPbouiCOM.EditText)sboObject);
if (pVal.ActionSuccess)
{
SAPbouiCOM.SBOChooseFromListEventArg cfl = ((SAPbouiCOM.SBOChooseFromListEventArg)(pVal));
if (cfl.SelectedObjects == null)
{
return;
}
else
{
var iChoose = ((SAPbouiCOM.SBOChooseFromListEventArg)(pVal));
SAPbouiCOM.DataTable dataTable = iChoose.SelectedObjects;
if (dataTable == null || dataTable.Rows.Count == 0)
{
return;
}
string itemCode = dataTable.GetValue(uktzedEditText.ChooseFromListAlias, 0).ToString();
SAPbouiCOM.Form activeForm = Application.SBO_Application.Forms.ActiveForm;
this._Form.Select();
uktzedEditText.Active = true;
try
{
uktzedEditText.String = itemCode;
}
catch
{
}
activeForm.Select();
}
}
if (CFLtoEditTextAlias[uktzedEditText.Item.UniqueID] != null)
{
SetChooseFromList CFLEditText = (SetChooseFromList)CFLtoEditTextAlias[uktzedEditText.Item.UniqueID];
CFLEditText();
}
}
private void populateGrid(String check)
{
try
{
int[] SelectedRows = eCommon.DataTableIndexOf(_dt_CST, "Check", "Y");
StringBuilder oSB = new StringBuilder();
foreach (int Row in SelectedRows)
{
oSB.Append(String.Format("{0},", _dt_CST.GetValue("DocEntry", Row)));
}
String strQuery = String.Format(TWM_KDS_AddOn.Src.Resource.Queries.TWM_GET_SO_GRID, oSB.Append("0").ToString(), check);
_dt_LST.ExecuteQuery(strQuery);
// if no results from query delete first row which is empty
if (_grid_CST.DataTable.GetValue("ItemNo", 0).ToString().Length < 1)
{
_grid_CST.DataTable.Rows.Remove(0);
}
_grid_CST.Columns.Item(0).Type = SAPbouiCOM.BoGridColumnType.gct_CheckBox;
_grid_CST.Columns.Item("ItemNo").Editable = false;
_grid_CST.Columns.Item("BP Catalog No").Editable = false;
_grid_CST.Columns.Item("Item Description").Editable = false;
_grid_CST.Columns.Item("Total Amount").Editable = false;
_grid_CST.Columns.Item("Warehouse").Editable = false;
_grid_CST.Columns.Item("Delivery Date").Editable = false;
_grid_CST.Columns.Item("Doc_Type").Visible = false;
_grid_CST.Columns.Item("Doc_Entry").Visible = false;
_grid_CST.Columns.Item("Line_Num").Visible = false;
// link button for itemNo
SAPbouiCOM.EditTextColumn oEditColItemNo;
oEditColItemNo = ((SAPbouiCOM.EditTextColumn)(_grid_CST.Columns.Item("ItemNo")));
oEditColItemNo.LinkedObjectType = "4";
// link button for WareHouse
SAPbouiCOM.EditTextColumn oEditColWarehouse;
oEditColWarehouse = ((SAPbouiCOM.EditTextColumn)(_grid_CST.Columns.Item("Warehouse")));
oEditColWarehouse.LinkedObjectType = "64";
updateFields();
}
catch (Exception Ex) { eCommon.SBO_Application.StatusBar.SetText(Ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error); }
}
private void updateModuleSetup()
{
mtAddon.FlushToDataSource();
string updateAddon = "";
for (int i = 0; i < dtHead.Rows.Count; i++)
{
updateAddon += "Update [@DEM_MODULES] set U_LicenseKey='" + dtHead.GetValue("LK", i).ToString() + "',U_Enabled='" + dtHead.GetValue("Active", i).ToString() + "' where Code='" + dtHead.GetValue("AC", i).ToString() + "' ;";
}
int result = Program.objHrmsUI.ExecQuery(updateAddon, "Updating Module Setup");
saveSettings();
Program.objHrmsUI.createConfigurationTables();
Program.objHrmsUI.loadSettings();
Program.objHrmsUI.loadAddons();
}
private void ChooseFromListAfterEvent(SAPbouiCOM.ItemEvent pObjValEvent)
{
if (pObjValEvent.Action_Success)
{
SAPbouiCOM.IChooseFromListEvent lObjCFLEvento = (SAPbouiCOM.IChooseFromListEvent)pObjValEvent;
if (lObjCFLEvento.SelectedObjects == null)
{
return;
}
SAPbouiCOM.DataTable lObjDataTable = lObjCFLEvento.SelectedObjects;
if (lObjDataTable.UniqueID == "CFLSup")
{
mStrClientCode = Convert.ToString(lObjDataTable.GetValue(0, 0));
this.UIAPIRawForm.DataSources.UserDataSources.Item(lObjDataTable.UniqueID).ValueEx = lObjDataTable.GetValue(1, 0).ToString();
}
}
}