Imports AppCommon
Imports AppVariable

Partial Class Student_TimeTablePrint
    Inherits System.Web.UI.Page

#Region "******************** ページイベント ********************"

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        '----------------------------------------------------------------
        '認証済の確認
        '----------------------------------------------------------------
        If Session(S_COM_PortalID) Is Nothing Then
            Response.Redirect(Request.ApplicationPath & Logout_FilePath)
        End If

        'ファビコン
        SetTagFavicon(Page.FindControl("page_header"))

        '氏名、表示日時をセット
        lb_氏名.Text = "学籍番号/氏名: " & Session(S_COM_UserCD) & "/" & Session(S_COM_User_Name)
        lb_日時.Text = "日時: " & Now
    End Sub

#End Region

#Region "***************** コントロールイベント *****************"

    Protected Sub sql_登録期_Init(sender As Object, e As EventArgs) Handles sql_登録期.Init
        sql_登録期_select()
    End Sub

    Protected Sub gv_登録期_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles gv_登録期.RowDataBound
        If e.Row.RowType = DataControlRowType.DataRow Then
            '時間割データをバインド
            Dim uc As uc_TimeTable = CType(e.Row.FindControl("uc_TimeTable"), uc_TimeTable)
            uc.Kikan = CType(e.Row.FindControl("lb_登録期"), Label).Text
            uc.DataBind_時間割内()
            uc.DataBind_時間割外()
        End If
    End Sub

#End Region

#Region "******************* Sub及びFunction ********************"

    Private Sub sql_登録期_select()
        Dim sds As SqlDataSource = sql_登録期
        WebControlsUtil.DeclareSP(sds, "時間割_履修期間_SELECT")
    End Sub

#End Region

End Class
