public static void OrdenCompra_FormDataEvent(ref SAPbouiCOM.BusinessObjectInfo BOInfo, out bool BubbleEvent)
{
BubbleEvent = true;
//Muestra en las Ordenes de Compra (Pedidos Compras) los saldos correspondientes a los pagos relacionados realizados.
if ((BOInfo.EventType == SAPbouiCOM.BoEventTypes.et_FORM_DATA_LOAD) && !(BOInfo.BeforeAction))
{
try
{
//oForm = Application.SBO_Application.Forms.Item(BOInfo.FormUID);
try
{
oDataTable = oForm.DataSources.DataTables.Item("DT_SQL");
Funciones.CargarDatosPagos(oForm);
}
catch (Exception)
{
Program.AbiertoDesdeEnlace = true;
}
}
catch
{
// Application.SBO_Application.MessageBox(ex.ToString(), 1, "Ok", "", "");
}
}
}
private void OnCustomInitialize()
{
oForm = Application.SBO_Application.Forms.Item(this.UIAPIRawForm.UniqueID);
if (Program.AbiertoDesdeEnlace)
{
try
{
Program.AbiertoDesdeEnlace = false;
Funciones.CargarDatosPagos(oForm);
Habilita_Importacion_Anexos();
}
catch (Exception)
{ }
}
}
public static void OrdenCompra_ItemEvent(string FormUID, ref SAPbouiCOM.ItemEvent pVal, out bool bBubbleEvent)
{
bBubbleEvent = true;
try
{
switch (pVal.BeforeAction)
{
case true:
//Al momento de crear la Orden de Compra, compara las lineas del documento con el documento base para verificar que estas sean identicas
if ((pVal.EventType == SAPbouiCOM.BoEventTypes.et_ITEM_PRESSED) && (pVal.ItemUID == "1"))
{
try
{
oButton = (SAPbouiCOM.Button)oForm.Items.Item(pVal.ItemUID).Specific;
if (!Funciones.DataTableExists(oForm, "DT_SQL"))
{
oForm.DataSources.DataTables.Add("DT_SQL");
}
oDataTable = oForm.DataSources.DataTables.Item("DT_SQL");
if (oButton.Caption == "Crear")
{
OrdenCompra.Comparar_Lineas_Solicitud(pVal.FormUID);
}
}
catch (Exception) { }
}
break;
case false:
//Muestra en las Ordenes de Compra (Pedidos Compras) los saldos correspondientes a los pagos relacionados realizados.
if (pVal.EventType == SAPbouiCOM.BoEventTypes.et_FORM_ACTIVATE)
{
if (Funciones.ItemExists(oForm, "Item_0") == true)
{
oEdit = (SAPbouiCOM.EditText)oForm.Items.Item("Item_0").Specific;
if (oEdit.Value.Trim().Length == 0)
{
Funciones.CargarDatosPagos(oForm);
}
}
}
break;
}
}
catch (Exception) { }
}