diff --git a/Build/Build.fbp5 b/Build/Build.fbp5
index ca999633..a5a23568 100644
--- a/Build/Build.fbp5
+++ b/Build/Build.fbp5
@@ -579,7 +579,7 @@ source_path
0
%source_path%\Servidor\FactuGES_Server.dpr
True
- 0
+ 2
rcBorland
@@ -594,15 +594,15 @@ source_path
True
@@ -20604,7 +20604,7 @@ Comments=
0
%source_path%\Cliente\FactuGES.dpr
True
- 0
+ 2
rcBorland
@@ -20619,13 +20619,13 @@ Comments=
False
@@ -20697,7 +20697,7 @@ Comments=
- False
+ True
True
False
True
@@ -20786,7 +20786,7 @@ Comments=
- False
+ True
True
False
True
@@ -20847,534 +20847,6 @@ Comments=
mdNormal
-
diff --git a/Database/FACTUGES.FDB b/Database/FACTUGES.FDB
index cb912598..d3bdd787 100644
Binary files a/Database/FACTUGES.FDB and b/Database/FACTUGES.FDB differ
diff --git a/Source/Base/GUIBase/uEditorBase.dfm b/Source/Base/GUIBase/uEditorBase.dfm
index 99526794..f1fad6d3 100644
--- a/Source/Base/GUIBase/uEditorBase.dfm
+++ b/Source/Base/GUIBase/uEditorBase.dfm
@@ -1669,7 +1669,7 @@ object fEditorBase: TfEditorBase
object JvAppRegistryStorage: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 424
Top = 120
diff --git a/Source/Base/Usuarios/uLoginForm.dfm b/Source/Base/Usuarios/uLoginForm.dfm
index bfa1641a..b0cd71bd 100644
--- a/Source/Base/Usuarios/uLoginForm.dfm
+++ b/Source/Base/Usuarios/uLoginForm.dfm
@@ -1076,7 +1076,7 @@ object fLoginForm: TfLoginForm
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
StorageOptions.BooleanAsString = False
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 14
Top = 168
diff --git a/Source/Cliente/FactuGES.rc b/Source/Cliente/FactuGES.rc
index 8efc4156..0aea4cbd 100644
--- a/Source/Cliente/FactuGES.rc
+++ b/Source/Cliente/FactuGES.rc
@@ -1,7 +1,7 @@
MAINICON ICON "c:\Codigo Luis Leon\Source\Iconos\Factuges.ico"
1 VERSIONINFO
-FILEVERSION 3,0,0,0
-PRODUCTVERSION 3,0,0,0
+FILEVERSION 3,0,2,0
+PRODUCTVERSION 3,0,2,0
FILEFLAGSMASK 0x3FL
FILEFLAGS 0x00L
FILEOS 0x40004L
@@ -13,9 +13,9 @@ BEGIN
BLOCK "0C0A04E4"
BEGIN
VALUE "CompanyName", "Rodax Software S.L.\0"
- VALUE "FileVersion", "3.0.0.0\0"
+ VALUE "FileVersion", "3.0.2.0\0"
VALUE "InternalName", "FactuGES\0"
- VALUE "ProductVersion", "3.0.0.0\0"
+ VALUE "ProductVersion", "3.0.2.0\0"
END
END
BLOCK "VarFileInfo"
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index 06939c5d..38144b7c 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/Cliente/uPantallaPrincipal.dfm b/Source/Cliente/uPantallaPrincipal.dfm
index 488c1c56..299994cf 100644
--- a/Source/Cliente/uPantallaPrincipal.dfm
+++ b/Source/Cliente/uPantallaPrincipal.dfm
@@ -494,7 +494,7 @@ object fPantallaPrincipal: TfPantallaPrincipal
object JvAppRegistryStorage: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 504
Top = 128
diff --git a/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma19.dfm b/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma19.dfm
index 4db8a8ea..ad4f93c2 100644
--- a/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma19.dfm
+++ b/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma19.dfm
@@ -241,7 +241,7 @@ object fEditorExportacionNorma19: TfEditorExportacionNorma19
object JvAppRegistryStorage: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 112
Top = 64
diff --git a/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma32.dfm b/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma32.dfm
index cd5694d9..4bcd8e04 100644
--- a/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma32.dfm
+++ b/Source/Modulos/Banca electronica/Views/uEditorExportacionNorma32.dfm
@@ -316,7 +316,7 @@ object fEditorExportacionNorma32: TfEditorExportacionNorma32
object JvAppRegistryStorage: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 112
Top = 32
diff --git a/Source/Servidor con DBSesiones/Configuracion/uConfiguracion.dfm b/Source/Servidor con DBSesiones/Configuracion/uConfiguracion.dfm
index 8ae841a1..2d568e2e 100644
--- a/Source/Servidor con DBSesiones/Configuracion/uConfiguracion.dfm
+++ b/Source/Servidor con DBSesiones/Configuracion/uConfiguracion.dfm
@@ -111,7 +111,7 @@ object fConfiguracion: TfConfiguracion
object JvAppRegistryStorage1: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 48
Top = 400
diff --git a/Source/Servidor con DBSesiones/uDataModuleServer.dfm b/Source/Servidor con DBSesiones/uDataModuleServer.dfm
index 12ec21db..99e400b6 100644
--- a/Source/Servidor con DBSesiones/uDataModuleServer.dfm
+++ b/Source/Servidor con DBSesiones/uDataModuleServer.dfm
@@ -67,7 +67,7 @@ object dmServer: TdmServer
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
RegRoot = hkLocalMachine
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 304
Top = 208
diff --git a/Source/Servidor/Configuracion/uConfiguracion.dfm b/Source/Servidor/Configuracion/uConfiguracion.dfm
index 3a36bc11..9ac4bdb3 100644
--- a/Source/Servidor/Configuracion/uConfiguracion.dfm
+++ b/Source/Servidor/Configuracion/uConfiguracion.dfm
@@ -125,7 +125,7 @@ object fConfiguracion: TfConfiguracion
object JvAppRegistryStorage1: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
- Root = 'Software\%APPL_NAME%'
+ Root = 'Software\FactuGES'
SubStorages = <>
Left = 40
Top = 304
diff --git a/Source/Servidor/FactuGES_Server.bdsproj b/Source/Servidor/FactuGES_Server.bdsproj
index 003abe94..29655286 100644
--- a/Source/Servidor/FactuGES_Server.bdsproj
+++ b/Source/Servidor/FactuGES_Server.bdsproj
@@ -1,4 +1,4 @@
-
+