Database

-- IF THE DATABASE EXISTS, DROP AND RE-CREATE IT
IF EXISTS (SELECT Name FROM master.dbo.sysdatabases WHERE name = N'Dashboard')
BEGIN
    ALTER DATABASE Dashboard SET SINGLE_USER WITH ROLLBACK IMMEDIATE
    DROP DATABASE Dashboard
END
CREATE DATABASE Dashboard

-- CREATE THE TABLES
GO
USE Dashboard
CREATE TABLE DashboardInfo
    (Id                 INT PRIMARY KEY NOT NULL,
     SiteId             INT NOT NULL,
     InstrumentId       INT NOT NULL,
     TowerLocation      INT NOT NULL)

Msg 3702, Level 16, State 3, Line 5
Cannot drop database "Dashboard" because it is currently in use.
Msg 1801, Level 16, State 3, Line 7
Database 'Dashboard' already exists. Choose a different database name.
Msg 2714, Level 16, State 6, Line 12
There is already an object named 'DashboardInfo' in the database.

An exception of type 'Microsoft.SqlServer.Dts.Pipeline.ReadWriteVariablesNotAvailableException' occurred in Microsoft.SqlServer.TxScript.dll but was not handled in user code

Additional information: The collection of variables locked for read and write access is not available outside of PostExecute.

public override void Input0_ProcessInputRow(Input0Buffer Row)
   {
       IDTSVariables100 vars = null;
       VariableDispenser.LockForRead("System::TaskName");
       VariableDispenser.GetVariables(out vars);
       string TaskName = vars["System::TaskName"].Value.ToString();
       vars.Unlock();

       var watcherDBConnectionString
    = "Data Source=" + Variables.TargetServer01.ToString() + ";Initial Catalog=" + Variables.WatcherDB.ToString() + ";" + Variables.Security.ToString();

       var ErrorLogStoredProcedure = ReadOnlyVariables["ErrorLogStoredProcedure"].Value.ToString();

       int PriorityToBeLogged = (int)Priority.Debug;

       Log(Variables.PackageName.ToString(), "", "", "ScriptMain", "Main", "Row.FileName : " + Row.FileName
                               + ", Row.File.Length : " + Row.File.Length.ToString(), "ABDUL"
                                   , Priority.LogicalError, PriorityToBeLogged, watcherDBConnectionString.ToString(), ErrorLogStoredProcedure.ToString());
   }

Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & m_path & "; Extended Properties=dBASE IV"
Const queryString As String = _
"SELECT " & _
"  h.FINVNO " & _
", h.FSONO " & _
", h.FCUSTNO " & _
", h.FCOMPANY " & _
", h.FSALESPN " & _
", h.FSHIPDATE " & _
", h.FPONO " & _
", h.FCSAMT " & _
", h.FTAXAMT1 " & _
", h.FBADDRCD " & _
", h.FSADDRCD " & _
", hbA.FCOMPANY " & _
", hbA.FADDR1 " & _
", hbA.FADDR2 " & _
", hbA.FCITY " & _
", hbA.FSTATE " & _
", hbA.FZIP " & _
" FROM ARINV01H.dbf h " & _
" LEFT JOIN ARADD01H.dbf hbA ON (h.FINVNO = hbA.FINVNO) " & _
" LEFT JOIN ARCUS01.dbf hsA ON (h.FCUSTNO = hsA.FCUSTNO) " & _
" WHERE " & _
" h.FSALESPN = @FSALESPN " & _
" AND " & _
" h.FSHIPDATE >= @startDate AND h.FSHIPDATE <= @stopDate " & _
"UNION ALL " & _
"SELECT " & _
"  v.FINVNO " & _
", v.FSONO " & _
", v.FCUSTNO " & _
", v.FCOMPANY " & _
", v.FSALESPN " & _
", v.FSHIPDATE " & _
", v.FPONO " & _
", v.FCSAMT " & _
", v.FTAXAMT1 " & _
", v.FBADDRCD " & _
", v.FSADDRCD " & _
", vbA.FCOMPANY " & _
", vbA.FADDR1 " & _
", vbA.FADDR2 " & _
", vbA.FCITY " & _
", vbA.FSTATE " & _
", vbA.FZIP " & _
" FROM ARINV01.dbf v " & _
" RIGHT JOIN ARADD01.dbf vbA ON (v.FINVNO = vbA.FINVNO) " & _
" RIGHT JOIN ARCUS01.dbf vsA ON (v.FCUSTNO = vsA.FCUSTNO) " & _
" WHERE " & _
" v.FSALESPN = @FSALESPN " & _
" AND " & _
" v.FSHIPDATE >= @startDate AND v.FSHIPDATE <= @stopDate "

 // Build a list of cart items
 if (context.SHOPPING_CART.Any(m => m.customer_accountName == aN))
     sCs = context.SHOPPING_CART.Where(m => m.customer_ID == cID).ToList();
 if (sCs != null)
 {
     orderTotal = sCs.Sum(m => m.item_Price_Value * m.item_Qty);
     orderCost = sCs.Sum(m => m.item_Cost_Value * m.item_Qty);
     orderProfit = orderTotal - orderCost;
     orderWeight = "was hoping for quick method here"

}