From 6a746873a5ae7c7dc47fefe8d5012648cf2c2a0b Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 13 Mar 2025 07:39:27 -0700
Subject: [PATCH] =?UTF-8?q?--=20longitud=201000=20en=20descripci=C3=B3n=20?=
 =?UTF-8?q?--=20si=20es=20cancelaci=C3=B3n=20de=20oc=20con=20presupuestos,?=
 =?UTF-8?q?=20menor=20al=202025,=20que=20no=20genre=20la=20p=C3=B3liza?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 OC/OC.aspx    | 4 ++--
 OC/OC.aspx.vb | 4 ++++
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/OC/OC.aspx b/OC/OC.aspx
index 1dab0f016..2cc5f7670 100644
--- a/OC/OC.aspx
+++ b/OC/OC.aspx
@@ -256,7 +256,7 @@
                                 <div class="row" style="padding-bottom: 0.6em;">
                                     <label class="col-md-2">Descripción:</label>
                                     <div class="col-md-10">
-                                        <asp:TextBox ID="TxtDescrip" CssClass="form-control input-sm" runat="server" Width="95%" ValidationGroup="GrpGuardar" />
+                                        <asp:TextBox ID="TxtDescrip" CssClass="form-control input-sm" runat="server" Width="95%" ValidationGroup="GrpGuardar" MaxLength="1000" />
                                         <asp:RequiredFieldValidator ID="RFVDescrip" runat="server" ControlToValidate="TxtDescrip" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                         <ajax:ValidatorCalloutExtender ID="VCEDescrip" runat="server" Enabled="True" HighlightCssClass="vco" TargetControlID="RFVDescrip" Width="300px"></ajax:ValidatorCalloutExtender>
                                     </div>
@@ -265,7 +265,7 @@
                                 <div class="row" style="padding-bottom: 0.6em;">
                                     <label class="col-md-2">Justificación:</label>
                                     <div class="col-md-10">
-                                        <asp:TextBox ID="TxtJustificacion" CssClass="form-control input-sm" runat="server" Style="width: 95%; height: 40px;" ValidationGroup="GrpGuardar" TextMode="MultiLine" Rows="5" />
+                                        <asp:TextBox ID="TxtJustificacion" CssClass="form-control input-sm" runat="server" Style="width: 95%; height: 40px;" ValidationGroup="GrpGuardar" TextMode="MultiLine" Rows="5"  MaxLength="1000" />
                                         <asp:RequiredFieldValidator ID="RFVJustif" runat="server" ControlToValidate="TxtJustificacion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Justificación''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                         <ajax:ValidatorCalloutExtender ID="VCEJustificacion" runat="server" Enabled="True" HighlightCssClass="vco" TargetControlID="RFVJustif" Width="300px">
                                         </ajax:ValidatorCalloutExtender>
diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb
index 12d5cb61f..d87a772b8 100644
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -9484,6 +9484,10 @@ Partial Class OC_OC
                 Return False
             End If
 
+            If EsCancelacion AndAlso TxtFecha.Text.ToDate < "2025/01/01".ToDate Then 'si es cancelación, anterior al 2025, que no lo registre
+                Return True
+            End If
+
             Dim ObjConta As New ClsContabilidad(transaccion)
 
             Dim CvePrePolizaPresupuesto = ObjConta.AddPrePolizas("OC/OC-(Presupuesto)", 53, LblTotal.Text.ToDecimal, LblTotal.Text.ToDecimal, DdlMoneda.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlProveedores.SelectedText, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)