Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        
        If FileUpload1.HasFile Then
            Try
                ' alter path for your project
                FileUpload1.SaveAs(Server.MapPath("~/ExcelImport.xls"))
                Label1.Text = "Upload File Name: " & _
                     FileUpload1.PostedFile.FileName

CREATE OR REPLACE PROCEDURE thqvb_TEST(g_plazano VARCHAR2,g_oprdate VARCHAR2) IS
BEGIN
DECLARE

thq_oprdate  date;
thq_plazano  varchar2(3);
thq_reconcilecode varchar2(3);
thq_badgeno    number(5);
thq_bagno number(4);
thq_jobno number(2);
thq_laneno varchar2(3);
thq_badgename   varchar2(25);
thq_totdeclareamount  number(10,2);
thq_tottranamount  number

Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.OracleClient
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Globalization
Partial Class plaza_dailyDeclareExcessShort
    Inherits System.Web.UI.Page
    Private Report1 As ReportDocument
    Private OraCon2 As New OracleConnection(ConfigurationManager.AppSettings("OraCon2"))

Protected Sub btnClass1Rev_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnClass1Rev.Click

        conn.Open()

        da = New OracleDataAdapter("Select distinct hqcs_plazano from hq_plazasetup HQ_ENTRY where " & _
                  "hqcs_plazatype = 'ENTRY' or hqcs_plazatype = 'EXIT' or hqcs_plazatype = 'MIXED' or hqcs_plazatype = 'OPEN' order by hqcs_plazano asc",