This commit is contained in:
2023-11-29 10:51:17 -07:00
parent 79fc8be245
commit 67b74818db
2 changed files with 14 additions and 13 deletions

View File

@@ -56,7 +56,7 @@
<tr id="TrCuentaDestino" runat="server"> <tr id="TrCuentaDestino" runat="server">
<td>Cuenta Destino:</td> <td>Cuenta Destino:</td>
<td> <td>
<asp:DropDownList ID="DdlCuentaDestino" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="400px" ValidationGroup="GrpGuardar"> <asp:DropDownList ID="DdlCuentaDestino" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="400px" ValidationGroup="GrpGuardar" AutoPostBack="true">
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVCuentaDestino" runat="server" ControlToValidate="DdlCuentaDestino" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta Destino''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVCuentaDestino" runat="server" ControlToValidate="DdlCuentaDestino" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta Destino''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCOCuentaDestino" runat="server" HighlightCssClass="vco" TargetControlID="RFVCuentaDestino" Width="300px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCOCuentaDestino" runat="server" HighlightCssClass="vco" TargetControlID="RFVCuentaDestino" Width="300px"></ajax:ValidatorCalloutExtender>

View File

@@ -56,6 +56,7 @@ Partial Class Bancos_Transferencias
End If End If
DtCuentas = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa) DtCuentas = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa)
TxtFechaDocumento.Text = NowADS().ToShortDateString
If Opcion = 1 Then If Opcion = 1 Then
LtlTitulo.Text = "Domicializaci<EFBFBD>n de tarjeta" LtlTitulo.Text = "Domicializaci<EFBFBD>n de tarjeta"
@@ -73,7 +74,7 @@ Partial Class Bancos_Transferencias
CargaFolio(DdlCuentaOrigen.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero) CargaFolio(DdlCuentaOrigen.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero)
End If End If
TxtFechaDocumento.Text = NowADS().ToShortDateString
DdlTipoMovto_SelectedIndexChanged(Nothing, Nothing) DdlTipoMovto_SelectedIndexChanged(Nothing, Nothing)
@@ -156,9 +157,9 @@ Partial Class Bancos_Transferencias
End Sub End Sub
'Protected Sub DdlCuentaDestino_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlCuentaDestino.SelectedIndexChanged Protected Sub DdlCuentaDestino_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlCuentaDestino.SelectedIndexChanged
' VerificaMonedas() VerificaMonedas()
'If Opcion = 1 Then 'If Opcion = 1 Then
' CargaFolio(DdlCuentaDestino.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero) ' CargaFolio(DdlCuentaDestino.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero)
@@ -171,7 +172,7 @@ Partial Class Bancos_Transferencias
'End If 'End If
'End Sub End Sub
Private Sub CargaGridTarjetas() Private Sub CargaGridTarjetas()
Dim ObjCreditos As New ClsBancos Dim ObjCreditos As New ClsBancos