private void LoadDataMatrix()
{
SAPbouiCOM.DBDataSource oDBDataSource = oForm.DataSources.DBDataSources.Item("@Z_COMI_COMGRP");
oDBDataSource.Query();
oDBDataSource.InsertRecord(oDBDataSource.Size);
//MatrixExtensions.AddLineMatrixDBDataSource(Matrix0, oDBDataSource);
int nProxCode = UDOExtensions.GetNextCode("Z_COMI_COMGRP", NConexion.Verifica_Conexion(Program.oCompany));
oDBDataSource.SetValue("Code", oDBDataSource.Size - 1, nProxCode.ToString());
oDBDataSource.SetValue("DocEntry", oDBDataSource.Size - 1, nProxCode.ToString());
Matrix0.LoadFromDataSource();
Matrix0.CommonSetting.SetCellEditable(oDBDataSource.Size, 3, true);
MatrixExtensions.SelectMatrixRowSetFocus(ref Matrix0, "Col_2", oDBDataSource.Size);
}
private void insertToDS(int index, string val0, string val1 = null, string val2 = null, string val3 = null,
string val4 = null, string val5 = null, string val6 = null, string val7 = "N")
{
dsEquipo.SetValue("DocEntry", dsEquipo.Size - 1, val0);
dsEquipo.SetValue("Code", dsEquipo.Size - 1, val1);
dsEquipo.SetValue("Name", dsEquipo.Size - 1, val2);
dsEquipo.SetValue("U_MSSM_MOD", dsEquipo.Size - 1, val3);
dsEquipo.SetValue("U_MSSM_SER", dsEquipo.Size - 1, val4);
dsEquipo.SetValue("U_MSSM_COL", dsEquipo.Size - 1, val5);
dsEquipo.SetValue("U_MSSM_IDU", dsEquipo.Size - 1, val6);
dsEquipo.SetValue("U_MSSM_VAL", dsEquipo.Size - 1, val7);
}
public void SetValueViaDBS(ref SAPbouiCOM.Form oForm, String table, String field, Object value)
{
try
{
SAPbouiCOM.DBDataSource oDBS = oForm.DataSources.DBDataSources.Item(table);
oDBS.SetValue(field, 0, value.ToString());
}
catch (Exception ex)
{
AddOnUtilities.MsgBoxWrapper(ex.Message + " " + ex.StackTrace);
}
}
public static void SetValue(ref SAPbouiCOM.Form oForm, String tableName, String newValue, String fieldIndex, int rowIndex = 0)
{
try
{
SAPbouiCOM.DBDataSource dbDataSource = oForm.DataSources.DBDataSources.Item(tableName);
dbDataSource.SetValue(fieldIndex, rowIndex, newValue);
}
catch (Exception ex)
{
AddOnUtilities.MsgBoxWrapper(ex.Message + " " + ex.StackTrace);
}
}
/// <summary>
/// Method to Set Value
/// </summary>
/// <param name="oForm"></param>
/// <param name="tableName"></param>
/// <param name="newValue"></param>
/// <param name="fieldIndex"></param>
/// <param name="rowIndex"></param>
public static void SetValue(SAPbouiCOM.Form oForm, string tableName, string newValue, string fieldIndex, [Optional] int rowIndex)
{
try
{
SAPbouiCOM.DBDataSource dbDataSource = oForm.DataSources.DBDataSources.Item(tableName);
dbDataSource.SetValue(fieldIndex, rowIndex, newValue);
}
catch (Exception ex)
{
PublicVariable.oApplication.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Error);
}
}
void SetValueviaDBS(SAPbouiCOM.Form oForm, string table, string field, string value)
{
try
{
SAPbouiCOM.DBDataSource oDBS = oForm.DataSources.DBDataSources.Item(table);
oDBS.SetValue(field, 0, value);
}
catch (Exception ex)
{
Events.App_StatusBarEvent(
ex.Message
, SAPbouiCOM.BoMessageTime.bmt_Short
, SAPbouiCOM.BoStatusBarMessageType.smt_Warning);
}
}
private static void Cargar_Datos_Matrix()
{
try
{
//oForm = Application.SBO_Application.Forms.ActiveForm;
oDTTable = oForm.DataSources.DataTables.Item("DT_SQL1");
SAPbouiCOM.DBDataSource source = oForm.DataSources.DBDataSources.Item("@ZDFER");
oForm.Freeze(true);
string sql = "SELECT * FROM [@ZDFER] ORDER BY U_Fecha";
oDTTable.ExecuteQuery(sql);
oMatrix = (SAPbouiCOM.Matrix)oForm.Items.Item("3").Specific;
oMatrix.FlushToDataSource();
source.Clear();
oMatrix.Clear();
for (int i = 0; i < oDTTable.Rows.Count; i++)
{
source.InsertRecord(source.Size);
source.Offset = source.Size - 1;
source.SetValue("Code", source.Size - 1, Convert.ToString(oDTTable.GetValue("Code", i)));
//DateTime fecha = (DateTime)oDTTable.GetValue("U_Fecha", i);
source.SetValue("U_Fecha", source.Size - 1, Convert.ToDateTime(oDTTable.GetValue("U_Fecha", i)).ToString("yyyyMMdd"));
source.SetValue("U_Descripcion", source.Size - 1, Convert.ToString(oDTTable.GetValue("U_Descripcion", i)));
source.SetValue("DocEntry", source.Size - 1, Convert.ToString(oDTTable.GetValue("DocEntry", i)));
}
sql = "SELECT MAX(CAST(Code as int)) + 1 as Proximo FROM [@ZDFER]";
oDTTable.ExecuteQuery(sql);
source.InsertRecord(source.Size);
source.Offset = source.Size - 1;
source.SetValue("Code", source.Size - 1, Convert.ToString(oDTTable.GetValue("Proximo", 0)));
source.SetValue("DocEntry", source.Size - 1, Convert.ToString(oDTTable.GetValue("Proximo", 0)));
oMatrix.LoadFromDataSource();
oMatrix.AutoResizeColumns();
}
catch (Exception)
{
}
finally
{
oForm.Freeze(false);
}
}
private void insertToDS(int index, string val0, string val1, string val2, string val3, string val4, string val5)
{
try
{
dsTipoUsuario.SetValue("DocEntry", dsTipoUsuario.Size - 1, val0);
dsTipoUsuario.SetValue("Code", dsTipoUsuario.Size - 1, val1);
dsTipoUsuario.SetValue("Name", dsTipoUsuario.Size - 1, val2);
dsTipoUsuario.SetValue("U_MSSM_HAB", dsTipoUsuario.Size - 1, val3);
dsTipoUsuario.SetValue("U_MSSM_SUP", dsTipoUsuario.Size - 1, val4);
dsTipoUsuario.SetValue("U_MSSM_COB", dsTipoUsuario.Size - 1, val5);
}
catch (Exception e)
{
StatusMessageError("insertToDS() > " + e.Message);
}
}
public void iniciarValoresPorDefecto()
{
if (cboPerfil.ValidValues.Count == 0)
{
var perfiles = TipoUsuarioDAO.listar();
foreach (var item in perfiles)
{
cboPerfil.ValidValues.Add(item.codigo, item.descripcion);
}
}
if (cboSeries.ValidValues.Count == 0)
{
var series = SeriesDAO.listar();
foreach (var item in series)
{
cboSeries.ValidValues.Add(item.codigo, item.descripcion);
}
}
dsDetAlmacenes.Clear();
dsDetAlmacenes.InsertRecord(dsDetAlmacenes.Size);
dsDetAlmacenes.SetValue("U_MSSM_COD", dsDetAlmacenes.Size - 1, string.Empty);
dsDetAlmacenes.SetValue("U_MSSM_NOM", dsDetAlmacenes.Size - 1, string.Empty);
mtxAlmacenes.LoadFromDataSource();
//dsDetalle2.Clear();
//dsDetalle2.InsertRecord(dsDetalle2.Size);
//dsDetalle2.SetValue("U_MSSM_COD", dsDetalle2.Size - 1, string.Empty);
//dsDetalle2.SetValue("U_MSSM_NOM", dsDetalle2.Size - 1, string.Empty);
//mtxGruposCliente.LoadFromDataSource();
//dsDetalle3.Clear();
//dsDetalle3.InsertRecord(dsDetalle3.Size);
//dsDetalle3.SetValue("U_MSSM_COD", dsDetalle3.Size - 1, string.Empty);
//dsDetalle3.SetValue("U_MSSM_NOM", dsDetalle3.Size - 1, string.Empty);
//mtxGruposZona.LoadFromDataSource();
//mForm.Items.Item(DEFAULT_TAB).Click();
mForm.Items.Item(EDT_COD_VENDEDOR).Click();
}
public bool HandleItemEvents(SAPbouiCOM.ItemEvent itemEvent)
{
var res = true;
try
{
switch (itemEvent.ItemUID)
{
case EDT_COD_VENDEDOR:
if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
if (selectedObjects != null)
{
dsCabecera.SetValue("Code", 0, selectedObjects.GetValue("SlpCode", 0).ToString().Trim());
dsCabecera.SetValue("Name", 0, selectedObjects.GetValue("SlpName", 0).ToString().Trim());
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
break;
case MATRIZ_ALMACENES:
if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
if (selectedObjects != null)
{
dsDetAlmacenes.SetValue("U_MSSM_COD", itemEvent.Row - 1, selectedObjects.GetValue("WhsCode", 0).ToString().Trim());
dsDetAlmacenes.SetValue("U_MSSM_NOM", itemEvent.Row - 1, selectedObjects.GetValue("WhsName", 0).ToString().Trim());
mtxAlmacenes.LoadFromDataSource();
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
break;
case EDT_EQUIPO_ASIGNADO:
if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
if (selectedObjects != null)
{
dsCabecera.SetValue("U_MSSM_EQP", 0, selectedObjects.GetValue("Code", 0).ToString().Trim());
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
break;
case EDT_PROYECTO:
if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
if (selectedObjects != null)
{
dsCabecera.SetValue("U_MSSM_PRJ", 0, selectedObjects.GetValue("PrjCode", 0).ToString().Trim());
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
break;
case EDT_VEHICULO:
if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
{
var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
if (selectedObjects != null)
{
dsCabecera.SetValue("U_MSSM_VEH", 0, selectedObjects.GetValue("Code", 0).ToString().Trim());
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
}
}
break;
//case MATRIZ_GRUPOS_ARTICULOS:
// if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
// {
// var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
// if (selectedObjects != null)
// {
// dsDetalle1.SetValue("U_MSSM_COD", itemEvent.Row - 1, selectedObjects.GetValue("ItmsGrpCod", 0).ToString().Trim());
// dsDetalle1.SetValue("U_MSSM_NOM", itemEvent.Row - 1, selectedObjects.GetValue("ItmsGrpNam", 0).ToString().Trim());
// mtxGruposArticulo.LoadFromDataSource();
// if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
// mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
// }
// }
// break;
//case MATRIZ_GRUPOS_CLIENTES:
// if (!itemEvent.BeforeAction && itemEvent.EventType == SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST)
// {
// var selectedObjects = ((SAPbouiCOM.IChooseFromListEvent)itemEvent).SelectedObjects;
// if (selectedObjects != null)
// {
// dsDetalle2.SetValue("U_MSSM_COD", itemEvent.Row - 1, selectedObjects.GetValue("GroupCode", 0).ToString().Trim());
// dsDetalle2.SetValue("U_MSSM_NOM", itemEvent.Row - 1, selectedObjects.GetValue("GroupName", 0).ToString().Trim());
// mtxGruposCliente.LoadFromDataSource();
// if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
// mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
// }
// }
// break;
case BTN_ADD_ROW_P1:
if (!itemEvent.BeforeAction)
{
dsDetAlmacenes.InsertRecord(dsDetAlmacenes.Size);
dsDetAlmacenes.SetValue("U_MSSM_COD", dsDetAlmacenes.Size - 1, string.Empty);
dsDetAlmacenes.SetValue("U_MSSM_NOM", dsDetAlmacenes.Size - 1, string.Empty);
mtxAlmacenes.LoadFromDataSource();
}
break;
//case BTN_ADD_ROW_P2:
// if (!itemEvent.BeforeAction)
// {
// dsDetalle2.InsertRecord(dsDetalle2.Size);
// dsDetalle2.SetValue("U_MSSM_COD", dsDetalle2.Size - 1, string.Empty);
// dsDetalle2.SetValue("U_MSSM_NOM", dsDetalle2.Size - 1, string.Empty);
// mtxGruposCliente.LoadFromDataSource();
// }
// break;
//case BTN_ADD_ROW_P3:
// if (!itemEvent.BeforeAction)
// {
// dsDetalle3.InsertRecord(dsDetalle3.Size);
// dsDetalle3.SetValue("U_MSSM_COD", dsDetalle3.Size - 1, string.Empty);
// dsDetalle3.SetValue("U_MSSM_NOM", dsDetalle3.Size - 1, string.Empty);
// mtxGruposZona.LoadFromDataSource();
// }
// break;
case BTN_DEL_ROW_P1:
if (!itemEvent.BeforeAction)
{
List <int> indexes = new List <int>();
for (int i = 1; i <= mtxAlmacenes.RowCount; i++)
{
if (mtxAlmacenes.IsRowSelected(i))
{
indexes.Add(i);
}
}
if (indexes.Count > 0)
{
int counter = 0;
while (counter <= indexes.Count)
{
for (int i = 1; i <= mtxAlmacenes.RowCount; i++)
{
if (mtxAlmacenes.IsRowSelected(i))
{
mtxAlmacenes.DeleteRow(i);
break;
}
}
counter++;
}
if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
{
mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
}
mtxAlmacenes.FlushToDataSource();
}
}
break;
//case BTN_DEL_ROW_P2:
// if (!itemEvent.BeforeAction)
// {
// List<int> indexes = new List<int>();
// for (int i = 1; i <= mtxGruposCliente.RowCount; i++)
// {
// if (mtxGruposCliente.IsRowSelected(i))
// indexes.Add(i);
// }
// if (indexes.Count > 0)
// {
// int counter = 0;
// while (counter <= indexes.Count)
// {
// for (int i = 1; i <= mtxGruposCliente.RowCount; i++)
// {
// if (mtxGruposCliente.IsRowSelected(i))
// {
// mtxGruposCliente.DeleteRow(i);
// break;
// }
// }
// counter++;
// }
// if (mForm.Mode == SAPbouiCOM.BoFormMode.fm_OK_MODE)
// mForm.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE;
// mtxGruposCliente.FlushToDataSource();
// }
// }
// break;
//case BTN_DEL_ROW_P3:
// if (!itemEvent.BeforeAction)
// {
// }
// break;
case BTN_PRINCIPAL:
if (itemEvent.BeforeAction && (mForm.Mode == SAPbouiCOM.BoFormMode.fm_UPDATE_MODE || mForm.Mode == SAPbouiCOM.BoFormMode.fm_ADD_MODE))
{
res = validarObjeto();
}
break;
default:
break;
}
}
catch (Exception ex)
{
StatusMessageError("HandleItemEvents() > " + ex.Message);
}
return(res);
}