diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb
index 594d3d247..9c0166f39 100644
--- a/App_Code/ClsVentas.vb
+++ b/App_Code/ClsVentas.vb
@@ -6932,6 +6932,78 @@ Public Class ClsVentas
 #End Region
 
 
+#Region "VENTAS MEDICAS COMISIONES ESPECIALES"
+
+    Public Function GetComisionesMedicasEsPeciales(CveMedico As Integer, CvePS As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_ComisionesMedicasEspecialesGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedico", SqlDbType.Int).Value = CveMedico
+            .Add("@CvePS", SqlDbType.Int).Value = CvePS
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener las comisiones especiales.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
+    Public Function AddComisionesMedicasEspeciales(CveMedico As Integer, CvePS As Integer, TipoComision As Integer, Comision As Decimal, CveUsuario As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_ComisionesMedicasEspecialesAdd")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedico", SqlDbType.Int).Value = CveMedico
+            .Add("@CvePS", SqlDbType.Int).Value = CvePS
+            .Add("@TipoComision", SqlDbType.Int).Value = TipoComision
+            .Add("@Comision", SqlDbType.Money).Value = Comision
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al agegar la comisión especial", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
+    Public Function RemoveComisionesMedicasEspeciales(CveMedicoComision As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_ComisionesMedicasEspecialesRemove")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedicoComision", SqlDbType.Int).Value = CveMedicoComision
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al eliminar la comision especial.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
+#End Region
+
 #Region "DEVOLUICON"
 
     Public Function UpdateVentasDetalleCantidadDevolucion(CveVentaDetalle As Integer, CantidadDevolucion As Decimal) As Boolean
diff --git a/Ventas/RepComisionesSMS.aspx b/Ventas/RepComisionesSMS.aspx
index 90ecbd1d1..06a549484 100644
--- a/Ventas/RepComisionesSMS.aspx
+++ b/Ventas/RepComisionesSMS.aspx
@@ -19,6 +19,9 @@
         <ContentTemplate>
             <li>
                 <asp:LinkButton runat="server" ID="LnkComisiones" OnClick="LnkComisiones_Click" data-toggle="tooltip" data-placement="left" title="Comisiones" Text="<i class='fa fa-money'></i> Comisiones"></asp:LinkButton>
+            </li>
+            <li>
+                <asp:LinkButton runat="server" ID="LnkComisionesEspeciales" OnClick="LnkComisionesEspeciales_Click" data-toggle="tooltip" data-placement="left" title="Comisiones" Text="<i class='fa fa-money'></i> Comisiones Especiales"></asp:LinkButton>
             </li>
               <li>
                  <asp:LinkButton ID="LnkExportar" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i>  Excel</asp:LinkButton>
@@ -280,6 +283,79 @@
          </asp:UpdatePanel>
      </div>
  </div>
+
+
+
+
+         <div id="DvModalComisionesEspeciales" class="modal ADS fade" role="dialog">
+     <div class="modal-dialog" style="width: 900px;">
+         <asp:UpdatePanel runat="server" class="modal-content" ID="UpdatePanel1" UpdateMode="Conditional">
+             <ContentTemplate>
+                 <div class="modal-header ">
+                     <button type="button" class="close" data-dismiss="modal">×</button>
+                     <h4 class="modal-title">
+                         <asp:Literal ID="Literal2" runat="server">Comisiones Especiales</asp:Literal></h4>
+                 </div>
+                 <div class="modal-body">
+
+                      <div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
+                         <input type="text" id="TxtBusquedaComicionesEspeciales" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaComiciones','{0}')", GvComisionesEspeciales.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                         <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaComicionesEspeciales','{0}')", GvComisionesEspeciales.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                     </div>
+                     <div class="row">
+                         <div class="col-md-12">
+
+
+                             <asp:GridView ID="GvComisionesEspeciales" runat="server" AutoGenerateColumns="False"
+                                 DataKeyNames="CveMedicoComision,CveMedico,CvePS,TipoComision,Comision,CveUsuario"
+                                 data-sort="true" 
+                                 EmptyDataText="No se encontraron Comisiones" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
+                                 <Columns>
+
+                                     <asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left">
+                                         <ItemTemplate>
+                                             <asp:Literal ID="LtlMedico" runat="server" Text='<%# Eval("Medico") %>'></asp:Literal>
+                                         </ItemTemplate>
+                                     </asp:TemplateField>
+                                     <asp:TemplateField HeaderText="Código/Producto" ItemStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            <asp:Literal ID="LtlCodigoPS" runat="server" Text='<%# Eval("CodigoPS") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:TemplateField HeaderText="TipoComision" ItemStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            <asp:Literal ID="LtlTipoComision" runat="server" Text='<%# Eval("TipoComisionStr") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>   
+                                     <asp:TemplateField HeaderText="Comision" ItemStyle-HorizontalAlign="Right">
+                                        <ItemTemplate>
+                                            <asp:Literal ID="LtlTipoComision" runat="server" Text='<%# Eval("Comision") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>   
+                                      <asp:TemplateField ItemStyle-HorizontalAlign="center" HeaderText="Opciones" ItemStyle-Width="60px">
+                                         <ItemTemplate>         
+                                             <asp:LinkButton ID="LnkEliminarComisionEspecial" OnClick="LnkEliminarComisionEspecial_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False" 
+                                                 CssClass="btn btn-circle btn-sm red" Text="<i title='Reasignar' class='icon-trash' title='Eliminar' ></i>" 
+                                                 data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
+                                         </ItemTemplate>
+                                     </asp:TemplateField>
+                                                                    
+
+                                 </Columns>
+                             </asp:GridView>
+ 
+
+                         </div>
+                     </div>                      
+                 </div>
+
+                 <div class="modal-footer">
+                     <button id="Button2" runat="server" type="button" class="btn default" data-dismiss="modal">Cerrar</button>
+                 </div>                    
+             </ContentTemplate>
+         </asp:UpdatePanel>
+     </div>
+ </div>
  
 
 </asp:Content>
diff --git a/Ventas/RepComisionesSMS.aspx.vb b/Ventas/RepComisionesSMS.aspx.vb
index ebee4433a..2e95951d9 100644
--- a/Ventas/RepComisionesSMS.aspx.vb
+++ b/Ventas/RepComisionesSMS.aspx.vb
@@ -248,4 +248,26 @@ Partial Class Ventas_RepComisionesSMS
         End If
 
     End Sub
+
+#Region "COMISIONES ESPECIALES"
+
+    Protected Sub LnkComisionesEspeciales_Click(sender As Object, e As EventArgs)
+
+        CargaComisionesEspeciales()
+        RegistraScript("$('#DvModalComisionesEspeciales').modal('show');")
+
+    End Sub
+
+    Private Sub CargaComisionesEspeciales()
+
+    End Sub
+
+    Protected Sub LnkEliminarComisionEspecial_Click(sender As Object, e As EventArgs)
+        Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
+    End Sub
+
+#End Region
+
+
+
 End Class