AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Documentos correcion descarga de documentos al hacer postback tras mostrar moadl de subida, cuentas bancarias restriccion de 18 caracteres exactos

Browse Source
This commit is contained in:
rakcsle
2021-06-02 14:23:40 -07:00
parent eb73efd465
commit 1d3ea6d291
2 changed files with 27 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Bancos/CuentasBancariasDetalle.aspx
View File

@@ -61,6 +61,8 @@
<td>CLABE:</td> <td>CLABE:</td>
<td> <td>
<asp:TextBox ID="TxtCLABE" runat="server" MaxLength="18" Width="200px"></asp:TextBox></td> <asp:TextBox ID="TxtCLABE" runat="server" MaxLength="18" Width="200px"></asp:TextBox></td>
<asp:RegularExpressionValidator runat="server" id="REVTxtCLABE" controltovalidate="TxtCLABE" validationexpression="^\s*(?:[0-9]{18})\s*$" errormessage="La CLABE debe de tener una longitud de 18 caracteres" ValidationGroup="GrpGuardar" />
<ajax:ValidatorCalloutExtender ID="CVETxtCLABE" runat="server" HighlightCssClass="vco" TargetControlID="REVTxtCLABE" Width="300px"></ajax:ValidatorCalloutExtender>
</tr> </tr>
<tr> <tr>

24
Ventas/Clientes.aspx.vb
View File

@@ -6827,9 +6827,11 @@ Partial Class Clientes
'UpGvDocumentosFirma2.Update() 'UpGvDocumentosFirma2.Update()
End Sub End Sub
Public Sub UploadModal_ClickDocumentacionFirmaContrato(sender As Object, e As EventArgs) Public Sub UploadModal_ClickDocumentacionFirmaContrato(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim chkEstatus As CheckBox Dim chkEstatus As CheckBox
CveDocumentacionElectronica = GvRow.DataKey("CveDocumentacionElectronica").ToString().ToEntero() CveDocumentacionElectronica = GvRow.DataKey("CveDocumentacionElectronica").ToString().ToEntero()
CveDocumentacion = GvRow.DataKey("CveDocumentacion").ToString().ToEntero() CveDocumentacion = GvRow.DataKey("CveDocumentacion").ToString().ToEntero()
Documentacion = GvRow.DataKey("Documentacion") Documentacion = GvRow.DataKey("Documentacion")
@@ -6849,7 +6851,29 @@ Partial Class Clientes
UpTituloFirma.Update() UpTituloFirma.Update()
RegistraScript("$('#ModalUploadFirmaContratoDocumento').modal({ backdrop: 'static', keyboard: false});") RegistraScript("$('#ModalUploadFirmaContratoDocumento').modal({ backdrop: 'static', keyboard: false});")
GvdocumentosEventosDescarga()
End Sub End Sub
Private Sub GvdocumentosEventosDescarga()
For Each GvRow As GridViewRow In GvDocumentosCliente.Rows
If GvRow.RowType = DataControlRowType.DataRow Then
Dim LnkDownLoadDoc As LinkButton = GvRow.FCLinkButton("LnkDownLoadDoc")
Dim ImgDownLoadFormato As LinkButton = GvRow.FCLinkButton("ImgDownLoadFormato")
ScriptManager.GetCurrent(Me).RegisterPostBackControl(ImgDownLoadFormato)
ScriptManager.GetCurrent(Me).RegisterPostBackControl(LnkDownLoadDoc)
End If
Next
End Sub
Private Sub GuardarDocumentosClientes(Optional _CveDocumentacionExcluir As Integer = -1) Private Sub GuardarDocumentosClientes(Optional _CveDocumentacionExcluir As Integer = -1)
Dim hasError As Boolean = True Dim hasError As Boolean = True