diff --git a/Bancos/RepComplementoPago.aspx.vb b/Bancos/RepComplementoPago.aspx.vb index 603e2c53b..92e996f75 100644 --- a/Bancos/RepComplementoPago.aspx.vb +++ b/Bancos/RepComplementoPago.aspx.vb @@ -218,6 +218,7 @@ Partial Class Bancos_RepComplementoPago e.Row.ForeColor = Drawing.Color.Red e.Row.FCCheckBox("Chk").Enabled = False e.Row.FCCheckBox("Chk").ToolTip = Mensaje + e.Row.Attributes.Add("title", Mensaje) End If Else @@ -341,57 +342,58 @@ Partial Class Bancos_RepComplementoPago ' no tiene restricciones Case "2" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(11, 18) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 11 o 18 caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 11, 15, 16, 18, 50)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If Case "3" - If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(10, 16, 18) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(10, 16, 18) Then + + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 18)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10 o 18 caracteres." End If Case "4" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(16) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 16 caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 11, 15, 16, 18, 50)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If Case "5" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(10, 11, 15, 16, 18, 50) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 11, 15, 16, 18, 50)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If Case "6" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(10) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 10 caracteres." End If CuentaBeneficiario = "" Case "28" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(16) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 16 caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 11, 15, 16, 18, 50)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If Case "29" If CuentaPago <> "" AndAlso Not CuentaPago.Length.Contiene(15, 16) Then - Mensaje = "La cuenta ordenante no cumple con el formato esperado." + Mensaje = "La cuenta ordenante no cumple con el formato esperado. El tamaño debe de ser de 15 o 16 caracteres." End If If CuentaBeneficiario <> "" AndAlso Not (CuentaBeneficiario.Length.Contiene(10, 11, 15, 16, 18, 50)) Then - Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado." + Mensaje = $"{Mensaje} La Cuenta Beneficiario no cumple con el formato esperado. El tamaño debe de ser de 10, 11, 15, 16, 18 o 50 caracteres." End If Case Else Mensaje = "Forma de Pago no valida, no tiene una forma de pago SAT" diff --git a/Empresas/119/Formatos/RepIVAAcreditable.rpt b/Empresas/119/Formatos/RepIVAAcreditable.rpt index 1a6a8b78b..384b35d05 100644 Binary files a/Empresas/119/Formatos/RepIVAAcreditable.rpt and b/Empresas/119/Formatos/RepIVAAcreditable.rpt differ diff --git a/RH/Personal.aspx b/RH/Personal.aspx index 1458c87e2..ef377158b 100644 --- a/RH/Personal.aspx +++ b/RH/Personal.aspx @@ -398,7 +398,7 @@
- +