diff --git a/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm b/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm
index c3ecf52b..c927c460 100644
--- a/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm	
+++ b/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm	
@@ -152,6 +152,14 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
               item
                 DatasetField = 'ID_DIRECCION'
                 TableField = 'ID_DIRECCION'
+              end
+              item
+                DatasetField = 'DESCRIPCION_BONIFICACION'
+                TableField = 'DESCRIPCION_BONIFICACION'
+              end
+              item
+                DatasetField = 'IMPORTE_BONIFICACION'
+                TableField = 'IMPORTE_BONIFICACION'
               end>
           end>
         Name = 'PresupuestosCliente'
@@ -332,6 +340,16 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
             DataType = datString
             Size = 255
             DictionaryEntry = 'PresupuestosCliente_PERSONA_CONTACTO'
+          end
+          item
+            Name = 'DESCRIPCION_BONIFICACION'
+            DataType = datString
+            Size = 255
+          end
+          item
+            Name = 'IMPORTE_BONIFICACION'
+            DataType = datCurrency
+            ServerAutoRefresh = True
           end>
       end
       item
@@ -626,6 +644,14 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
           item
             Name = 'PERSONA_CONTACTO'
             Value = ''
+          end
+          item
+            Name = 'DESCRIPCION_BONIFICACION'
+            Value = ''
+          end
+          item
+            Name = 'IMPORTE_BONIFICACION'
+            Value = ''
           end>
         Statements = <
           item
@@ -640,14 +666,16 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
               'IDENCIAS_ACTIVAS, FECHA_ALTA,'#10'     USUARIO, IMPORTE_NETO, IMPORT' +
               'E_PORTE, DESCUENTO, IMPORTE_DESCUENTO, '#10'     BASE_IMPONIBLE, IVA' +
               ', IMPORTE_IVA, IMPORTE_TOTAL, ID_FORMA_PAGO, ID_FACTURA,'#10'     PE' +
-              'RSONA_CONTACTO)'#10'  VALUES'#10'    (:ID, :ID_EMPRESA, :FECHA_PRESUPUES' +
-              'TO, :FECHA_DECISION, :REFERENCIA,'#10'     :REFERENCIA_AUX, :SITUACI' +
-              'ON, :ID_CLIENTE, :ID_DIRECCION, :REFERENCIA_CLIENTE,'#10'     :CLIEN' +
-              'TE_FINAL, :PORTADA, :MEMORIA, :OBSERVACIONES, '#10'     :INCIDENCIAS' +
-              ', :INCIDENCIAS_ACTIVAS, CURRENT_TIMESTAMP,'#10'     :USUARIO, :IMPOR' +
-              'TE_NETO, :IMPORTE_PORTE, :DESCUENTO, '#10'     :IMPORTE_DESCUENTO, :' +
-              'BASE_IMPONIBLE, :IVA, :IMPORTE_IVA, '#10'     :IMPORTE_TOTAL, :ID_FO' +
-              'RMA_PAGO, :ID_FACTURA, :PERSONA_CONTACTO)'#10
+              'RSONA_CONTACTO, DESCRIPCION_BONIFICACION, IMPORTE_BONIFICACION)'#10 +
+              '  VALUES'#10'    (:ID, :ID_EMPRESA, :FECHA_PRESUPUESTO, :FECHA_DECIS' +
+              'ION, :REFERENCIA,'#10'     :REFERENCIA_AUX, :SITUACION, :ID_CLIENTE,' +
+              ' :ID_DIRECCION, :REFERENCIA_CLIENTE,'#10'     :CLIENTE_FINAL, :PORTA' +
+              'DA, :MEMORIA, :OBSERVACIONES, '#10'     :INCIDENCIAS, :INCIDENCIAS_A' +
+              'CTIVAS, CURRENT_TIMESTAMP,'#10'     :USUARIO, :IMPORTE_NETO, :IMPORT' +
+              'E_PORTE, :DESCUENTO, '#10'     :IMPORTE_DESCUENTO, :BASE_IMPONIBLE, ' +
+              ':IVA, :IMPORTE_IVA, '#10'     :IMPORTE_TOTAL, :ID_FORMA_PAGO, :ID_FA' +
+              'CTURA, :PERSONA_CONTACTO,'#10'     :DESCRIPCION_BONIFICACION, :IMPOR' +
+              'TE_BONIFICACION)'#10
             StatementType = stSQL
             ColumnMappings = <>
           end>
@@ -787,6 +815,14 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
             Name = 'PERSONA_CONTACTO'
             Value = ''
           end
+          item
+            Name = 'DESCRIPCION_BONIFICACION'
+            Value = ''
+          end
+          item
+            Name = 'IMPORTE_BONIFICACION'
+            Value = ''
+          end
           item
             Name = 'OLD_ID'
             Value = ''
@@ -813,7 +849,9 @@ object srvPresupuestosCliente: TsrvPresupuestosCliente
               #10'    IVA = :IVA, '#10'    IMPORTE_IVA = :IMPORTE_IVA, '#10'    IMPORTE_T' +
               'OTAL = :IMPORTE_TOTAL, '#10'    ID_FORMA_PAGO = :ID_FORMA_PAGO,'#10'    ' +
               'ID_FACTURA = :ID_FACTURA,'#10'    PERSONA_CONTACTO = :PERSONA_CONTAC' +
-              'TO'#10'  WHERE'#10'    (ID = :OLD_ID)'#10
+              'TO,'#10'    DESCRIPCION_BONIFICACION = :DESCRIPCION_BONIFICACION,'#10'  ' +
+              '  IMPORTE_BONIFICACION = :IMPORTE_BONIFICACION'#10'  WHERE'#10'    (ID =' +
+              ' :OLD_ID)'#10
             StatementType = stSQL
             ColumnMappings = <>
           end>