Option Explicit On
Option Strict On

Imports System.Data
Imports System.Linq
Imports Extensiones

Partial Class Bancos_OtrosIngresos
    Inherits ClsPaginas

    Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        If Not Page.IsPostBack Then
            CargaCuentas()
            CargaAcreedor()
            CargarTipoTransaccion()
        End If
    End Sub

    Private Sub CargaAcreedor()
        DdlProveedor.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
        DdlProveedor.DataBind()
    End Sub
    Private Sub CargaCuentas()
        'DdlCuenta.Items.Clear()

        DdlCuenta.DataSource = GlobalDTBancosCuentas(1)
        DdlCuenta.DataBind()
        DdlCuenta.Items.Insert(0, New ListItem("Seleccione", "-1"))
    End Sub
    Private Sub CargarTipoTransaccion()
        DdlTipoTransaccion.DataSource = GlobalDTTipoTransacciones
        DdlTipoTransaccion.DataBind()
    End Sub
End Class