git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@10 f4e31baf-9722-1c47-927c-6f952f962d4b

This commit is contained in:
roberto 2007-11-30 18:41:47 +00:00
parent e4a6b5fc96
commit 990bc80f57
3 changed files with 29 additions and 27 deletions

View File

@ -60,32 +60,32 @@
<DelphiCompile Include="ApplicationBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Base\Base.dcp" />
<DCCReference Include="..\Base\cxDataD10.dcp" />
<DCCReference Include="..\Base\cxEditorsD10.dcp" />
<DCCReference Include="..\Base\cxLibraryD10.dcp" />
<DCCReference Include="..\Base\dbrtl.dcp" />
<DCCReference Include="..\Base\dxThemeD10.dcp" />
<DCCReference Include="..\Base\GUIBase.dcp" />
<DCCReference Include="..\Base\Jcl.dcp" />
<DCCReference Include="..\Base\JclVcl.dcp" />
<DCCReference Include="..\Base\JvCoreD11R.dcp" />
<DCCReference Include="..\Base\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Base\JvJansD11R.dcp" />
<DCCReference Include="..\Base\JvMMD11R.dcp" />
<DCCReference Include="..\Base\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Base\JvSystemD11R.dcp" />
<DCCReference Include="..\Base\pckUCDataConnector.dcp" />
<DCCReference Include="..\Base\pckUserControl_RT.dcp" />
<DCCReference Include="..\Base\PluginSDK_D10R.dcp" />
<DCCReference Include="..\Base\PngComponentsD10.dcp" />
<DCCReference Include="..\Base\PNG_D10.dcp" />
<DCCReference Include="..\Base\rtl.dcp" />
<DCCReference Include="..\Base\vcl.dcp" />
<DCCReference Include="..\Base\vclactnband.dcp" />
<DCCReference Include="..\Base\vcldb.dcp" />
<DCCReference Include="..\Base\vcljpg.dcp" />
<DCCReference Include="..\Base\vclx.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\Base.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\cxDataD10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\cxEditorsD10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\cxLibraryD10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\dxThemeD10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\GUIBase.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\Jcl.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JclVcl.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvCoreD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvJansD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvMMD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\JvSystemD11R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\pckUCDataConnector.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\pckUserControl_RT.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\PluginSDK_D10R.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\PngComponentsD10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\PNG_D10.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\rtl.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\vcl.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\vclactnband.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\vcldb.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Contabilidad ejercicios\vclx.dcp" />
<DCCReference Include="Empresas\Controller\uDatosBancariosEmpresaController.pas" />
<DCCReference Include="Empresas\Controller\uEmpresasController.pas" />
<DCCReference Include="Empresas\Controller\View\uIEditorDatosBancarioEmpresa.pas" />

View File

@ -3,7 +3,7 @@ unit uFactuGES_App;
interface
uses
SysUtils, Classes, Forms, uUsuarios, uBizEmpresas, uControllerBase,
SysUtils, Classes, Forms, uUsuarios, uBizEmpresas, uBizEjercicios, uControllerBase,
uEmpresasController, JclFileUtils, uUsuariosController, uHostManager;
type
@ -29,6 +29,7 @@ type
function GetAppVersion: String;
function GetUsuarioActivo: TUsuario;
function GetEmpresaActiva: IBizEmpresa;
function GetEjercicioActivo: IBizEjercicio;
function GetModuleManager : THostManager;
function GetTerminated: Boolean;
@ -53,6 +54,7 @@ type
property AppName : String read GetAppName;
property MainForm : TCustomForm read GetMainForm;
property EmpresaActiva : IBizEmpresa read GetEmpresaActiva;
property EjercicioActivo : IBizEjercicio read GetEjercicioActivo;
property UsuarioActivo : TUsuario read GetUsuarioActivo;
property EmpresasController : IEmpresasController read GetEmpresasController;
property UsuariosController : IUsuariosController read GetUsuariosController;