Imports System.Data

Partial Class includes_bill
    Inherits System.Web.UI.UserControl

    Private _webWS As New WebWS
    Private _commonFunctions As CommonFunctions = New CommonFunctions()
    Private _user As MembershipUser
    Private _userProfile As ProfileCommon

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If Request.QueryString("ShowPrintIcon") = "Yes" Then
            Me.FindControl("PrintIcon").Visible = True
            Me.FindControl("NoPrintIcon").Visible = False
        Else
            Me.FindControl("PrintIcon").Visible = False
            Me.FindControl("NoPrintIcon").Visible = True
        End If

        Dim _displayInvoice = False

        _user = Membership.GetUser()
        _userProfile = Profile.GetProfile(_user.UserName)

        Dim _storeId = _userProfile.StoreId

        Dim _startDate = Session("InvoiceStartDate")
        Dim _finishDate = Session("InvoiceFinishDate")
        Dim _invoiceDS As DataSet = _webWS.GetInvoiceByStoreIdAndDate(_storeId, _startDate, _finishDate)

        If _invoiceDS.Tables(0).Rows.Count > 0 Then ' invoice already exists and has been stored in PI_Invoices
            Dim _textLocation As String = _invoiceDS.Tables(0).Rows(0).Item("InvoiceLocation").ToString
            If System.IO.File.Exists(_textLocation) Then
                If _textLocation <> DBNull.Value.ToString() Then
                    InvoiceLabel.Text = System.IO.File.ReadAllText(_textLocation)
                End If
                _displayInvoice = True
            Else
                _displayInvoice = False
            End If


        Else ' invoice doesn't exist, generate temp. invoice

            '************************
            'don't show temp. invoice
            '************************

            _displayInvoice = False

        End If

        If _displayInvoice = True Then
            InvoiceDiv.Visible = True
            NoInvoiceDiv.Visible = False
        Else
            InvoiceDiv.Visible = False
            NoInvoiceDiv.Visible = True
            PeriodLabel.Text = " : " & _startDate & " - " & _finishDate
        End If

    End Sub

End Class