roberto
025457dbf5
git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@31 9a1d36f3-7752-2d40-8ccb-50eb49674c68
74 lines
5.3 KiB
ObjectPascal
74 lines
5.3 KiB
ObjectPascal
program FactuGES_Server;
|
|
|
|
{#ROGEN:FactuGES.rodl} // RemObjects: Careful, do not remove!
|
|
|
|
uses
|
|
|
|
ExceptionLog,
|
|
uROComInit,
|
|
Forms,
|
|
fServerForm in 'fServerForm.pas' {ServerForm},
|
|
FactuGES_Intf in 'FactuGES_Intf.pas',
|
|
FactuGES_Invk in 'FactuGES_Invk.pas',
|
|
uDataModuleServer in 'uDataModuleServer.pas' {dmServer: TDataModule},
|
|
srvContactos_Impl in '..\Modulos\Contactos\Servidor\srvContactos_Impl.pas' {srvContactos: TDARemoteService},
|
|
srvLogin_Impl in 'srvLogin_Impl.pas' {srvLogin: TDALoginService},
|
|
srvPresupuestos_Impl in '..\Modulos\Presupuestos\Servidor\srvPresupuestos_Impl.pas' {srvPresupuestos: TDARemoteService},
|
|
schPresupuestosServer_Intf in '..\Modulos\Presupuestos\Reglas\schPresupuestosServer_Intf.pas',
|
|
schPresupuestosClient_Intf in '..\Modulos\Presupuestos\Reglas\schPresupuestosClient_Intf.pas',
|
|
schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Reglas\schPedidosProveedorClient_Intf.pas',
|
|
schPedidosProveedorServer_Intf in '..\Modulos\Pedidos a proveedor\Reglas\schPedidosProveedorServer_Intf.pas',
|
|
uConfiguracion in 'uConfiguracion.pas' {fConfiguracion},
|
|
uConexionBD in 'uConexionBD.pas' {frConexionBD: TFrame},
|
|
srvAlbaranesCliente_Impl in '..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas' {srvAlbaranesCliente: TDARemoteService},
|
|
schAlbaranesClienteClient_Intf in '..\Modulos\Albaranes de cliente\Reglas\schAlbaranesClienteClient_Intf.pas',
|
|
schAlbaranesClienteServer_Intf in '..\Modulos\Albaranes de cliente\Reglas\schAlbaranesClienteServer_Intf.pas',
|
|
schContactosClient_Intf in '..\Modulos\Contactos\Reglas\schContactosClient_Intf.pas',
|
|
schContactosServer_Intf in '..\Modulos\Contactos\Reglas\schContactosServer_Intf.pas',
|
|
uFrameConfiguracion in 'uFrameConfiguracion.pas' {FrameConfiguracion: TFrame},
|
|
uConfGeneral in 'uConfGeneral.pas' {frConfGeneral: TFrame},
|
|
srvFacturasCliente_Impl in '..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas' {srvFacturasCliente: TDARemoteService},
|
|
schFacturasClienteClient_Intf in '..\Modulos\Facturas de cliente\Reglas\schFacturasClienteClient_Intf.pas',
|
|
schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Reglas\schFacturasClienteServer_Intf.pas',
|
|
srvAlmacenes_Impl in '..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas' {srvAlmacenes: TDARemoteService},
|
|
schAlmacenesClient_Intf in '..\Modulos\Almacenes\Reglas\schAlmacenesClient_Intf.pas',
|
|
schAlmacenesServer_Intf in '..\Modulos\Almacenes\Reglas\schAlmacenesServer_Intf.pas',
|
|
schArticulosClient_Intf in '..\Modulos\Articulos\Reglas\schArticulosClient_Intf.pas',
|
|
schArticulosServer_Intf in '..\Modulos\Articulos\Reglas\schArticulosServer_Intf.pas',
|
|
srvArticulos_Impl in '..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas' {srvArticulos: TDARemoteService},
|
|
srvPedidosProveedor_Impl in '..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas' {srvPedidosProveedor: TDARemoteService},
|
|
srvMontajes_Impl in '..\Modulos\Montajes\Servidor\srvMontajes_Impl.pas' {srvMontajes: TDARemoteService},
|
|
schMontajesClient_Intf in '..\Modulos\Montajes\Reglas\schMontajesClient_Intf.pas',
|
|
schMontajesServer_Intf in '..\Modulos\Montajes\Reglas\schMontajesServer_Intf.pas',
|
|
srvFacturasProveedor_Impl in '..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas' {srvFacturasProveedor: TDARemoteService},
|
|
schFacturasProveedorClient_Intf in '..\Modulos\Facturas de proveedor\Reglas\schFacturasProveedorClient_Intf.pas',
|
|
schFacturasProveedorServer_Intf in '..\Modulos\Facturas de proveedor\Reglas\schFacturasProveedorServer_Intf.pas',
|
|
schPagosServer_Intf in '..\Modulos\Pagos\Reglas\schPagosServer_Intf.pas',
|
|
schPagosClient_Intf in '..\Modulos\Pagos\Reglas\schPagosClient_Intf.pas',
|
|
srvPagos_Impl in '..\Modulos\Pagos\Servidor\srvPagos_Impl.pas' {srvPagos: TDARemoteService},
|
|
srvCuentas_Impl in '..\Modulos\Cuentas\Servidor\srvCuentas_Impl.pas' {srvCuentas: TDARemoteService},
|
|
schCuentasClient_Intf in '..\Modulos\Cuentas\Reglas\schCuentasClient_Intf.pas',
|
|
schCuentasServer_Intf in '..\Modulos\Cuentas\Reglas\schCuentasServer_Intf.pas',
|
|
srvComisiones_Impl in 'srvComisiones_Impl.pas' {srvComisiones: TRORemoteDataModule},
|
|
srvIntervalos_Impl in '..\Modulos\Intervalos\Servidor\srvIntervalos_Impl.pas' {srvIntervalos: TDARemoteService},
|
|
srvAsientos_Impl in '..\Modulos\Asientos\Servidor\srvAsientos_Impl.pas' {srvAsientos: TDARemoteService},
|
|
schAsientosClient_Intf in '..\Modulos\Asientos\Reglas\schAsientosClient_Intf.pas',
|
|
schAsientosServer_Intf in '..\Modulos\Asientos\Reglas\schAsientosServer_Intf.pas',
|
|
srvConfiguracion_Impl in 'srvConfiguracion_Impl.pas' {srvConfiguracion: TRORemoteDataModule},
|
|
srvCitas_Impl in '..\Modulos\Calendarios\Servidor\srvCitas_Impl.pas' {srvCitas: TDARemoteService},
|
|
schCitasClient_Intf in '..\Modulos\Calendarios\Reglas\schCitasClient_Intf.pas',
|
|
schCitasServer_Intf in '..\Modulos\Calendarios\Reglas\schCitasServer_Intf.pas',
|
|
schComisionesClient_Intf in '..\Modulos\Contactos\Reglas\schComisionesClient_Intf.pas',
|
|
schComisionesServer_Intf in '..\Modulos\Contactos\Reglas\schComisionesServer_Intf.pas';
|
|
|
|
{$R *.res}
|
|
{$R RODLFile.res}
|
|
|
|
begin
|
|
Application.Initialize;
|
|
Application.CreateForm(TdmServer, dmServer);
|
|
Application.CreateForm(TServerForm, ServerForm);
|
|
Application.Run;
|
|
Application.Terminate;
|
|
end.
|