diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index 738a1010c..74ee485e1 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -604,7 +604,7 @@
                                     <b>Fecha de Cirugia:</b>
                                 </td>
                                 <td runat="server" id="TdFechaOS2" visible="true">
-                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CssClass="make-switchsd" CausesValidation="true" Style="width: 130px"></asp:TextBox>
+                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CausesValidation="true" CssClass="fechahora" style="width: 130px; line-height: 22px;"></asp:TextBox>
                                 </td>
                             </tr>
                             <tr runat="server" id="TrVentasMedicas3" visible="false">
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c78f926f4..1b9060add 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -24667,7 +24667,7 @@ Partial Class Ventas
 
                     'LOS PEDIDOS SE DEBE CANCELAR EN UN PROCESO DISTINTO
                     If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso ObjFacturaCancelacion.TipoDocto = "Ped" Then
-                        ChkDevAlm.Checked = False
+                        ChkDevAlm.Checked = True
                     End If
 
                     resp = ObjFacturaCancelacion.CancelarFactura(ChkDevAlm.Checked, ListaRemisionesCancelar, CveMotivoCancelacion:=DdlMotivoCancelacion.SelectedValue.ToEntero(), Motivo:=TxtMotivoCancelacion.Text.Trim(), CveEstadoCancelacion:=Me.CveEstadoCancelacion)