} //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