} //fin AddMenus
public override void MenuEventExt(List <object> oForms, ref MenuEvent pVal, ref Boolean BubbleEvent)
{
IvkFormInterface oForm;
base.MenuEventExt(oForms, ref pVal, ref BubbleEvent);
try
{
//Inherited MenuEventExt(oForms,var pVal,var BubbleEvent);
oForm = null;
if (!pVal.BeforeAction)
{
switch (pVal.MenuUID)
{
case "VID_FERImpFE":
{
oForm = (IvkFormInterface)(new TReImprimir());
//(TReImprimir)(oForm).ooForms = oForms;
break;
}
case "VID_FEConf":
{
oForm = (IvkFormInterface)(new TConfigFE());
//(TConfigFE)(oForm).ooForms = oForms;
break;
}
case "VID_FEMonitor": //Menu para Monitor
{
oForm = (IvkFormInterface)(new TMonitor());
//(TMonitor)(oForm).ooForms = oForms;
break;
}
case "VID_FEDardeBaja": //Menu para dar de baja
{
oForm = (IvkFormInterface)(new TDardeBaja());
break;
}
case "VID_FEPROCED": //Menu para Procedimiento FE
{
oForm = (IvkFormInterface)(new TProcedimientosFE());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FEPEIVA": //Menu para Configuracion de Impuestos PE
{
oForm = (IvkFormInterface)(new TConfiguracionImpuestoPE());
break;
}
case "VID_FEPENOTES": //Menu para Tipo de Notas
{
oForm = (IvkFormInterface)(new TTipoNotasPE());
break;
}
case "VID_FEPEUMISO": //Menu para Unidad de medida ISO
{
oForm = (IvkFormInterface)(new TUnidadMedidasISOPE());
break;
}
case "VID_RHSQL":
{
//oForm := IvkFormInterface(New TCredencialesBD);
//TCredencialesBD(oForm).ooForms :=oForms;
if (GlobalSettings.RunningUnderSQLServer)
{
oForm = (IvkFormInterface)(new TMenuConfFr());
}
else
{
oForm = (IvkFormInterface)(new TMenuConfiguracionHANA());
}
//oForm1 := SBOApplication.Forms.ActiveForm;
//EditText(oForm1.Items.Item("Pw").Specific).IsPassword := true;
break;
}
}
if (oForm != null)
{
SAPbouiCOM.Application App = SBOApplication;
SAPbobsCOM.Company Cmpny = SBOCompany;
VisualD.SBOFunctions.CSBOFunctions SboF = SBOFunctions;
VisualD.GlobalVid.TGlobalVid Glob = GlobalSettings;
if (oForm.InitForm(SBOFunctions.generateFormId(GlobalSettings.SBOSpaceName, GlobalSettings), "forms\\", ref App, ref Cmpny, ref SboF, ref Glob))
{
oForms.Add(oForm);
}
else
{
SBOApplication.Forms.Item(oForm.getFormId()).Close();
oForm = null;
}
}
}
}
catch (Exception e)
{
SBOApplication.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); // Captura errores no manejados
oLog.OutLog("MenuEventExt: " + e.Message + " ** Trace: " + e.StackTrace);
}
} //MenuEventExt
} //fin AddMenus
public override void MenuEventExt(List <object> oForms, ref MenuEvent pVal, ref Boolean BubbleEvent)
{
IvkFormInterface oForm;
base.MenuEventExt(oForms, ref pVal, ref BubbleEvent);
try
{
//Inherited MenuEventExt(oForms,var pVal,var BubbleEvent);
oForm = null;
if (!pVal.BeforeAction)
{
switch (pVal.MenuUID)
{
case "VID_FERImpFE":
{
oForm = (IvkFormInterface)(new TReImprimir());
//(TReImprimir)(oForm).ooForms = oForms;
break;
}
case "VID_FEConf":
{
oForm = (IvkFormInterface)(new TConfigFE());
//(TConfigFE)(oForm).ooForms = oForms;
break;
}
case "VID_FEImptoAd":
{
oForm = (IvkFormInterface)(new TImptoAdicional());
//(TImptoAdicional)(oForm).ooForms = oForms;
break;
}
case "VID_FEIndSII": //Menu para ingresar mapeo indicadores para los libros
{
oForm = (IvkFormInterface)(new TIndicadoresSII());
//(TIndicadoresSII)(oForm).ooForms = oForms;
break;
}
case "VID_FeImptoSII": //Menu para ingresar mapeo de los impuestos para los libros
{
oForm = (IvkFormInterface)(new TImpuestos());
//(TImpuestos)(oForm).ooForms = oForms;
break;
}
case "VID_FEMonitor": //Menu para Monitor
{
oForm = (IvkFormInterface)(new TMonitor());
//(TMonitor)(oForm).ooForms = oForms;
break;
}
case "VID_FEMonDTE": //monitor de DTE
{
oForm = (IvkFormInterface)(new TMonitorDTE());
break;
}
case "VID_FEEnvDTE":
{
oForm = (IvkFormInterface)(new TEnviarEstadoDTE());
break;
}
case "VID_FESUC": //Menu para Sucursal factura electronica
{
oForm = (IvkFormInterface)(new TSucursal());
//(TSucursal)(oForm).ooForms = oForms;
break;
}
case "VID_FECAF": //Menu para regsitrar CAF
{
oForm = (IvkFormInterface)(new TRegistrarCAF());
//(TRegistrarCAF)(oForm).ooForms = oForms;
break;
}
case "VID_FEDIST": //Menu para Distribucion Folios
{
oForm = (IvkFormInterface)(new TDistribucionFolios());
//(TDistribucionFolios)(oForm).ooForms = oForms;
break;
}
case "VID_FEASIGFOL": //Menu para Distribuir Folios
{
oForm = (IvkFormInterface)(new TAsignarFolios());
//(TAsignarFolios)(oForm).ooForms = oForms;
break;
}
case "VID_FERESFOL": //Menu para Resumen Estado de Folios
{
oForm = (IvkFormInterface)(new TResumenFolios());
//(TResumenFolios)(oForm).ooForms = oForms;
break;
}
case "VID_FEMULTISOC": //Menu para Multiples bases FE
{
oForm = (IvkFormInterface)(new TMultiplesBases());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FEPROCED": //Menu para Procedimiento FE
{
oForm = (IvkFormInterface)(new TProcedimientosFE());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FELISTABL": //Menu para Lista Blanca
{
oForm = (IvkFormInterface)(new TListaBlanca());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FELISTANE": //Menu para Lista Negra
{
oForm = (IvkFormInterface)(new TListaNegra());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FEGLibro": //Menu para generacion Libro Ventas y Compra
{
oForm = (IvkFormInterface)(new TGLibro());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FEGELibro": //Menu para Generacion y envioLibro Ventas y Compras
{
oForm = (IvkFormInterface)(new TGELibro());
//(TMultiplesBases)(oForm).ooForms = oForms;
break;
}
case "VID_FEFOLIAR": //Menu para Foliar Documento Electronica
{
oForm = (IvkFormInterface)(new TFoliarDocumento());
break;
}
case "VID_FEREUTFOL": //Menu para Reutilizar folio rechazado
{
oForm = (IvkFormInterface)(new TReutilizarFolio());
break;
}
case "VID_FEPLANCTA": //Menu para Plan de cuenta SII
{
oForm = (IvkFormInterface)(new TPlanCuentaSII());
break;
}
case "VID_RHSQL":
{
//oForm := IvkFormInterface(New TCredencialesBD);
//TCredencialesBD(oForm).ooForms :=oForms;
if (GlobalSettings.RunningUnderSQLServer)
{
oForm = (IvkFormInterface)(new TMenuConfFr());
}
else
{
oForm = (IvkFormInterface)(new TMenuConfiguracionHANA());
}
//oForm1 := SBOApplication.Forms.ActiveForm;
//EditText(oForm1.Items.Item("Pw").Specific).IsPassword := true;
break;
}
case "VID_FELibroDiario":
{
oForm = (IvkFormInterface)(new TLibrosElectronicos());
TLibrosElectronicos.TipoLibro = "D";
break;
}
case "VID_FELibroMayor":
{
oForm = (IvkFormInterface)(new TLibrosElectronicos());
TLibrosElectronicos.TipoLibro = "M";
break;
}
case "VID_FEBalance":
{
oForm = (IvkFormInterface)(new TLibrosElectronicos());
TLibrosElectronicos.TipoLibro = "B";
break;
}
case "VID_FEDiccionario":
{
oForm = (IvkFormInterface)(new TLibrosElectronicos());
TLibrosElectronicos.TipoLibro = "C";
break;
}
}
if (oForm != null)
{
SAPbouiCOM.Application App = SBOApplication;
SAPbobsCOM.Company Cmpny = SBOCompany;
VisualD.SBOFunctions.CSBOFunctions SboF = SBOFunctions;
VisualD.GlobalVid.TGlobalVid Glob = GlobalSettings;
if (oForm.InitForm(SBOFunctions.generateFormId(GlobalSettings.SBOSpaceName, GlobalSettings), "forms\\", ref App, ref Cmpny, ref SboF, ref Glob))
{
oForms.Add(oForm);
}
else
{
SBOApplication.Forms.Item(oForm.getFormId()).Close();
oForm = null;
}
}
}
}
catch (Exception e)
{
SBOApplication.MessageBox(e.Message + " ** Trace: " + e.StackTrace, 1, "Ok", "", ""); // Captura errores no manejados
oLog.OutLog("MenuEventExt: " + e.Message + " ** Trace: " + e.StackTrace);
}
} //MenuEventExt