diff --git a/Bancos/PagoElectronicoGrupos.aspx b/Bancos/PagoElectronicoGrupos.aspx index ace3d67ef..2fa368e82 100644 --- a/Bancos/PagoElectronicoGrupos.aspx +++ b/Bancos/PagoElectronicoGrupos.aspx @@ -574,7 +574,7 @@ Prefijo Folio:
- +
@@ -606,7 +606,7 @@ - + @@ -928,17 +928,6 @@ } - function validaLongitudFolio(v) { - var TamanioS = String(v.value); - var Tamanio = TamanioS.lenght; - alert(Tamanio); - - if (Tamanio >= 14) { - alert("El folio especificado es demaciado grande"); - } - - } - diff --git a/Bancos/PagoElectronicoGrupos.aspx.vb b/Bancos/PagoElectronicoGrupos.aspx.vb index 64de00235..08c376bfb 100644 --- a/Bancos/PagoElectronicoGrupos.aspx.vb +++ b/Bancos/PagoElectronicoGrupos.aspx.vb @@ -630,7 +630,7 @@ Partial Class Bancos_PagoElectronicoGrupos e.Row.FCHyperLink("HLDetalle").NavigateUrl = String.Format("IE.aspx?CveIE={0}", e.Row.DBCampo("CveIE")) - If e.Row.DataKey("Estatus").ToEntero.contiene(2, 3) Then + If e.Row.DataKey("Estatus").ToEntero.Contiene(2, 3) Then e.Row.FCLinkButton("ImgUpload").Visible = False e.Row.FCLinkButton("LnkGvCancelar").Visible = False @@ -1029,7 +1029,7 @@ Partial Class Bancos_PagoElectronicoGrupos ' 'Llenamos en blanco datos de otros bancos ' 'Campos 8-17 del detalle --- 64 de otros bancos y 45 para FILLER --- Fecha de Alta - ' DetalleTexto &= String.Format("{0}{1}", Vacio.PadLeft(109), NowADS().ToString("yyyy-MM-dd")) + ' DetalleTexto &= String.Format("{0}{1}", Vacio.PadLeft(109), NowADS()().ToString("yyyy-MM-dd")) ' 'Otros Bancos NACIONAL!! @@ -1043,7 +1043,7 @@ Partial Class Bancos_PagoElectronicoGrupos ' 'Llenamos datos de otros bancos ' 'Campos 8- 17 del detalle --- 44 de otros bancos --- 20 de internacional --- 45 Filler -- Fecha de Alta - ' DetalleTexto &= String.Format("{0}40{1}{2}{3}{4}{5}", DTPendienteActual(0)("Abreviatura").ToString, DTPendienteActual(0)("CLABE").ToString.PadLeft(35, PadCeros), DTPendienteActual(0)("CLABE").ToString.Substring(0, 3).PadLeft(4, PadCeros), Vacio.PadRight(20), Vacio.PadRight(45), NowADS().ToString("yyyy-MM-dd")) + ' DetalleTexto &= String.Format("{0}40{1}{2}{3}{4}{5}", DTPendienteActual(0)("Abreviatura").ToString, DTPendienteActual(0)("CLABE").ToString.PadLeft(35, PadCeros), DTPendienteActual(0)("CLABE").ToString.Substring(0, 3).PadLeft(4, PadCeros), Vacio.PadRight(20), Vacio.PadRight(45), NowADS()().ToString("yyyy-MM-dd")) ' End If ' 'Llenamos datos de Tipo de Persona - Fisica o Moral @@ -1162,7 +1162,7 @@ Partial Class Bancos_PagoElectronicoGrupos Dim IdentificadoUsuario As String = UsuarioActual.Usuario.Replace(" ", "").Replace(".", "").Replace("@", "").Replace("/", "").ToUpper.Trim IdentificadoUsuario = If(IdentificadoUsuario.Length > 12, IdentificadoUsuario.Substring(0, 12), IdentificadoUsuario) - ' Dim Identificado As String = String.Format("{0}{1}", UsuarioActual.Usuario, NowADS().ToString("yyyyMMdd"))) + ' Dim Identificado As String = String.Format("{0}{1}", UsuarioActual.Usuario, NowADS()().ToString("yyyyMMdd"))) HeaderTexto &= String.Format("{0}{1}", IdentificadoUsuario, NowADS().ToString("yyyyMMdd")).PadRight(20) 'Campos #6-8 del Header @@ -2370,7 +2370,7 @@ Partial Class Bancos_PagoElectronicoGrupos Protected Sub BtnReportePago_Click(sender As Object, e As EventArgs) - + Dim Archivo As New System.IO.FileInfo(String.Format("{0}Formatos/LayoutAltaProveedor.rdlc", UsuarioActual.Empresa.Ruta)) Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")