diff --git a/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.dfm b/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.dfm
index ef02f00..c71472d 100644
--- a/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.dfm
+++ b/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.dfm
@@ -109,131 +109,133 @@ inherited fEditorEmpresa: TfEditorEmpresa
         inherited dxLayoutControl1: TdxLayoutControl
           Width = 660
           Height = 425
-          LookAndFeel = dxLayoutOfficeLookAndFeel1
+          LayoutLookAndFeel = dxLayoutOfficeLookAndFeel1
           ExplicitWidth = 660
           ExplicitHeight = 425
           inherited PngSpeedButton1: TPngSpeedButton
-            Left = 615
+            Left = 598
             Top = 295
-            ExplicitLeft = 615
+            ExplicitLeft = 598
             ExplicitTop = 295
           end
           inherited PngSpeedButton2: TPngSpeedButton
-            Left = 615
+            Left = 598
             Top = 267
-            ExplicitLeft = 615
+            ExplicitLeft = 598
             ExplicitTop = 267
           end
           inherited eCalle: TcxDBTextEdit
-            Top = 267
+            Top = 331
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 267
+            ExplicitTop = 331
             ExplicitWidth = 234
             Width = 234
           end
           inherited eCodigoPostal: TcxDBTextEdit
-            Top = 294
+            Left = 283
+            Top = 358
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 294
+            ExplicitLeft = 283
+            ExplicitTop = 358
           end
           inherited ePaginaWeb: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 216
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 216
             ExplicitWidth = 164
             Width = 164
           end
           inherited eMailParticular: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 189
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 189
             ExplicitWidth = 164
             Width = 164
           end
           inherited eMailTrabajo: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 162
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 162
             ExplicitWidth = 164
             Width = 164
           end
           inherited cxDBMemo1: TcxDBMemo
-            Top = 372
+            Top = 436
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 372
+            ExplicitTop = 436
             ExplicitWidth = 329
             ExplicitHeight = 64
             Height = 64
             Width = 329
           end
           inherited eTlfParticular: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 57
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 57
             ExplicitWidth = 164
             Width = 164
           end
           inherited eTlfTrabajo: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 30
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 30
             ExplicitWidth = 164
             Width = 164
           end
           inherited eTlfMovil: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 84
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 84
             ExplicitWidth = 164
             Width = 164
           end
           inherited eFax: TcxDBTextEdit
-            Left = 508
+            Left = 479
             Top = 111
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 508
+            ExplicitLeft = 479
             ExplicitTop = 111
             ExplicitWidth = 164
             Width = 164
@@ -269,13 +271,13 @@ inherited fEditorEmpresa: TfEditorEmpresa
             Width = 234
           end
           inherited cxDBImage1: TcxDBImage
-            Left = 413
+            Left = 384
             Top = 267
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitLeft = 413
+            ExplicitLeft = 384
             ExplicitTop = 267
             ExplicitWidth = 230
             ExplicitHeight = 142
@@ -283,62 +285,68 @@ inherited fEditorEmpresa: TfEditorEmpresa
             Width = 230
           end
           inherited eParamMargen: TcxDBSpinEdit
-            Top = 216
+            Top = 280
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 216
+            ExplicitTop = 280
           end
           inherited eParamTiempo: TcxDBCurrencyEdit
-            Top = 216
+            Top = 280
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 216
+            ExplicitTop = 280
           end
           inherited cbProvincia: TcxDBComboBox
-            Top = 294
+            Top = 358
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 294
+            ExplicitTop = 358
             ExplicitWidth = 91
             Width = 91
           end
           inherited cbPoblacion: TcxDBComboBox
-            Top = 321
+            Top = 385
             Properties.OnInitPopup = nil
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 321
+            ExplicitTop = 385
             ExplicitWidth = 234
             Width = 234
           end
           inherited cbFormaPago: TcxComboBox
-            Top = 165
+            Top = 229
             Style.LookAndFeel.SkinName = ''
             StyleDisabled.LookAndFeel.SkinName = ''
             StyleFocused.LookAndFeel.SkinName = ''
             StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 165
-            ExplicitWidth = 202
-            Width = 202            
-          end
-          inherited cbTipoIVA: TcxComboBox
-            Top = 138
-            Style.LookAndFeel.SkinName = ''
-            StyleDisabled.LookAndFeel.SkinName = ''
-            StyleFocused.LookAndFeel.SkinName = ''
-            StyleHot.LookAndFeel.SkinName = ''
-            ExplicitTop = 138
+            ExplicitTop = 229
             ExplicitWidth = 202
             Width = 202
           end
+          inherited cbTipoIVA: TcxComboBox
+            Top = 202
+            Style.LookAndFeel.SkinName = ''
+            StyleDisabled.LookAndFeel.SkinName = ''
+            StyleFocused.LookAndFeel.SkinName = ''
+            StyleHot.LookAndFeel.SkinName = ''
+            ExplicitTop = 202
+            ExplicitWidth = 202
+            Width = 202
+          end
+          inherited cbPrioridad: TcxCheckBox
+            Top = 162
+            ExplicitTop = 162
+            ExplicitWidth = 363
+            Width = 363
+          end
         end
       end
     end
@@ -370,6 +378,18 @@ inherited fEditorEmpresa: TfEditorEmpresa
         inherited ToolBar1: TToolBar
           Width = 660
           ExplicitWidth = 660
+          inherited ToolButton1: TToolButton
+            ExplicitWidth = 113
+          end
+          inherited ToolButton4: TToolButton
+            ExplicitWidth = 113
+          end
+          inherited ToolButton2: TToolButton
+            ExplicitWidth = 113
+          end
+          inherited ToolButton7: TToolButton
+            ExplicitWidth = 113
+          end
         end
       end
     end
diff --git a/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.pas b/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.pas
index 8474316..9ef8c20 100644
--- a/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.pas
+++ b/Source/ApplicationBase/Empresas/Views/uEditorEmpresa.pas
@@ -13,7 +13,8 @@ uses
   JvAppStorage, JvAppRegistryStorage, JvFormPlacement, JvComponentBase,
   uViewEmpresa, uIEditorEmpresa, uEmpresasController, dxLayoutLookAndFeels,
   JvExComCtrls, JvStatusBar, uViewDetallesGenerico, uViewDatosBancarios,
-  uDAInterfaces, cxControls, cxContainer, cxEdit, cxLabel;
+  uDAInterfaces, cxControls, cxContainer, cxEdit, cxLabel, cxGraphics,
+  cxLookAndFeels, cxLookAndFeelPainters;
 
 type
   TfEditorEmpresa = class(TfEditorDBItem, IEditorEmpresa)
diff --git a/Source/ApplicationBase/Empresas/Views/uViewDatosBancarios.pas b/Source/ApplicationBase/Empresas/Views/uViewDatosBancarios.pas
index 4379b2c..15d3a0a 100644
Binary files a/Source/ApplicationBase/Empresas/Views/uViewDatosBancarios.pas and b/Source/ApplicationBase/Empresas/Views/uViewDatosBancarios.pas differ
diff --git a/Source/ApplicationBase/Empresas/Views/uViewEmpresa.dfm b/Source/ApplicationBase/Empresas/Views/uViewEmpresa.dfm
index 9215ae1..b93944e 100644
--- a/Source/ApplicationBase/Empresas/Views/uViewEmpresa.dfm
+++ b/Source/ApplicationBase/Empresas/Views/uViewEmpresa.dfm
@@ -13,7 +13,6 @@ inherited frViewEmpresa: TfrViewEmpresa
     ParentBackground = True
     TabOrder = 0
     TabStop = False
-    AutoContentSizes = [acsWidth, acsHeight]
     DesignSize = (
       734
       548)
@@ -36,8 +35,8 @@ inherited frViewEmpresa: TfrViewEmpresa
       PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
     end
     object eCalle: TcxDBTextEdit
-      Left = 162
-      Top = 277
+      Left = 117
+      Top = 347
       DataBinding.DataField = 'CALLE'
       DataBinding.DataSource = DADataSource
       Style.BorderColor = clWindowFrame
@@ -54,12 +53,12 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 7
+      TabOrder = 8
       Width = 223
     end
     object eCodigoPostal: TcxDBTextEdit
-      Left = 312
-      Top = 304
+      Left = 289
+      Top = 374
       DataBinding.DataField = 'CODIGO_POSTAL'
       DataBinding.DataSource = DADataSource
       Style.BorderColor = clWindowFrame
@@ -76,11 +75,11 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 9
+      TabOrder = 10
       Width = 73
     end
     object ePaginaWeb: TcxDBTextEdit
-      Left = 510
+      Left = 487
       Top = 220
       DataBinding.DataField = 'PAGINA_WEB'
       DataBinding.DataSource = DADataSource
@@ -98,13 +97,35 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
+      TabOrder = 19
+      Width = 247
+    end
+    object eMailParticular: TcxDBTextEdit
+      Left = 487
+      Top = 193
+      DataBinding.DataField = 'EMAIL_2'
+      DataBinding.DataSource = DADataSource
+      Style.BorderColor = clWindowFrame
+      Style.BorderStyle = ebs3D
+      Style.LookAndFeel.Kind = lfStandard
+      Style.LookAndFeel.NativeStyle = True
+      Style.LookAndFeel.SkinName = ''
+      StyleDisabled.LookAndFeel.Kind = lfStandard
+      StyleDisabled.LookAndFeel.NativeStyle = True
+      StyleDisabled.LookAndFeel.SkinName = ''
+      StyleFocused.LookAndFeel.Kind = lfStandard
+      StyleFocused.LookAndFeel.NativeStyle = True
+      StyleFocused.LookAndFeel.SkinName = ''
+      StyleHot.LookAndFeel.Kind = lfStandard
+      StyleHot.LookAndFeel.NativeStyle = True
+      StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 18
       Width = 247
     end
-    object eMailParticular: TcxDBTextEdit
-      Left = 510
-      Top = 193
-      DataBinding.DataField = 'EMAIL_2'
+    object eMailTrabajo: TcxDBTextEdit
+      Left = 487
+      Top = 166
+      DataBinding.DataField = 'EMAIL_1'
       DataBinding.DataSource = DADataSource
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -123,31 +144,9 @@ inherited frViewEmpresa: TfrViewEmpresa
       TabOrder = 17
       Width = 247
     end
-    object eMailTrabajo: TcxDBTextEdit
-      Left = 510
-      Top = 166
-      DataBinding.DataField = 'EMAIL_1'
-      DataBinding.DataSource = DADataSource
-      Style.BorderColor = clWindowFrame
-      Style.BorderStyle = ebs3D
-      Style.LookAndFeel.Kind = lfStandard
-      Style.LookAndFeel.NativeStyle = True
-      Style.LookAndFeel.SkinName = ''
-      StyleDisabled.LookAndFeel.Kind = lfStandard
-      StyleDisabled.LookAndFeel.NativeStyle = True
-      StyleDisabled.LookAndFeel.SkinName = ''
-      StyleFocused.LookAndFeel.Kind = lfStandard
-      StyleFocused.LookAndFeel.NativeStyle = True
-      StyleFocused.LookAndFeel.SkinName = ''
-      StyleHot.LookAndFeel.Kind = lfStandard
-      StyleHot.LookAndFeel.NativeStyle = True
-      StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 16
-      Width = 247
-    end
     object cxDBMemo1: TcxDBMemo
       Left = 22
-      Top = 388
+      Top = 458
       DataBinding.DataField = 'NOTAS'
       DataBinding.DataSource = DADataSource
       Enabled = False
@@ -165,12 +164,12 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 11
+      TabOrder = 12
       Height = 75
       Width = 318
     end
     object eTlfParticular: TcxDBTextEdit
-      Left = 510
+      Left = 487
       Top = 55
       DataBinding.DataField = 'TELEFONO_2'
       DataBinding.DataSource = DADataSource
@@ -188,57 +187,35 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 13
-      Width = 247
-    end
-    object eTlfTrabajo: TcxDBTextEdit
-      Left = 510
-      Top = 28
-      DataBinding.DataField = 'TELEFONO_1'
-      DataBinding.DataSource = DADataSource
-      Style.BorderColor = clWindowFrame
-      Style.BorderStyle = ebs3D
-      Style.LookAndFeel.Kind = lfStandard
-      Style.LookAndFeel.NativeStyle = True
-      Style.LookAndFeel.SkinName = ''
-      StyleDisabled.LookAndFeel.Kind = lfStandard
-      StyleDisabled.LookAndFeel.NativeStyle = True
-      StyleDisabled.LookAndFeel.SkinName = ''
-      StyleFocused.LookAndFeel.Kind = lfStandard
-      StyleFocused.LookAndFeel.NativeStyle = True
-      StyleFocused.LookAndFeel.SkinName = ''
-      StyleHot.LookAndFeel.Kind = lfStandard
-      StyleHot.LookAndFeel.NativeStyle = True
-      StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 12
-      Width = 247
-    end
-    object eTlfMovil: TcxDBTextEdit
-      Left = 510
-      Top = 82
-      DataBinding.DataField = 'MOVIL_1'
-      DataBinding.DataSource = DADataSource
-      Style.BorderColor = clWindowFrame
-      Style.BorderStyle = ebs3D
-      Style.LookAndFeel.Kind = lfStandard
-      Style.LookAndFeel.NativeStyle = True
-      Style.LookAndFeel.SkinName = ''
-      StyleDisabled.LookAndFeel.Kind = lfStandard
-      StyleDisabled.LookAndFeel.NativeStyle = True
-      StyleDisabled.LookAndFeel.SkinName = ''
-      StyleFocused.LookAndFeel.Kind = lfStandard
-      StyleFocused.LookAndFeel.NativeStyle = True
-      StyleFocused.LookAndFeel.SkinName = ''
-      StyleHot.LookAndFeel.Kind = lfStandard
-      StyleHot.LookAndFeel.NativeStyle = True
-      StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 14
       Width = 247
     end
-    object eFax: TcxDBTextEdit
-      Left = 510
-      Top = 109
-      DataBinding.DataField = 'FAX'
+    object eTlfTrabajo: TcxDBTextEdit
+      Left = 487
+      Top = 28
+      DataBinding.DataField = 'TELEFONO_1'
+      DataBinding.DataSource = DADataSource
+      Style.BorderColor = clWindowFrame
+      Style.BorderStyle = ebs3D
+      Style.LookAndFeel.Kind = lfStandard
+      Style.LookAndFeel.NativeStyle = True
+      Style.LookAndFeel.SkinName = ''
+      StyleDisabled.LookAndFeel.Kind = lfStandard
+      StyleDisabled.LookAndFeel.NativeStyle = True
+      StyleDisabled.LookAndFeel.SkinName = ''
+      StyleFocused.LookAndFeel.Kind = lfStandard
+      StyleFocused.LookAndFeel.NativeStyle = True
+      StyleFocused.LookAndFeel.SkinName = ''
+      StyleHot.LookAndFeel.Kind = lfStandard
+      StyleHot.LookAndFeel.NativeStyle = True
+      StyleHot.LookAndFeel.SkinName = ''
+      TabOrder = 13
+      Width = 247
+    end
+    object eTlfMovil: TcxDBTextEdit
+      Left = 487
+      Top = 82
+      DataBinding.DataField = 'MOVIL_1'
       DataBinding.DataSource = DADataSource
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
@@ -257,8 +234,30 @@ inherited frViewEmpresa: TfrViewEmpresa
       TabOrder = 15
       Width = 247
     end
+    object eFax: TcxDBTextEdit
+      Left = 487
+      Top = 109
+      DataBinding.DataField = 'FAX'
+      DataBinding.DataSource = DADataSource
+      Style.BorderColor = clWindowFrame
+      Style.BorderStyle = ebs3D
+      Style.LookAndFeel.Kind = lfStandard
+      Style.LookAndFeel.NativeStyle = True
+      Style.LookAndFeel.SkinName = ''
+      StyleDisabled.LookAndFeel.Kind = lfStandard
+      StyleDisabled.LookAndFeel.NativeStyle = True
+      StyleDisabled.LookAndFeel.SkinName = ''
+      StyleFocused.LookAndFeel.Kind = lfStandard
+      StyleFocused.LookAndFeel.NativeStyle = True
+      StyleFocused.LookAndFeel.SkinName = ''
+      StyleHot.LookAndFeel.Kind = lfStandard
+      StyleHot.LookAndFeel.NativeStyle = True
+      StyleHot.LookAndFeel.SkinName = ''
+      TabOrder = 16
+      Width = 247
+    end
     object eNombre: TcxDBTextEdit
-      Left = 162
+      Left = 117
       Top = 28
       DataBinding.DataField = 'NOMBRE'
       DataBinding.DataSource = DADataSource
@@ -281,7 +280,7 @@ inherited frViewEmpresa: TfrViewEmpresa
       Width = 223
     end
     object eNIFCIF: TcxDBTextEdit
-      Left = 162
+      Left = 117
       Top = 55
       DataBinding.DataField = 'NIF_CIF'
       DataBinding.DataSource = DADataSource
@@ -304,7 +303,7 @@ inherited frViewEmpresa: TfrViewEmpresa
       Width = 223
     end
     object memRegistroMercantil: TcxDBMemo
-      Left = 162
+      Left = 117
       Top = 82
       DataBinding.DataField = 'REGISTRO_MERCANTIL'
       DataBinding.DataSource = DADataSource
@@ -328,7 +327,7 @@ inherited frViewEmpresa: TfrViewEmpresa
       Width = 223
     end
     object cxDBImage1: TcxDBImage
-      Left = 415
+      Left = 392
       Top = 277
       DataBinding.DataField = 'LOGOTIPO'
       DataBinding.DataSource = DADataSource
@@ -345,13 +344,13 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleFocused.LookAndFeel.SkinName = ''
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 19
+      TabOrder = 20
       Height = 249
       Width = 313
     end
     object eParamMargen: TcxDBSpinEdit
-      Left = 162
-      Top = 220
+      Left = 117
+      Top = 290
       DataBinding.DataField = 'PARAM_MARGEN'
       DataBinding.DataSource = DADataSource
       Enabled = False
@@ -372,12 +371,12 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 5
+      TabOrder = 6
       Width = 60
     end
     object eParamTiempo: TcxDBCurrencyEdit
-      Left = 285
-      Top = 220
+      Left = 240
+      Top = 290
       DataBinding.DataField = 'PARAM_TIEMPO'
       DataBinding.DataSource = DADataSource
       Enabled = False
@@ -398,12 +397,12 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 6
+      TabOrder = 7
       Width = 100
     end
     object cbProvincia: TcxDBComboBox
-      Left = 162
-      Top = 304
+      Left = 117
+      Top = 374
       DataBinding.DataField = 'PROVINCIA'
       DataBinding.DataSource = DADataSource
       Properties.ImmediatePost = True
@@ -427,12 +426,12 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 8
+      TabOrder = 9
       Width = 80
     end
     object cbPoblacion: TcxDBComboBox
-      Left = 162
-      Top = 331
+      Left = 117
+      Top = 401
       DataBinding.DataField = 'POBLACION'
       DataBinding.DataSource = DADataSource
       Properties.ImmediatePost = True
@@ -456,12 +455,39 @@ inherited frViewEmpresa: TfrViewEmpresa
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 10
+      TabOrder = 11
       Width = 223
     end
     object cbFormaPago: TcxComboBox
-      Left = 162
-      Top = 163
+      Left = 182
+      Top = 233
+      Anchors = [akLeft, akTop, akRight]
+      Properties.DropDownListStyle = lsEditFixedList
+      Properties.DropDownRows = 25
+      Properties.ImmediatePost = True
+      Style.BorderColor = clWindowFrame
+      Style.BorderStyle = ebs3D
+      Style.HotTrack = False
+      Style.LookAndFeel.Kind = lfStandard
+      Style.LookAndFeel.NativeStyle = True
+      Style.LookAndFeel.SkinName = ''
+      Style.ButtonStyle = bts3D
+      Style.PopupBorderStyle = epbsFrame3D
+      StyleDisabled.LookAndFeel.Kind = lfStandard
+      StyleDisabled.LookAndFeel.NativeStyle = True
+      StyleDisabled.LookAndFeel.SkinName = ''
+      StyleFocused.LookAndFeel.Kind = lfStandard
+      StyleFocused.LookAndFeel.NativeStyle = True
+      StyleFocused.LookAndFeel.SkinName = ''
+      StyleHot.LookAndFeel.Kind = lfStandard
+      StyleHot.LookAndFeel.NativeStyle = True
+      StyleHot.LookAndFeel.SkinName = ''
+      TabOrder = 5
+      Width = 202
+    end
+    object cbTipoIVA: TcxComboBox
+      Left = 182
+      Top = 206
       Anchors = [akLeft, akTop, akRight]
       Properties.DropDownListStyle = lsEditFixedList
       Properties.DropDownRows = 25
@@ -486,233 +512,248 @@ inherited frViewEmpresa: TfrViewEmpresa
       TabOrder = 4
       Width = 202
     end
-    object cbTipoIVA: TcxComboBox
-      Left = 162
-      Top = 136
-      Anchors = [akLeft, akTop, akRight]
-      Properties.DropDownListStyle = lsEditFixedList
-      Properties.DropDownRows = 25
-      Properties.ImmediatePost = True
+    object cbPrioridad: TcxCheckBox
+      Left = 22
+      Top = 166
+      Caption = 
+        'Dar prioridad de datos comerciales a la empresa respecto a clien' +
+        'te, con el I.V.A y forma de pago siguiente:'
+      Properties.MultiLine = True
+      Properties.NullStyle = nssInactive
       Style.BorderColor = clWindowFrame
       Style.BorderStyle = ebs3D
       Style.HotTrack = False
-      Style.LookAndFeel.Kind = lfStandard
       Style.LookAndFeel.NativeStyle = True
-      Style.LookAndFeel.SkinName = ''
-      Style.ButtonStyle = bts3D
-      Style.PopupBorderStyle = epbsFrame3D
-      StyleDisabled.LookAndFeel.Kind = lfStandard
       StyleDisabled.LookAndFeel.NativeStyle = True
-      StyleDisabled.LookAndFeel.SkinName = ''
-      StyleFocused.LookAndFeel.Kind = lfStandard
       StyleFocused.LookAndFeel.NativeStyle = True
-      StyleFocused.LookAndFeel.SkinName = ''
-      StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
-      StyleHot.LookAndFeel.SkinName = ''
       TabOrder = 3
-      Width = 202
+      Transparent = True
+      Width = 363
     end
     object dxLayoutControl1Group_Root: TdxLayoutGroup
-      ShowCaption = False
+      AlignHorz = ahParentManaged
+      AlignVert = avParentManaged
+      CaptionOptions.Visible = False
+      ButtonOptions.Buttons = <>
       Hidden = True
       LayoutDirection = ldHorizontal
       ShowBorder = False
       object dxLayoutControl1Group4: TdxLayoutGroup
-        AutoAligns = [aaVertical]
         AlignHorz = ahClient
-        ShowCaption = False
+        CaptionOptions.Visible = False
+        ButtonOptions.Buttons = <>
         Hidden = True
         ShowBorder = False
         object dxLayoutControl1Group1: TdxLayoutGroup
-          AutoAligns = []
           AlignHorz = ahClient
-          Caption = 'Datos generales'
+          AlignVert = avTop
+          CaptionOptions.Text = 'Datos generales'
+          ButtonOptions.Buttons = <>
           object dxLayoutControl1Item13: TdxLayoutItem
-            Caption = 'Nombre:'
+            CaptionOptions.Text = 'Nombre:'
             Control = eNombre
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item14: TdxLayoutItem
-            Caption = 'CIF:'
+            CaptionOptions.Text = 'CIF:'
             Control = eNIFCIF
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item15: TdxLayoutItem
-            Caption = 'Registro mercantil:'
+            CaptionOptions.Text = 'Registro mercantil:'
             CaptionOptions.AlignVert = tavTop
             Control = memRegistroMercantil
             ControlOptions.ShowBorder = False
           end
+        end
+        object dxLayoutControl1Group14: TdxLayoutGroup
+          CaptionOptions.Text = 'Datos comerciales'
+          ButtonOptions.Buttons = <>
+          object dxLayoutControl1Item24: TdxLayoutItem
+            CaptionOptions.Text = 'New Item'
+            CaptionOptions.Visible = False
+            Control = cbPrioridad
+            ControlOptions.ShowBorder = False
+          end
           object dxLayoutControl1Item16: TdxLayoutItem
-            Caption = 'IVA por defecto:'
+            CaptionOptions.Text = 'IVA por defecto:'
+            Offsets.Left = 20
             Control = cbTipoIVA
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item2: TdxLayoutItem
-            Caption = 'Forma de pago por defecto:'
+            CaptionOptions.Text = 'Forma de pago por defecto:'
+            Offsets.Left = 20
             Control = cbFormaPago
             ControlOptions.ShowBorder = False
           end
         end
         object dxLayoutControl1Group13: TdxLayoutGroup
-          Caption = 'Datos cat'#225'logo art'#237'culos'
+          CaptionOptions.Text = 'Datos cat'#225'logo art'#237'culos'
           Enabled = False
           Visible = False
+          ButtonOptions.Buttons = <>
           LayoutDirection = ldHorizontal
           object dxLayoutControl1Item18: TdxLayoutItem
-            Caption = 'Margen de venta:'
+            CaptionOptions.Text = 'Margen de venta:'
+            Enabled = False
             Control = eParamMargen
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item21: TdxLayoutItem
-            Caption = 'Precio min:'
+            CaptionOptions.Text = 'Precio min:'
+            Enabled = False
             Control = eParamTiempo
             ControlOptions.ShowBorder = False
           end
         end
         object dxLayoutControl1Group3: TdxLayoutGroup
-          AutoAligns = [aaHorizontal]
-          Caption = 'Direcci'#243'n'
+          AlignVert = avTop
+          CaptionOptions.Text = 'Direcci'#243'n'
+          ButtonOptions.Buttons = <>
           object dxLayoutControl1Item1: TdxLayoutItem
-            Caption = 'Calle:'
+            CaptionOptions.Text = 'Calle:'
             Control = eCalle
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Group8: TdxLayoutGroup
-            ShowCaption = False
+            CaptionOptions.Visible = False
+            ButtonOptions.Buttons = <>
             Hidden = True
             ShowBorder = False
             object dxLayoutControl1Group15: TdxLayoutGroup
-              ShowCaption = False
+              CaptionOptions.Visible = False
+              ButtonOptions.Buttons = <>
               Hidden = True
               LayoutDirection = ldHorizontal
               ShowBorder = False
               object dxLayoutControl1Item22: TdxLayoutItem
-                AutoAligns = [aaVertical]
                 AlignHorz = ahClient
-                Caption = 'Provincia:'
+                CaptionOptions.Text = 'Provincia:'
                 Control = cbProvincia
                 ControlOptions.ShowBorder = False
               end
               object dxLayoutControl1Item4: TdxLayoutItem
-                AutoAligns = [aaVertical]
                 AlignHorz = ahRight
-                Caption = 'C'#243'd. postal:'
+                CaptionOptions.Text = 'C'#243'd. postal:'
                 Control = eCodigoPostal
                 ControlOptions.ShowBorder = False
               end
             end
             object dxLayoutControl1Item3: TdxLayoutItem
-              AutoAligns = [aaVertical]
               AlignHorz = ahClient
-              Caption = 'Poblaci'#243'n:'
+              CaptionOptions.Text = 'Poblaci'#243'n:'
               Control = cbPoblacion
               ControlOptions.ShowBorder = False
             end
           end
         end
         object dxLayoutControl1Group7: TdxLayoutGroup
-          AutoAligns = []
           AlignHorz = ahClient
           AlignVert = avClient
-          Caption = 'Observaciones'
+          CaptionOptions.Text = 'Observaciones'
           Enabled = False
           Visible = False
+          ButtonOptions.Buttons = <>
           object dxLayoutControl1Item8: TdxLayoutItem
-            AutoAligns = [aaHorizontal]
             AlignVert = avClient
-            Caption = 'cxDBMemo1'
-            ShowCaption = False
+            CaptionOptions.Text = 'cxDBMemo1'
+            CaptionOptions.Visible = False
+            Enabled = False
             Control = cxDBMemo1
             ControlOptions.ShowBorder = False
           end
         end
       end
       object dxLayoutControl1Group6: TdxLayoutGroup
-        AutoAligns = []
         AlignHorz = ahClient
         AlignVert = avClient
-        ShowCaption = False
+        CaptionOptions.Visible = False
+        ButtonOptions.Buttons = <>
         Hidden = True
         ShowBorder = False
         object dxLayoutControl1Group2: TdxLayoutGroup
-          AutoAligns = []
           AlignHorz = ahClient
-          Caption = 'Tel'#233'fonos'
+          AlignVert = avTop
+          CaptionOptions.Text = 'Tel'#233'fonos'
+          ButtonOptions.Buttons = <>
           object dxLayoutControl1Item10: TdxLayoutItem
-            Caption = 'Tlf. trabajo:'
+            CaptionOptions.Text = 'Tlf. trabajo:'
             Control = eTlfTrabajo
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item9: TdxLayoutItem
-            Caption = 'Tlf. particular:'
+            CaptionOptions.Text = 'Tlf. particular:'
             Control = eTlfParticular
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item11: TdxLayoutItem
-            Caption = 'M'#243'vil:'
+            CaptionOptions.Text = 'M'#243'vil:'
             Control = eTlfMovil
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item12: TdxLayoutItem
-            Caption = 'Fax:'
+            CaptionOptions.Text = 'Fax:'
             Control = eFax
             ControlOptions.ShowBorder = False
           end
         end
         object dxLayoutControl1Group5: TdxLayoutGroup
-          Caption = 'Correo electr'#243'nico e internet'
+          CaptionOptions.Text = 'Correo electr'#243'nico e internet'
+          ButtonOptions.Buttons = <>
           object dxLayoutControl1Item7: TdxLayoutItem
-            Caption = 'Correo de trabajo:'
+            CaptionOptions.Text = 'Correo de trabajo:'
             Control = eMailTrabajo
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item6: TdxLayoutItem
-            Caption = 'Correo particular:'
+            CaptionOptions.Text = 'Correo particular:'
             Control = eMailParticular
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Item5: TdxLayoutItem
-            Caption = 'P'#225'gina web:'
+            CaptionOptions.Text = 'P'#225'gina web:'
             Control = ePaginaWeb
             ControlOptions.ShowBorder = False
           end
         end
         object dxLayoutControl1Group10: TdxLayoutGroup
-          AutoAligns = []
           AlignHorz = ahClient
           AlignVert = avClient
-          Caption = 'Logotipo'
+          CaptionOptions.Text = 'Logotipo'
           Enabled = False
           Visible = False
+          ButtonOptions.Buttons = <>
           LayoutDirection = ldHorizontal
           object dxLayoutControl1Item17: TdxLayoutItem
-            AutoAligns = []
             AlignHorz = ahClient
             AlignVert = avClient
-            Caption = 'cxDBImage1'
-            ShowCaption = False
+            CaptionOptions.Text = 'cxDBImage1'
+            CaptionOptions.Visible = False
+            Enabled = False
             Control = cxDBImage1
             ControlOptions.ShowBorder = False
           end
           object dxLayoutControl1Group12: TdxLayoutGroup
-            ShowCaption = False
+            CaptionOptions.Visible = False
+            Enabled = False
+            ButtonOptions.Buttons = <>
             Hidden = True
             ShowBorder = False
             object dxLayoutControl1Item20: TdxLayoutItem
-              AutoAligns = [aaVertical]
               AlignHorz = ahRight
-              Caption = 'PngSpeedButton2'
-              ShowCaption = False
+              CaptionOptions.Text = 'PngSpeedButton2'
+              CaptionOptions.Visible = False
+              Enabled = False
               Control = PngSpeedButton2
               ControlOptions.ShowBorder = False
             end
             object dxLayoutControl1Item19: TdxLayoutItem
-              AutoAligns = [aaVertical]
               AlignHorz = ahRight
-              Caption = 'PngSpeedButton1'
-              ShowCaption = False
+              CaptionOptions.Text = 'PngSpeedButton1'
+              CaptionOptions.Visible = False
+              Enabled = False
               Control = PngSpeedButton1
               ControlOptions.ShowBorder = False
             end
@@ -721,8 +762,10 @@ inherited frViewEmpresa: TfrViewEmpresa
       end
     end
     object dxLayoutControl1Group9: TdxLayoutGroup
+      ButtonOptions.Buttons = <>
     end
     object dxLayoutControl1Group11: TdxLayoutGroup
+      ButtonOptions.Buttons = <>
     end
   end
   object DADataSource: TDADataSource
diff --git a/Source/ApplicationBase/Empresas/Views/uViewEmpresa.pas b/Source/ApplicationBase/Empresas/Views/uViewEmpresa.pas
index f038f60..e247bd5 100644
--- a/Source/ApplicationBase/Empresas/Views/uViewEmpresa.pas
+++ b/Source/ApplicationBase/Empresas/Views/uViewEmpresa.pas
@@ -10,7 +10,8 @@ uses
   cxDBEdit, dxLayoutControl, dxLayoutLookAndFeels, cxMemo, cxMaskEdit,
   cxSpinEdit, cxImage, JvExControls, JvBitmapButton, ActnList, ImgList,
   PngImageList, TB2Item, SpTBXItem, TB2Dock, TB2Toolbar, PngSpeedButton, uDAInterfaces,
-  cxCurrencyEdit, cxGraphics, cxDropDownEdit, uEmpresasController;
+  cxCurrencyEdit, cxGraphics, cxDropDownEdit, uEmpresasController,
+  cxLookAndFeels, cxLookAndFeelPainters, dxLayoutcxEditAdapters, cxCheckBox;
 
 type
   IViewEmpresa = interface(IViewBase)
@@ -90,6 +91,9 @@ type
     cbFormaPago: TcxComboBox;
     dxLayoutControl1Item16: TdxLayoutItem;
     cbTipoIVA: TcxComboBox;
+    dxLayoutControl1Group14: TdxLayoutGroup;
+    cbPrioridad: TcxCheckBox;
+    dxLayoutControl1Item24: TdxLayoutItem;
     procedure actAnadirExecute(Sender: TObject);
     procedure actEliminarExecute(Sender: TObject);
     procedure actEliminarUpdate(Sender: TObject);
@@ -103,6 +107,7 @@ type
     procedure FormaPagoEditValueChanged(Sender: TObject);
     procedure TipoIVAEditValueChanged(Sender: TObject);
     procedure CustomViewShow(Sender: TObject);
+    procedure cbPrioridadPropertiesEditValueChanged(Sender: TObject);
   private
     FEmpresa: IBizEmpresa;
     FController : IEmpresasController;
@@ -249,6 +254,23 @@ begin
   end;
 end;
 
+procedure TfrViewEmpresa.cbPrioridadPropertiesEditValueChanged(Sender: TObject);
+begin
+  inherited;
+  if cbPrioridad.Checked then
+  begin
+    cbTipoIVA.Enabled := True;
+    cbFormaPago.Enabled := True;
+  end
+  else
+  begin
+    cbTipoIVA.ItemIndex := 0;
+    cbFormaPago.ItemIndex := 0;
+    cbTipoIVA.Enabled := False;
+    cbFormaPago.Enabled := False;
+  end;
+end;
+
 procedure TfrViewEmpresa.cbProvinciaPropertiesInitPopup(Sender: TObject);
 begin
   inherited;
@@ -279,7 +301,7 @@ begin
   cbFormaPago.ItemIndex := 0;
   for i := 0 to FFormasPago.Count - 1 do
       if IntToStr(FEmpresa.ID_FORMA_PAGO) = FFormasPago.Values[FFormasPago.Names[i]] then
-         cbFormaPago.ItemIndex := i;
+         cbFormaPago.ItemIndex := i+1; //Se añade uno porque hemos añadido a la lista la cadena vacia
 
   cbFormaPago.Properties.OnEditValueChanged := FormaPagoEditValueChanged;
 
@@ -287,14 +309,24 @@ begin
   cbTipoIVA.ItemIndex := 0;
   for i := 0 to FTiposIVA.Count - 1 do
       if IntToStr(FEmpresa.ID_TIPO_IVA) = FTiposIVA.Values[FTiposIVA.Names[i]] then
-         cbTipoIVA.ItemIndex := i;
+         cbTipoIVA.ItemIndex := i+1; //Se añade uno porque hemos añadido a la lista la cadena vacia
 
   cbTipoIVA.Properties.OnEditValueChanged := TipoIVAEditValueChanged;
+
+  cbPrioridad.Checked := (cbTipoIVA.ItemIndex > 0) and (cbFormaPago.ItemIndex > 0);
+  if not cbPrioridad.Checked then
+  begin
+    cbTipoIVA.Enabled := False;
+    cbFormaPago.Enabled := False;
+  end;
+  cbPrioridad.Properties.OnEditValueChanged := cbPrioridadPropertiesEditValueChanged;
+
 end;
 
 destructor TfrViewEmpresa.Destroy;
 begin
   FController := Nil;
+  cbPrioridad.Properties.OnEditValueChanged := Nil;
 
   if Assigned(FTiposIVA) then
     FreeANDNIL(FTiposIVA);
@@ -369,6 +401,7 @@ begin
         BeginUpdate;
         try
           Clear;
+          Add(''); //Valor nulo
           for i := 0 to FFormasPago.Count - 1 do
               Add(FFormasPago.Names[i]);
         finally
@@ -383,6 +416,7 @@ begin
         BeginUpdate;
         try
           Clear;
+          Add(''); //Valor nulo
           for i := 0 to FTiposIVA.Count - 1 do
               Add(FTiposIVA.Names[i]);
         finally
@@ -398,7 +432,7 @@ begin
   if Assigned(FEmpresa) then
     DADataSource.DataTable := FEmpresa.DataTable
   else
-    DADataSource.DataTable := NIL; 
+    DADataSource.DataTable := NIL;
 end;
 
 procedure TfrViewEmpresa.TipoIVAEditValueChanged(Sender: TObject);
diff --git a/Source/Informes/1/InfFacturaCliente.fr3 b/Source/Informes/1/InfFacturaCliente.fr3
index 5ed7e1d..d878e4f 100644
--- a/Source/Informes/1/InfFacturaCliente.fr3
+++ b/Source/Informes/1/InfFacturaCliente.fr3
@@ -1,18 +1,18 @@
 <?xml version="1.0" encoding="utf-8"?>
-<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="40210,6902819213" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  Pagina: Variant;&#13;&#10;&#13;&#10;&#13;&#10;procedure Memo2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Memo2.Lines.Clear;&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;     Memo2.Lines.Add('ORDEN DE DEVOLUCIÓN')&#13;&#10;  else&#13;&#10;     Memo2.Lines.Add('ALBARÁN DE CLIENTE')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo5OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;  begin&#13;&#10;     Memo5.Lines.Clear;&#13;&#10;     Memo5.Lines.Add('Nº orden:');&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo9OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;  begin&#13;&#10;     Memo9.Lines.Clear;&#13;&#10;     Memo9.Lines.Add('Fecha orden:');&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;Marca&#62; = 1 then&#13;&#10;  begin              &#13;&#10;     eOriginal.Visible := False;&#13;&#10;     Memo5.Visible := False;&#13;&#10;     Memo6.Visible := False;&#13;&#10;     Memo10.Visible := False;&#13;&#10;     Memo11.Visible := False;         &#13;&#10;  end;&#13;&#10;    &#13;&#10;  if &#60;Marca&#62; = 2 then&#13;&#10;     eCopia.Visible := True;&#13;&#10;       &#13;&#10;  if &#60;Marca&#62; = 3 then&#13;&#10;     eContabilidad.Visible := True;                                                                  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo29.Visible := False;&#13;&#10;    Memo30.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo25.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo29.Visible := True;&#13;&#10;    Memo30.Visible := True;&#13;&#10;    Memo24.Visible := True;&#13;&#10;    Memo25.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO2&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo33.Visible := False;&#13;&#10;    Memo34.Visible := False;&#13;&#10;    Memo31.Visible := False;&#13;&#10;    Memo32.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo33.Visible := True;&#13;&#10;    Memo34.Visible := True;&#13;&#10;    Memo31.Visible := True;&#13;&#10;    Memo32.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) and (&#60;frxDBCabecera.&#34;DESCUENTO2&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo18.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo18.Visible := True;&#13;&#10;    Memo20.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo44OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo43.Visible := False;&#13;&#10;    Memo44.Visible := False;&#13;&#10;    Memo42.Visible := False;&#13;&#10;    Memo45.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo43.Visible := True;&#13;&#10;    Memo44.Visible := True;&#13;&#10;    Memo42.Visible := True;&#13;&#10;    Memo45.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo39OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo41.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo39.Visible := True;&#13;&#10;    Memo38.Visible := True;&#13;&#10;    Memo40.Visible := True;&#13;&#10;    Memo41.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3C00000020446174615365743D22667278444256656E63696D69656E746F732220446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C0D000000204E616D653D224D61726361220000055374796C650100">
+<TfrxReport Version="4.8.11" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="40210,7231493981" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  Pagina: Variant;&#13;&#10;&#13;&#10;&#13;&#10;procedure Memo2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Memo2.Lines.Clear;&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;     Memo2.Lines.Add('ORDEN DE DEVOLUCIÓN')&#13;&#10;  else&#13;&#10;     Memo2.Lines.Add('ALBARÁN DE CLIENTE')&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo5OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;  begin&#13;&#10;     Memo5.Lines.Clear;&#13;&#10;     Memo5.Lines.Add('Nº orden:');&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo9OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (StrToFloat(&#60;frxDBCabecera.&#34;IMPORTE_TOTAL&#34;&#62;) &#60; 0) then&#13;&#10;  begin&#13;&#10;     Memo9.Lines.Clear;&#13;&#10;     Memo9.Lines.Add('Fecha orden:');&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure PageHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if not Engine.FinalPass then&#13;&#10;     Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10;  if Engine.FinalPass then&#13;&#10;     Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;&#13;&#10;  if &#60;Marca&#62; = 1 then&#13;&#10;  begin              &#13;&#10;     eOriginal.Visible := False;&#13;&#10;     Memo5.Visible := False;&#13;&#10;     Memo6.Visible := False;&#13;&#10;     Memo10.Visible := False;&#13;&#10;     Memo11.Visible := False;         &#13;&#10;  end;&#13;&#10;    &#13;&#10;  if &#60;Marca&#62; = 2 then&#13;&#10;     eCopia.Visible := True;&#13;&#10;       &#13;&#10;  if &#60;Marca&#62; = 3 then&#13;&#10;     eContabilidad.Visible := True;                                                                  &#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  Set('Pagina', 0);&#13;&#10;  Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo30OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo29.Visible := False;&#13;&#10;    Memo30.Visible := False;&#13;&#10;    Memo24.Visible := False;&#13;&#10;    Memo25.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo29.Visible := True;&#13;&#10;    Memo30.Visible := True;&#13;&#10;    Memo24.Visible := True;&#13;&#10;    Memo25.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo34OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO2&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo33.Visible := False;&#13;&#10;    Memo34.Visible := False;&#13;&#10;    Memo31.Visible := False;&#13;&#10;    Memo32.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo33.Visible := True;&#13;&#10;    Memo34.Visible := True;&#13;&#10;    Memo31.Visible := True;&#13;&#10;    Memo32.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo20OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;DESCUENTO&#34;&#62; = 0) and (&#60;frxDBCabecera.&#34;DESCUENTO2&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo18.Visible := False;&#13;&#10;    Memo20.Visible := False;  &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo18.Visible := True;&#13;&#10;    Memo20.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo44OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;RE&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo43.Visible := False;&#13;&#10;    Memo44.Visible := False;&#13;&#10;    Memo42.Visible := False;&#13;&#10;    Memo45.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo43.Visible := True;&#13;&#10;    Memo44.Visible := True;&#13;&#10;    Memo42.Visible := True;&#13;&#10;    Memo45.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo39OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if (&#60;frxDBCabecera.&#34;IVA&#34;&#62; = 0) then&#13;&#10;  begin&#13;&#10;    Memo39.Visible := False;&#13;&#10;    Memo38.Visible := False;&#13;&#10;    Memo40.Visible := False;&#13;&#10;    Memo41.Visible := False;        &#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    Memo39.Visible := True;&#13;&#10;    Memo38.Visible := True;&#13;&#10;    Memo40.Visible := True;&#13;&#10;    Memo41.Visible := True;  &#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C65732200010C3C00000020446174615365743D22667278444256656E63696D69656E746F732220446174615365744E616D653D22667278444256656E63696D69656E746F73220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C0D000000204E616D653D224D61726361220000055374796C650100">
   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
-  <TfrxReportPage Name="Page1" PaperWidth="215" PaperHeight="297" PaperSize="256" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
-    <TfrxMasterData Name="MasterData1" Height="24" Left="0" Top="373" Width="737,00835" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
-      <TfrxRichView Name="MemoCampo12" ShiftMode="smWhenOverlapped" Left="77,5" Top="0,5" Width="391,5436" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataField="CONCEPTO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" GapX="2" GapY="3" Wysiwyg="False" PropData="0852696368456469740A910000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A7B5C2A5C67656E657261746F72204D7366746564697420352E34312E31352E313531323B7D5C766965776B696E64345C7563315C706172645C66305C667331365C7061720D0A7D0D0A00"/>
+  <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
+    <TfrxMasterData Name="MasterData1" Height="24" Left="0" Top="373" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
+      <TfrxRichView Name="MemoCampo12" ShiftMode="smWhenOverlapped" Left="77,5" Top="0,5" Width="370" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataField="CONCEPTO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" GapX="2" GapY="3" Wysiwyg="False" PropData="0852696368456469740A910000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A7B5C2A5C67656E657261746F72204D7366746564697420352E34312E31352E313531323B7D5C766965776B696E64345C7563315C706172645C66305C667331365C7061720D0A7D0D0A00"/>
       <TfrxMemoView Name="Memo14" Left="1" Top="0,5" Width="75" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;REFERENCIA&#34;]"/>
-      <TfrxMemoView Name="MemoCampo2" Left="472" Top="0,5" Width="55,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;CANTIDAD&#34;]"/>
-      <TfrxMemoView Name="Memo16" Left="535" Top="0,5" Width="95,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;IMPORTE_UNIDAD&#34;]"/>
-      <TfrxMemoView Name="Memo17" Left="634" Top="0,5" Width="99,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
+      <TfrxMemoView Name="MemoCampo2" Left="452" Top="0,5" Width="55,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;CANTIDAD&#34;]"/>
+      <TfrxMemoView Name="Memo16" Left="512" Top="0,5" Width="95,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;IMPORTE_UNIDAD&#34;]"/>
+      <TfrxMemoView Name="Memo17" Left="614" Top="0,5" Width="99,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
     </TfrxMasterData>
-    <TfrxPageFooter Name="PageFooter1" Height="230" Left="0" Top="457" Width="737,00835">
-      <TfrxMemoView Name="Memo47" Left="2" Top="99" Width="738" Height="90,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
+    <TfrxPageFooter Name="PageFooter1" Height="230" Left="0" Top="457" Width="718,101251175">
+      <TfrxMemoView Name="Memo47" Left="2" Top="99" Width="715" Height="90,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
       <TfrxMemoView Name="Memo26" Left="1,55906" Top="101,89765" Width="461,73253" Height="82,99227" OnBeforePrint="Memo26OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" ParentFont="False" VAlign="vaCenter" Text="Forma de pago: [frxDBCabecera.&#34;FORMA_PAGO&#34;]&#13;&#10;&#13;&#10;Cuenta bancaria: [frxDBCabecera.&#34;DATOS_BANCARIOS&#34;]"/>
-      <TfrxLineView Name="Line4" Align="baRight" Left="0,89811378" Top="2" Width="736,11023622" Height="0" ShowHint="False" Frame.Color="8421504" Frame.Typ="4"/>
+      <TfrxLineView Name="Line4" Align="baRight" Left="2,101251175" Top="2" Width="716" Height="0" ShowHint="False" Frame.Color="8421504" Frame.Typ="4"/>
       <TfrxMemoView Name="Memo18" Align="baLeft" Left="0" Top="5" Width="110" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Importe neto"/>
       <TfrxMemoView Name="Memo20" Align="baLeft" Left="0" Top="25,67718" Width="110" Height="17,00787157" OnBeforePrint="Memo20OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_NETO&#34;]"/>
       <TfrxMemoView Name="Memo24" Align="baLeft" Left="184" Top="5" Width="105" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Imp. Dto. cliente"/>
@@ -23,8 +23,8 @@
       <TfrxMemoView Name="Memo32" Align="baLeft" Left="363" Top="25,67718" Width="105" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_DESCUENTO2&#34;]"/>
       <TfrxMemoView Name="Memo33" Align="baLeft" Left="289" Top="5" Width="74" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Dto. pronto pago"/>
       <TfrxMemoView Name="Memo34" Align="baLeft" Left="289" Top="25,67718" Width="74" Height="17,00787157" OnBeforePrint="Memo34OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2f%%" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;DESCUENTO2&#34;]"/>
-      <TfrxMemoView Name="Memo35" Left="632,00835" Top="54" Width="105" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Importe total"/>
-      <TfrxMemoView Name="Memo36" Left="632,00835" Top="73,67718" Width="105" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
+      <TfrxMemoView Name="Memo35" Left="610,00835" Top="54" Width="105" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Importe total"/>
+      <TfrxMemoView Name="Memo36" Left="610,00835" Top="73,67718" Width="105" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
       <TfrxMemoView Name="Memo27" Align="baLeft" Left="0" Top="53" Width="110" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Base imponible"/>
       <TfrxMemoView Name="Memo37" Align="baLeft" Left="0" Top="73,67718" Width="110" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;BASE_IMPONIBLE&#34;]"/>
       <TfrxMemoView Name="Memo38" Align="baLeft" Left="110" Top="53" Width="74" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="I.V.A."/>
@@ -36,22 +36,22 @@
       <TfrxMemoView Name="Memo44" Align="baLeft" Left="289" Top="73,67718" Width="74" Height="17,00787157" OnBeforePrint="Memo44OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2f%%" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;RE&#34;]"/>
       <TfrxMemoView Name="Memo45" Align="baLeft" Left="363" Top="73,67718" Width="105" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_RE&#34;]"/>
       <TfrxMemoView Name="Memo46" Left="475" Top="105" Width="113,3859" Height="14,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="VENCIMIENTOS"/>
-      <TfrxSubreport Name="Subreport1" Left="475" Top="121" Width="258" Height="62" ShowHint="False" Page="Page2" PrintOnParent="True"/>
-      <TfrxMemoView Name="Memo51" Left="2" Top="198" Width="734,46444" Height="13,78740157" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" HAlign="haCenter" ParentFont="False" Text="Reg. Merc. de Madrid, Tomo 9.450, Libro 0, Folio 1, Sección 8ª, Hoja M-151873. Inscripción 1ª CIF: B-81150278"/>
+      <TfrxSubreport Name="Subreport1" Left="475" Top="121" Width="238" Height="62" ShowHint="False" Page="Page2" PrintOnParent="True"/>
+      <TfrxMemoView Name="Memo51" Left="2" Top="198" Width="734,46444" Height="13,78740157" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" HAlign="haCenter" ParentFont="False" Text="[frxDBCabecera.&#34;REGISTRO_MERCANTIL&#34;]&#13;&#10;"/>
     </TfrxPageFooter>
-    <TfrxPageHeader Name="PageHeader1" Height="296,96075685" Left="0" Top="16" Width="737,00835" OnBeforePrint="PageHeader1OnBeforePrint">
+    <TfrxPageHeader Name="PageHeader1" Height="296,96075685" Left="0" Top="16" Width="718,101251175" OnBeforePrint="PageHeader1OnBeforePrint">
       <TfrxPictureView Name="Picture1" Left="1" Top="0" Width="240" Height="65" ShowHint="False" Picture.PropData="04446174610A9E1F00000A544A504547496D6167658F1F0000FFD8FFE000104A46494600010200006400640000FFEC00114475636B79000100040000001E0000FFEE000E41646F62650064C000000001FFDB008400100B0B0B0C0B100C0C10170F0D0F171B141010141B1F17171717171F1E171A1A1A1A171E1E23252725231E2F2F33332F2F40404040404040404040404040404001110F0F1113111512121514111411141A141616141A261A1A1C1A1A2630231E1E1E1E23302B2E2727272E2B35353030353540403F404040404040404040404040FFC000110800AD027703012200021101031101FFC40076000100020301010000000000000000000000040501030602070101000000000000000000000000000000001000020202010303030204050303050000010200031104052131124113065161227132815223149142623315A1B1C1728216A253243425110100000000000000000000000000000000FFDA000C03010002110311003F00FA04444044440444D1B5B9ADA89EE6CD82B5FAB181BE273F67CB352CB0D5C78FEE2C009EA7C01C7D0C8F67C86EBA836D1B9AD4DA7A7B2E09C1F504C0EA2273FAF67C87612BBEADAD67A5C649C1E84CD5673DC9712DEDF2D48B7CCE6A7A33FB477C881D2C4ACE3F9FE33902568B87B83BA3FE27FEB2CA066257F27CC6A71C9FD56F2B9BFDBA87EE62648D1BAFBF592DD8ABD9B1BAF8673810244444044440444C7AFDA066263AC40CC4C440CC444044440444404444044440444404444044440444404444044440444404444044440444404444044440444404444044440444404444044440444404444044440444404444044440444C4081CBF2FADC5D1EE5CC3DC607DBACF769C9D1A5CE7C96DFEE6F74A75C6407032A54FA05F598E5E9BF96F938D742B84FC42F7CAAFEECCEE35E94A2A5A6B50A883000181028E8F86F155A057F266C0F260482489649C37168BE2BAB5E318395C9E9FAC9F102B6EE0F8EB73FD3284FA2315FFA091B6F8CE4EB40DA17A3B56856B4B901CE7FD52EA3AC0E0F5F8C4AB6DCFC953D9F3E9458870B9FD564D7E579BA78DB8E8D40EAA10945EE72C17F4F5979CE5156EEB0D070A6CBCFE01BEDDC894EDBCE9C96BF11A6A8DA75FE3F964872A3AE4C099C07142DA5791E43176DDBF902C3F67E92FE739C072572EE5BC6ECF828058D017BF43D44E8C40CC4440444C40CC8DBBBFABA358B76AC15A93819F53F69177795156C57A9AF87BAC3827190A2570B75E9D9DBAF99B1761D4ABD67C49083D3A4097B1B7CC6CB28D0A457AEFDB61C8271F5F09AE94E55DF62BD9DE55AE8C7F56B03D475F2FA4888DCB724F5B6BA85A94951783E2BE2A72081EB25EBFC7192FBAFBF65AC6D86CDCA078AB8FBC0D956BEB1AC1AF71BFA603172F90C3D7C84F16EC72AAF4EC71ECBB5A2F93616C29503D44DE7E39C4328534741FEA6EB9FAF591391A28E2175EDD4B052A1855ECD8C4A32B9EA205ED562DB5AD89D55864627B95BA558D4DCB35C3FF42C02CA2BEFE3FCD8962206622202222022220222202222022220222202222022220222202222022220222202222026266206067D6662202222022220222202222022220222202222022220222202222022220222202796CE3A77F4FD67A9881CA71C3C7E50E2C2A6EF16F70013AB1391F9257B7A5CAD5C96B2115F4F3751D73F49D1E9721AFB48BE2EBEF150CD5E7F219FB40991302206678B6DAE943658C15146598F6C4F52BB75936B66BD01D57FDCBF3DBC4761FE3029F6790B9392FECF59D6CDCD923C6E6EF521F45FE12D77F46BAB5D362AA83DDAA7DCF15FC7CCF66EB21A6BE8A7C8EFDCB6C456A6B503AE08265B3F23C7AA793EC561581C12DDE05372556978EAF2F557E2EAC32B9F1EFF005FA4E8AB6F3457EDE401C7EB388DEE4EED8E38EBEB237B34D8CD6D9E395742DD313B3D460DAB4B0EA0A2E3A63D206E888818957C872171BBFB2D35F2620FBD77F96A1F7FBC95C96ED7A7AC6D77084E02E7EA4C81C5B56B75950DA4D81682FEDF878B67E99F581AB50EA71BA366C8B8DD5337E0CCBFD4573DFACC6A79F2EED56C2AB6B2F8B17C6198FD184D4391E41AD7D4454637B78D27C3C454A3BE47ACBBD0D1AB4A8F69319CE59BEA4C090A8AAA15400A3A00254F29F22D3E3D8D7FEE5ABD19474C7F196F20723C46AEF517565156CB97C7DDC7510207FF0027AEE0134AAF7B631E4D4E7040FD66DD7D7D8B5AFDAE4E8163AE1A843E242AE32409496F0BC9FC7D93678D6FEE5F043E53271F79B357E4DB5BBB5AFA970F65436364F8127AF6CFD205E69DD4EF6DD7B352FE49594B33FE43F496826BA35EAD7AC254A157BF4FBCD9033111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110356C6BD5B159AAD1E487D272FC87C677AA2F6E95A5D40C852487FD019D6C40E5C3F256EE5296EB6C514D7585B3C189CB7DA69D8A39AAB900C1362ED0F31F807EA463FC675D31038DE469E57FBC1614DA5E2C63DD5F31E5D3E9366AD3B541BB668D3BDEB71E34F937E4A1BB9597BCA29DA6AB4003E369CDAC3FCAABD679E4B93D7D3A5E952DEEAAF88F01E4509185260734A96BF1889A9A975BB86C3EE5CEBD4007D4FACD1CC53B4D452E746CD7358C5967707FF006CEDF8EA4D1A5556C497F1CB13DCB375333BB65556B58F68F240A72BF581C7F27C9EC5BA35210A9ACE1551AA1DD87A19D96A0C6AD20F7F05FB7A4E5F438BD5D9D0BB62FA2CA8A65AA3613D0E7F96751A849D5A89EFE0BFF681BA60CCC85CAEDB6AE93D95FF00BA462BE99FC8C0A9E4EAB393DCA6FA6B17EB6B121AB2D8361F5C0FB49F4EDEB57AF7EC2EA3D3FDB8EA1902B374FF002990B8CA5D749F6F90A9FCE97F711002181F5F1C7D679E515F90DAD4A52EBAA4DA5F26A7F6E1477CC097C3B3F205B93D85C7913FDBA11FB147FE65B89E29A929A92AAFA2200ABFA09B202222062781452ACCE114337EE3819336440C0998880888808888088880888808888088880888808888088880888808888088880888808888088880888808888088880888808888088880888808888088880888808888088880888808888088880982713322F21B9568EABEC580903A051DC96E804081A0EFB5CB6D6D618D35A84A89EC7F9B12BF90767534DCA136366CCB201E2DE00FE3FACB1D7D5BF438B3ECB017DAFE6C4F5C799EDFE134F23A4DFF002BABB6599BC8AA807B29102EA918A9075E8A075EFD0481F206FF00F9B6560FE5690800EE7ACB2947F2AD8D8A35E83AC0FBBEE65580E831F5813AED2AB6B8D5D3B99955AB00907C5BA08E15B3C7A2E491596405BB90A7A48859B99E30594B9A372A19047EE5703A8FE3377C77DDFF008BAC5CC5AC05831231D73D60599945C8F276FF00C9D5A946B1D95AFF002253AF5F5CFD312EAEB05553DA412114B6077E9D653F0ADACF5064B3C766F66B9946738CF40D981A77EE5B34B62AD4AF62C2EEBEE1438651EA07D311F16A19D1F6AD6B588252A171CF8AFDA398FF00F192BD5A2E74D9D8B43D9ED8EACA4FAFDA5ED152D352D49FB546206C1333133011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111011110111101111012AF99F1B5B5B4DF3E17BFE58FA2F5966657356DB1CB06F25F6F517F68FDDE4FF005FE10249D8A9361350025FC73DB2140ED9322ECDA97F27AFAF5B92D41365CABD874C2F919B7FBCD742B6DEBED3D8E6A424125B12170CD5ECF23BDB6A7BB04C0FF4C0BA949B7AD4EEF3D5D76D994A2AF23567A3127D44BB9CEDB6D14F3776FD953D95AAAA2DA8322B61D0E44095BBE7ABEEEC6854C1EAFC6DAC038B14FF00997F49B7E3B6BDDC5A5B667CD99C9F2EFDE62EFEEB93D34B356C6D621F39EDE4B367068C9C7AAB3FB8C19BC9FEA7303CF3C50E8350F6FB06F22B5B338C67EB230B6BD0E2AA5DDB1ACF73FA7FDCD4B8207A199E6377593769D6D9AFDFACA17F682F9316EC3126AEBD64ADB9211900AF59F0141C7F2C0A6D77AAEE5F49352C7D8A6A4667B1C966049E9E44CE984A8E12E6D8BB6AE6A854CAC2A2AA303F096E2066222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222022220222202222078760AA58F40064E657F18E4D16EF6C1086E627C88C0F15E8239CB5C6A7B14D812FB982A2F72DD7AE049376BA5D426B58463A790FE6F1EF03C582A77D66B4793F52857F6F6EF227C7548A360F439BDCE40C4B3B0AD7596E8022F427A63A487C1A14E3D49182CCCC7F8981612A389B756DB77757219C5AC5EB3EA0CB7244E37575392D9DFD91ADE1414B091B2BDF19FDAD02EF729BF596BA96D6FED3CFC99FFCD581E99FA4DDC15B559A39A9FDC50EDF9FD7ACCEA6DB393A3BFE3FDCE3B0C78D8BF5120E9D878DD1DEF2C2AA58DEC2AF4C7976C40CE9BD9B3CD5BB2D57B95A66A4B3FF00B78F5C4B0355EFB9EF3D6BE15A115B67AE4CE7780D4BAC57B36DDE9627DD6C740403EB2EADBD69E2B676CDAF65643321030571FCA603E3E6D6A2F7B3196B9FA0EDD25ACABF8E57627134B59FBACCBFDFF2FACB4819888808888088880888808888088880888808888088983033131911033113103313C96507A9033DA66066222022220222202222022220222202222022220222620662556DF39455BF571F49165EEC3DC1DC22FDE5A0819888808888088880888808888088880888808888088880888808888098333346E6D57A9ACFB16101507AF6CFA4080BED6E7325C119D11E27F56FBC9757B8FB773B28F6800B5B03927F9A6AE3171A876AF544B763F3B4AF418FF2FF00D26FD7A169D6F6D9FC94E497CE3A375E9023D2C4F1D733671FD4C0639C0199B78973671F4B9C755F49B1E845D47A6BC04F06033F7134F0E9EDF1F527F2E474CFD7EF02660673EB39BE3F97D6D4DB7E356A3FDCDB7B12547E1FAE674B2A3534758DDB7AEEBF9F9FB81C7423CBE8D024DBC5E97B76F902BE5963667F24F53E27D2721B376F6AECB2DB503ABB0D8AAE7C80C8BF59D0D1ADBBC7EFD976C137EA3A05F7339F000FAA4F1CBEDD1B08874D5761F51C3BA9FD9E27A119812F8BB6E6D5076AC46F74114D44789C0F4EBDE46E75DBFE1CA6CA8A9DD82AD687A75EC24AA9AAD8A86CEEEAFB028C354D9F2C01EA3C646E5A87B76753C2C166BDB6AB1A5B07AFD467AC0B4E3D3C34A84C63C51463F849330001DA6602222022220222202222022220222202222022220255F37BDB1AD48A7510BED5C08ABC7B83F5964CC14658E00EF994BC45766C6FECF236B33A92529F2ECA07F288141C2731BDADCAFB5BF5BB1B0FB6FF00967C58FD167753E75F29D33A7CCFBAAAD9B0FBA1D0E2779C75DEFE8D16E08F3407F2EA7B7A9812A41E5B93A78DD7F7AC05989C222F7264BB2C4A91AC7215546493F41393D2D43CF72F76DEE067D4A4E295CE07DBA40DFC3E8EE721BE793DEADABA87E54A17CAF5FF00489D38984454508A30AA3007D84F50111101111011110113CB151DC819ED999819888808888088880888809A36EF5D7D6B6F6ED5A963FC26F94BF29DC1ABC53A86457BBF0557EBE40F7C40D3F19D65B52DE4ED50D7EC392AFEBE1F497E243E1E9F638CD6AFD45633FC449B0111101111011110113110331110111101111011110111101131355DB5AF40CDD6AD63FD44081BA268AF6F56D5F2AEE465FA861368656FDA437E9D606654F2CE9B9757C4850C2DFCEC63D82A1CCB3BAD4A6A6B5CF8AA8249321719AB90DBB7FE57DFF9648EAABE8040DBBBAA6DD41AD57E232A3F455333BDACD769B515746C003D3B4939FCB1356DDE35A87BCF50833D606BD9F24E3DC67C5D6BC79671D40FACF7A0BE1A74AF7FC01FAF71995C77ECE569F675A875AAD18B2D718017D712DA9AD6AA96B5FDA8028FE103D19CF72E7674F96AF769715D6E98B3CBF6B91E9FE13A2951F24D24DBD005C9F1A583B0F423D73037E9F269B3E22DA9A936FF00B41FA871F691793E092DA6D6E3C8D7D97073FCAFF6692ADAD2DE2D56B4F758541AA50707207E254FA48BAF672DA215F788BF5CA82E7A06A8FF00E606BE02CE4ADA6C3B96AB355FD2FEDC0002B0FA99AB6B5AE3CE71F73950EA0F9203D87D04F4D4E99E56BAEBB3C75B601B5954E035A3B664BFED9BFE7ABD9EA10D257C4FA60C0B59998998088880888808888088880888808888089E4903A938122EDF29A1A55FB9B172AA8E9D0E7FED025CCCE76FF9971C0634D5F65BE8AA409EB5F63E43C914B56B1A150C1C37E45C1FD604BF91DEB57196A7536DB84A957F7331FA495C66B9D6D0A2923C5950790FBFACADDEF3DAE6F535D72CBADFD4B08EDD65E40E2BE7F57F5755C03D5581C77E93A2F8DD8B670FADE3E5F8A01F977957F3A4AFFE3EAB8E43ABE1587A6649F8632B70A9825B0C724F781B3E53B1E1C6B515BE2FD8212B41825B3F4126F0FA634B8FA68F1F070A3CF3D4F97DCCADDCF0DDF916BEB92197590DB8C766FF00D52FE026669BF675F5D4BDF6AD6A064F91C74952DF2FE110E1AD603B79781F1FF181791236AEFE9EE286D7B56C0467A1EB3D6DEDEBE9D2D7ECBF854BDD8C0DF12369EED1BBACBB5AEDE553E70D8C6712B76FE59C3EA5AD55AEFE4BD0E14E205DCC4A4AFE5DC45A57C3DD60E405608483996D76CD3450DB17304A94793337A081C6F37BFBDBFF00204E32876AEBA9C0200EFF00569DB22F8A2A939F10067F4957C5DFC26FDF76F71FE365C702CB7073FF00596A2066247DDDED6D1A4DFB360AD17D4CAFE139C6E5DEE2B41AE8ACFF004ED27F78302E22626BD8D8AB5A96BAE6095A0CB31EC206D89CCDFF002F242BE869D9B351E9E4411D7ED2C386E768E4C1AD94D1B69FBE86EE205B44C48FB7BBAFA807BCF866FDA83AB37E82048338FF0094B0DBE6F47415FF001047B8BDFBCB37F933ABE471FB0D4E3AB85ED29B5EE5E63E52BB1420515005831FCBF1FF00B40ED2B415A2A0ECA001FC27B989E6DB2BA90D9630445EA598E0081EE254D9F21D4F3F1D6AECDAFAB52BE4A3F8CF5A1CF6AEEDEDAC55A8D853D2AB3A1302D22604CC044440C489C87235692AA920DD69F1AABCF5663FF892E72FF32E3362D14723A6A4DDAE7F32BDC2E73E58FB40B3AB4393BABF2DBDA35D8493E357ED03E993345BADCC68ED54F45CDB5AEEC05A8FFB947DA4DE17901C871F5DF90CF8C3E3EA24F801DA266206279B6CAEA46B2C60A8A32CC7B013D19CCFCA778DD7D1C36B866BAF61EE00703C0C098790D9E54BD3C5B8AD17F76C107FFA0FD678D73BBC772B569BDA6FD6D852559CE5C30EF2D74B529D3D64D6A542220C60489AFC7FB9CA5BC8DCA4328F6E904F603BB40B3F4888810397D8D8A6944D6FF76D6080919033EA647A7E37A01C5DB61B6B63392F6124647D17E93672EA56ED4D8EEA96052B9E9F94B38102CE0F8AB482DAEA31D7F1CAFF00D8CD2DF1ED256F3D66B35C9EA4239C1C7D8CB691777706B85441E7B1674AEB1DCFDFF410289B5B91DEE47FB1D8B5ADD2A583D8D803A8EAAB9FBCE9400A028E800C09AB5A96AABFCCF95ADD5D8FA98D8BEAA697B2C6C2283981AE873EE5F73B0351602B39F403AC8A1FFE614A9AD93511FBB743678FDA46E3F8ABADAD1ADB9869925D35C0C1EA73F9197AA028C0E8040C2A8550AA30074027A88809AEEAD2EADEA7FDAE0A9FD0CCDB6A535B5B61C220CB1FB095FC9739A9A3A82FF2F37B5734563BB40A7E29ACD5DEBDD2AB2E4A49AAC3E5FEDD6BEA125971FB3572FAED9BBC8D76F9018F16001E81965771DB156A72C8CD62DD6EF8CD98C008DDF12E76B88D6BCBD9493AFB0C0AFBB5F43D7BE6043E5B894BEE5BF4E9C6EA8F2AEE3FB063D31F79B38FA7925DB4B37AD1613590703001CF6CC97A22EA1469D80B0AD7F1BBF9BF5FBCDD7BDCBAEEF4A66E03F05FA981BE6644E3B706EEB2DBE251FF006BA1FF002B0EE24A81988880888808888088880889A766E5D7A1EE6EAA809303CED6F6A69AF96CDAB5F4C804F53FA0958DCBEDEFEBBBF13431C76B2CFC413F60669E3B8B1BF6FF00CA6F5DFDCFB87CA9AB03C107A4E81400300600F41D20738FC0F35BB5A9DCE4993CBABD28A3C47D819BE8F897175F89B3CEE61D58BB67CBF597B3C9651DC81FAC0D3AFA3A9ACBE345295A9EB8513D6CDF5EB50F7D87C52B1E47F41356E725A5A55FB9B16AAA9E83D49FE0255D17D9CFDDEE207AB8FA1F20B0E97FD883E9025F0B59B2A6DFB0F95BB24B03DB09FE512CE61155142A80AA3A003A013D40A4F96EA1DAE1AEC100D5F98F2EDD242F84EC13C6DA8CC19696CF41D474CF597FBFAC76B4EED707C4D8A541FA19C56872B5719ABBBC75F6326E312A8507F987481D0F01525F7EDF240F91BAC2A848C6154CB4DDDDA34759B6761BC2A4EE678E26B5AF8ED755F54049ED924649945F38DAA97569D47257DC6F20D8C8E9E9881234B43FE5B60729B843D0DFFEBD47F94FD65CDDA5A97D268B6A47A9860AE0769AF88F6BFE37585254A0AD402A723B496481D4F481C2F15459A1F2C7D6A7F62923C7D3C3ED267CC6EB2FDCD3E312C645B8E5C0008EF8CFF093B88D4B2DE6B777DB22A0E56B565C127EA0FD2639ED72396E3B71C85A55C23B11EA7B40BAD2D54D3D4AB593F6D4A173F5FBCAAF966AD7670D73AAA8B130C1C8191FA4BB2CAA32C401F538945C9B8E5B7138FD6B3CEAACE76F1D55403D3AFD604CE03506BF13AC8EA3CFC0331C75CB75955F39DBF6F8F5D4E83DE20E7B9FC7ED3A6550AA14765000FE138FE7EC7DBE7F5F49EC4454EC08C9C1EFD605C7C5B40E9711487502DB479B91EB9ED2DACB52A436587C557B9303DBA6B55C8545000F4132E89629570194F707A881C57C91B9AE473755411A74F455C659B3FE6975F13DDD7BF8E5D64012DA001628FBFACBA615AD64360560608F4C4E5BE3BA95AF3DBFB1430FEDAB38500E17260759394F9A6C01669D2E73417F2B54301FA644EA2BBA9B73EDB87F1E87C4E706733F2BD1D6B7774EED8502A66F1B6CFA0CC0B7D5E4789AB491EBBAA4AFC723040EC3AFF19CE35F5F2DF26D7D8E35735263DDB5463B7D4897FAFC1706D5AAA5496A29C8EB91FC7126D69A1A445552D7417ECAB8526078E4F90AF8FD66B9FAB7644FE6321F0DA16B03C86F37B9B17FE4A0F51583D80951F2DB56DE4B4B56FB00D50E0D8B9F13D4F7C99D4D776B2D6BE362F8280A0F90EC3B40CECDAB46BD9730CAA29247D44E5FE23A9E7C86E724B5FB7539F1AC7EBD66CF947C86BAA86D1D46576B3F0B6CCF4507E925FC5D134B8843B16056B096CB30EDE9D605DDB6D7556D6587C5146589F4944947FF0021B7DEBC15E3AA62A94863FD523D5BED36FCAB76CD6E24B5047F58842DE9E27BCDBF1DD8D63C4EB225884AAE08523BC0B1D7D6A35D057456B5A8E985139BDB7D7DCF95D14A2916EB8CBD83A7A4B5E4F9FD0D1A5CAD82EB97A2D29F9367F41297E3168DADED8E4F69AB5B2CE8B961927F481D70999AEABAAB413538703A12A73D67B819989E2DB12A4365842AAF72644CEDEEABAE0EB52C30B603FD439F5FB40976DD55286CB58222F726427E6F88F120EC2383F8903F21FC679D7E0B4EA6F27365EC7F71B58B67F8495571FA34926AA2B427BE1440E63757FE0F6072DC606B34F60FF52A4EA9FE13A8D2DA5DCD5AF6514AAD83215BB89AB925A3FE3EF4703C0237E3DBA81D268F8EABA70FAE1C156C1386EFDE05A44C4181E6D75AEB6B1F3E280938EBD2731C32272BCDDFCA588E16BFC69F2E83E9DA5A72BB4F720D5D462C6C715DCF5FE4C80CB0D6D7AF5A95A6B185418FD7EF036CCCC120778C8819898881AB675D362BF071DBF253EA1876321DDB7C8EA900EA9D9403AD9510093FFA6594C40A8BB9D3E0575F56EB3608FC6A2B8EBFAFDA43D2DBD8A9BFB8BF4AEBB798F8961FB541F4CCE8BF1CFDE66057D956FEE792331D5A48C10A41723ECC26CD6E2F4F5B1E0A5881825C96CFF8C9B10303A099888088881E594302AC320F712AB6BE33C56DD9EE5A8C5C763E47A7DB12DE2072EBF09D55B11BFB87F1562DFEA1F606581E237E94F0D1DF6A973D9D43CB88814B67FCED548D638D877041DA5C215FB91376969F2F52B0D9DD1692B851E03F16FAE7D659CCC089C769B69EB9ADECF75D999D9F18EADF692A66202222022220222202222026BB6A4BAB6AAC1E48E30C0FD26C881CC9F8C721ACCE78DE45F5EB24B2544640CFA66477E2BE648095DF0E47600E275D1038DAF8BF9B58017DD15F5EC4CDBFFC639ED9C0DDE4F20755C0C9FBCEB62050697C575696AECDBB5B6ADACE416E8A7F84BD555550AA0003B00313D44044440C4E776FE342CE6E9DDAF1EC825EEF2FE61DB13A388180303A4AFE6787D7E5B5BD9B4F8B0EA9601920CB1881C7D3F19F90E915AB479109AEA720608FF1127EBF05CBDB60B391E49AC5F5AAB1E2A7F59D0C40F088B5A0441855180247E4B8FA791D56D6BB20375561DC11EB25C40E4EDF8CF3B632D2FC916D504746CF9604BFE338CD7E33586BD1923BB39FDCC4FD64D8818943CEFC7EDDFBD76F4EC14EC852ACC7AE47A4BF881CC71BF1CE4D2D0DC9EE9BAB4208A8125588FAE65DF2156ED9AAD5E8BAD571185B1BAE24C881C76D7C73E4F78EBC883E5FB865809EB8FF0086EED5E436374846192B574FCA75F1022E8E8D1A340A691D07763DDBF59EB73529DCA1E8B8655C633EA248881CA9F88EDD5616D5DF7A9588F250719512E34785D7D5B3DF677BEEFE7B0F963F49651028BE41F1AAB9829687F6AFAFA79632181FAC85AFF0A51585BF6ED27396543D3A76C7D275262053BFC5F8A3A475057F522C6EAD93EB99128F88D6081B1B56DB5211E3567F1C09D244087B9C66A6EE99D3B57FA38C281E9282BF8455558C2BDAB2BA4F60870D3AB88157C77C7F8ED04C2A7BD6F66B6C1E4C41902DF87E9D9B6F7ADAD556C7C8549D141FA89D1C408FA9A7AFA748A75D0228EF8F53F5337CCC40D5B1457B1535360CA38C1C74956DF1DCB1F6F7F6AB5EC103F412E620501F8EEEA922AE52FF0016E8C1CF974FB7D26C1F1BC802CDFDA751D706C977102AB5BE3FA7AEEB61B2DB994E47B8E581FE12CF000C0E83D27A88106BE3DE8A5EAA361C176F20CDF978E7D1644D9E06DDA7F2BB7AFF000F5443E225CC40E72AF87D5492D5EFECA3B77656C644DE3E327D791DB3FF00BE5E440A9D7E06AA6D5B5F66FB8A1C85B1F2B9FD2586CEBAECD0D4392AAFD32A7066E881A852A35FD8C9F1F1F0F2CFE58C63BFD626D881FFD9" HightQuality="False"/>
       <TfrxMemoView Name="eContabilidad" Left="0" Top="93" Width="204,46444" Height="33,78740157" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="8421504" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="CONTABILIDAD"/>
-      <TfrxMemoView Name="Memo15" Align="baLeft" Left="631,15748031" Top="270,01979" Width="105,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
-      <TfrxMemoView Name="Memo12" Align="baLeft" Left="530,44094488" Top="270,01979" Width="100,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe unidad"/>
-      <TfrxMemoView Name="Memo23" Align="baLeft" Left="76,2" Top="270,01979" Width="392,7" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Concepto"/>
-      <TfrxMemoView Name="Memo8" Align="baLeft" Left="469" Top="270,01979" Width="60,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Cantidad"/>
+      <TfrxMemoView Name="Memo15" Align="baLeft" Left="610,33307086" Top="270,01979" Width="105,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
+      <TfrxMemoView Name="Memo12" Align="baLeft" Left="509,61653543" Top="270,01979" Width="100,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe unidad"/>
+      <TfrxMemoView Name="Memo23" Align="baLeft" Left="76,2" Top="270,01979" Width="372,7" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Concepto"/>
+      <TfrxMemoView Name="Memo8" Align="baLeft" Left="448,9" Top="270,01979" Width="60,71653543" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Cantidad"/>
       <TfrxMemoView Name="Memo13" Left="0" Top="270,01979" Width="76,2" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Referencia"/>
-      <TfrxLineView Name="Line1" Left="736,5" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
+      <TfrxLineView Name="Line1" Align="baLeft" Left="716,04960629" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
       <TfrxLineView Name="Line2" Left="0" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
       <TfrxLineView Name="Line3" Left="76,2" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
-      <TfrxLineView Name="Line5" Left="530,44094488" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
-      <TfrxShapeView Name="Shape4" Left="373,68243666" Top="135,10760667" Width="364,05511811" Height="120,94488433" ShowHint="False" Color="-16777211" Curve="2" Frame.Color="13056"/>
+      <TfrxLineView Name="Line5" Align="baLeft" Left="509,61653543" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
+      <TfrxShapeView Name="Shape4" Left="373,68243666" Top="135,10760667" Width="343" Height="120,94488433" ShowHint="False" Color="-16777211" Curve="2" Frame.Color="13056"/>
       <TfrxMemoView Name="Memo19" Left="381,56957333" Top="141,42517" Width="289,2047" Height="108,49612157" ShowHint="False" AllowHTMLTags="True" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" ParentFont="False" VAlign="vaCenter" Text="&#60;b&#62;[frxDBCabecera.&#34;NOMBRE&#34;]&#60;/b&#62;&#13;&#10;[frxDBCabecera.&#34;CALLE&#34;]&#13;&#10;[&#60;frxDBCabecera.&#34;CODIGO_POSTAL&#34;&#62;] [&#60;frxDBCabecera.&#34;POBLACION&#34;&#62;]&#13;&#10;[&#60;frxDBCabecera.&#34;PROVINCIA&#34;&#62;]&#13;&#10;A la atención de: [frxDBCabecera.&#34;PERSONA_CONTACTO&#34;]"/>
       <TfrxMemoView Name="Memo21" Left="0" Top="135,84261" Width="130,05504" Height="20" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="Nº Factura"/>
       <TfrxMemoView Name="Memo22" Left="0" Top="156,51979" Width="129,90538" Height="17,00787157" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
@@ -64,16 +64,16 @@
       <TfrxMemoView Name="Memo6" Left="0,44094" Top="180,44094" Width="45,85807" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="Cliente:"/>
       <TfrxMemoView Name="Memo7" Left="201,03154" Top="180,44094" Width="165,46444" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;NIF_CIF&#34;]"/>
       <TfrxMemoView Name="Memo9" Left="135,44094" Top="180,44094" Width="63,85807" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="N.I.F/C.I.F:"/>
-      <TfrxMemoView Name="Memo10" Left="59,03154" Top="201,44094" Width="307,46444" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;NOMBRE_VENDEDOR&#34;]"/>
+      <TfrxMemoView Name="Memo10" Left="59,03154" Top="201,44094" Width="307,46444" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;REF_VENDEDOR&#34;]"/>
       <TfrxMemoView Name="Memo11" Left="0,44094" Top="201,44094" Width="57,85807" Height="17,00787402" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" VAlign="vaCenter" Text="Vendedor:"/>
-      <TfrxLineView Name="Line6" Left="469" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
-      <TfrxLineView Name="Line7" Left="632" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
+      <TfrxLineView Name="Line6" Align="baLeft" Left="448,9" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
+      <TfrxLineView Name="Line7" Align="baLeft" Left="610,33307086" Top="269,50406638" Width="0" Height="548" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
       <TfrxMemoView Name="eCopia" Left="0" Top="93" Width="96,46444" Height="33,78740157" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="8421504" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="COPIA"/>
       <TfrxMemoView Name="eOriginal" Left="0" Top="92" Width="143,46444" Height="33,78740157" Visible="False" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="8421504" Font.Height="-24" Font.Name="Tahoma" Font.Style="1" Frame.Color="13056" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="ORIGINAL"/>
-      <TfrxMemoView Name="Memo50" Left="0" Top="65" Width="480,46444" Height="33,78740157" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" Text="SAN ALEJANDRO, 10 - 28005 MADRID&#13;&#10;TLF. 91 364 22 06 - FAX 91 365 53 54 - e-mail: noviseda@fedecon.es"/>
+      <TfrxMemoView Name="Memo50" Left="0" Top="65" Width="480,46444" Height="33,78740157" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Color="13056" ParentFont="False" Text="[frxDBCabecera.&#34;EMPRESA_CALLE&#34;] - [frxDBCabecera.&#34;EMPRESA_CODIGO_POSTAL&#34;] [frxDBCabecera.&#34;EMPRESA_POBLACION&#34;]&#13;&#10;TLF. [frxDBCabecera.&#34;EMPRESA_TELEFONO&#34;] - FAX [frxDBCabecera.&#34;EMPRESA_FAX&#34;] - e-mail: [frxDBCabecera.&#34;EMPRESA_EMAIL&#34;]"/>
     </TfrxPageHeader>
   </TfrxReportPage>
-  <TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
+  <TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
     <TfrxMasterData Name="MasterData2" Height="18" Left="0" Top="16" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="frxDBVencimientos" DataSetName="frxDBVencimientos" RowCount="0">
       <TfrxMemoView Name="Memo48" Left="3" Top="2" Width="79,90569" Height="13,82684" ShowHint="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBVencimientos.&#34;FECHA_VENCIMIENTO&#34;]"/>
       <TfrxMemoView Name="Memo49" Left="89,92919" Top="2" Width="98,80334" Height="13,82684" ShowHint="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBVencimientos.&#34;IMPORTE_TOTAL&#34;]"/>
diff --git a/Source/Modulos/Albaranes de cliente/Model/uBizAlbaranesCliente.pas b/Source/Modulos/Albaranes de cliente/Model/uBizAlbaranesCliente.pas
index dcfc28b..d1e66a5 100644
--- a/Source/Modulos/Albaranes de cliente/Model/uBizAlbaranesCliente.pas	
+++ b/Source/Modulos/Albaranes de cliente/Model/uBizAlbaranesCliente.pas	
@@ -241,7 +241,7 @@ begin
       FCliente.DataTable.Active := True;
 
     ID_CLIENTE := FCliente.ID;
-    if FCliente.ID_FORMA_PAGO > 0 then
+    if (ID_FORMA_PAGO = 0) and (FCliente.ID_FORMA_PAGO > 0) then
        ID_FORMA_PAGO := FCliente.ID_FORMA_PAGO;
     DESCUENTO := FCliente.DESCUENTO;
     DESCUENTO2 := FCliente.DESCUENTO2;    
diff --git a/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm b/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm
index 88d58bd..e462400 100644
--- a/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm	
+++ b/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm	
@@ -75,11 +75,11 @@ object RptAlbaranesCliente: TRptAlbaranesCliente
               'ACION, CONTACTOS.POBLACION) AS POBLACION,'#10'  COALESCE(CONTACTOS_D' +
               'IRECCIONES.PROVINCIA, CONTACTOS.PROVINCIA) AS PROVINCIA,'#10'  COALE' +
               'SCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL, CONTACTOS.CODIGO_POSTAL' +
-              ') AS CODIGO_POSTAL'#10'FROM'#10'  V_ALBARANES_CLIENTE'#10'  INNER JOIN CONTA' +
-              'CTOS ON (CONTACTOS.ID = V_ALBARANES_CLIENTE.ID_CLIENTE)'#10'  LEFT O' +
-              'UTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_DIRECCIONES.ID = V' +
-              '_ALBARANES_CLIENTE.ID_DIRECCION)'#10'WHERE V_ALBARANES_CLIENTE.ID = ' +
-              ':ID'#10#10
+              ') AS CODIGO_POSTAL'#10#10'FROM'#10'  V_ALBARANES_CLIENTE'#10'  INNER JOIN CONT' +
+              'ACTOS ON (CONTACTOS.ID = V_ALBARANES_CLIENTE.ID_CLIENTE)'#10'  LEFT ' +
+              'OUTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_DIRECCIONES.ID = ' +
+              'V_ALBARANES_CLIENTE.ID_DIRECCION)'#10'WHERE V_ALBARANES_CLIENTE.ID =' +
+              ' :ID'#10#10
             StatementType = stSQL
             ColumnMappings = <
               item
diff --git a/Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm b/Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm
index 92ad126..9d25f3f 100644
--- a/Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm
+++ b/Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm
@@ -79,6 +79,7 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
       Top = 28
       DataBinding.DataField = 'REGIMEN_IVA'
       DataBinding.DataSource = dsDatosComerciales
+      Enabled = False
       Properties.DropDownListStyle = lsFixedList
       Properties.ImmediatePost = True
       Properties.ImmediateUpdateText = True
@@ -377,6 +378,8 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
         object dxLayoutControl1Item3: TdxLayoutItem
           AlignHorz = ahClient
           CaptionOptions.Text = 'R'#233'gimen de IVA:'
+          Enabled = False
+          Visible = False
           Control = cbRegimenIVA
           ControlOptions.ShowBorder = False
         end
diff --git a/Source/Modulos/Facturas de cliente/Model/uBizFacturasCliente.pas b/Source/Modulos/Facturas de cliente/Model/uBizFacturasCliente.pas
index dcb4a0d..10ae51d 100644
--- a/Source/Modulos/Facturas de cliente/Model/uBizFacturasCliente.pas	
+++ b/Source/Modulos/Facturas de cliente/Model/uBizFacturasCliente.pas	
@@ -313,9 +313,9 @@ begin
     CODIGO_POSTAL := FCliente.CODIGO_POSTAL;
     PROVINCIA := FCliente.PROVINCIA;
     POBLACION := FCliente.POBLACION;
-    if FCliente.ID_FORMA_PAGO > 0 then
+    if (ID_FORMA_PAGO = 0) and (FCliente.ID_FORMA_PAGO > 0) then
        ID_FORMA_PAGO := FCliente.ID_FORMA_PAGO;
-    if FCliente.ID_TIPO_IVA > 0 then
+    if (ID_TIPO_IVA = 0) and (FCliente.ID_TIPO_IVA > 0) then
        ID_TIPO_IVA := FCliente.ID_TIPO_IVA;
     RECARGO_EQUIVALENCIA := FCliente.RECARGO_EQUIVALENCIA;
     DESCUENTO := FCliente.DESCUENTO;
diff --git a/Source/Modulos/Facturas de cliente/Reports/uRptFacturasCliente_Server.dfm b/Source/Modulos/Facturas de cliente/Reports/uRptFacturasCliente_Server.dfm
index dd9a371..ae22601 100644
--- a/Source/Modulos/Facturas de cliente/Reports/uRptFacturasCliente_Server.dfm	
+++ b/Source/Modulos/Facturas de cliente/Reports/uRptFacturasCliente_Server.dfm	
@@ -38,13 +38,19 @@ object RptFacturasCliente: TRptFacturasCliente
               'ente.importe_neto,'#10'   v_facturas_cliente.importe_porte, formas_p' +
               'ago.descripcion as FORMA_PAGO,'#10'   v_facturas_cliente.DATOS_BANCA' +
               'RIOS, v_facturas_cliente.RETENCION, v_facturas_cliente.IMPORTE_R' +
-              'ETENCION'#10'from v_facturas_cliente'#10'   left outer join contactos on' +
-              ' (contactos.id = v_facturas_cliente.id_cliente)'#10'   left outer jo' +
-              'in formas_pago on (formas_pago.id = v_facturas_cliente.id_forma_' +
-              'pago)'#10'   left outer join clientes_datos on (clientes_datos.id_cl' +
-              'iente = v_facturas_cliente.id_cliente)'#10'   left outer join contac' +
-              'tos contactos2 on (contactos2.id = clientes_datos.id_agente)'#10'WHE' +
-              'RE V_FACTURAS_CLIENTE.ID = :ID'#10
+              'ETENCION,'#10'   '#10'   empresas.calle as empresa_calle, empresas.codig' +
+              'o_postal as empresa_codigo_postal,'#10'   empresas.poblacion as empr' +
+              'esa_poblacion, empresas.telefono_1 as empresa_telefono,'#10'   empre' +
+              'sas.fax as empresa_fax, empresas.email_1 as empresa_email, empre' +
+              'sas.registro_mercantil'#10'   '#10'from v_facturas_cliente'#10'   left outer' +
+              ' join contactos on (contactos.id = v_facturas_cliente.id_cliente' +
+              ')'#10'   left outer join formas_pago on (formas_pago.id = v_facturas' +
+              '_cliente.id_forma_pago)'#10'   left outer join clientes_datos on (cl' +
+              'ientes_datos.id_cliente = v_facturas_cliente.id_cliente)'#10'   left' +
+              ' outer join contactos contactos2 on (contactos2.id = clientes_da' +
+              'tos.id_agente)'#10'   left outer join empresas on (empresas.id = v_f' +
+              'acturas_cliente.id_empresa)'#10'   '#10'WHERE V_FACTURAS_CLIENTE.ID = :I' +
+              'D'#10
             StatementType = stSQL
             ColumnMappings = <
               item
@@ -190,6 +196,34 @@ object RptFacturasCliente: TRptFacturasCliente
               item
                 DatasetField = 'REF_VENDEDOR'
                 TableField = 'REF_VENDEDOR'
+              end
+              item
+                DatasetField = 'EMPRESA_CALLE'
+                TableField = 'EMPRESA_CALLE'
+              end
+              item
+                DatasetField = 'EMPRESA_CODIGO_POSTAL'
+                TableField = 'EMPRESA_CODIGO_POSTAL'
+              end
+              item
+                DatasetField = 'EMPRESA_POBLACION'
+                TableField = 'EMPRESA_POBLACION'
+              end
+              item
+                DatasetField = 'EMPRESA_TELEFONO'
+                TableField = 'EMPRESA_TELEFONO'
+              end
+              item
+                DatasetField = 'EMPRESA_FAX'
+                TableField = 'EMPRESA_FAX'
+              end
+              item
+                DatasetField = 'EMPRESA_EMAIL'
+                TableField = 'EMPRESA_EMAIL'
+              end
+              item
+                DatasetField = 'REGISTRO_MERCANTIL'
+                TableField = 'REGISTRO_MERCANTIL'
               end>
           end>
         Name = 'InformeFacturasCliente'
@@ -371,6 +405,41 @@ object RptFacturasCliente: TRptFacturasCliente
           item
             Name = 'IMPORTE_RETENCION'
             DataType = datCurrency
+          end
+          item
+            Name = 'EMPRESA_CALLE'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'EMPRESA_CODIGO_POSTAL'
+            DataType = datString
+            Size = 10
+          end
+          item
+            Name = 'EMPRESA_POBLACION'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'EMPRESA_TELEFONO'
+            DataType = datString
+            Size = 25
+          end
+          item
+            Name = 'EMPRESA_FAX'
+            DataType = datString
+            Size = 25
+          end
+          item
+            Name = 'EMPRESA_EMAIL'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'REGISTRO_MERCANTIL'
+            DataType = datString
+            Size = 255
           end>
         ReadOnly = True
       end
@@ -1601,7 +1670,7 @@ object RptFacturasCliente: TRptFacturasCliente
     PrintOptions.Printer = 'Por defecto'
     PrintOptions.PrintOnSheet = 0
     ReportOptions.CreateDate = 39065.872423495400000000
-    ReportOptions.LastChange = 40210.690281921300000000
+    ReportOptions.LastChange = 40210.707089826390000000
     ScriptLanguage = 'PascalScript'
     ShowProgress = False
     StoreInDFM = False
diff --git a/Source/Modulos/Presupuestos de cliente/Model/uBizPresupuestosCliente.pas b/Source/Modulos/Presupuestos de cliente/Model/uBizPresupuestosCliente.pas
index 4a8e212..eb3de96 100644
--- a/Source/Modulos/Presupuestos de cliente/Model/uBizPresupuestosCliente.pas	
+++ b/Source/Modulos/Presupuestos de cliente/Model/uBizPresupuestosCliente.pas	
@@ -250,7 +250,7 @@ begin
          DataTable.Edit;
 
       ID_CLIENTE := FCliente.ID;
-      if FCliente.ID_FORMA_PAGO > 0 then
+      if (ID_FORMA_PAGO = 0) and (FCliente.ID_FORMA_PAGO > 0) then
          ID_FORMA_PAGO := FCliente.ID_FORMA_PAGO;
       DESCUENTO := FCliente.DESCUENTO;