Here is full Query, it runs, no errors and compiles, however, nothing shows up in grid, but if I run is straight from BAQ the date I put in there will work just fine and return rows. So I assume its gotta be somewhere below while making the grid.
Private Sub btnRefresh_Click(ByVal Sender As Object, ByVal Args As System.EventArgs) Handles btnRefresh.Click
'// ** Place Event Handling Code Here **
Dim dynQry As DynamicQueryImpl
dynQry = WCFServiceSupport.CreateImpl(Of Ice.Proxy.BO.DynamicQueryImpl)(DirectCast(oTrans.Session, Session), Epicor.ServiceModel.Channels.ImplBase(Of Ice.Contracts.DynamicQuerySvcContract).UriPath)
Dim dsDQ As New Ice.BO.DynamicQueryDataSet()
Dim dsEx as New Ice.BO.QueryExecutionDataSet()
Dim ds2 As System.Data.DataSet
Dim RetRows() as datarow
Dim Rework as boolean
dsDQ = dynQry.GetByID("JBIS-JobPerformance1")
dsDQ.QueryWhereItem(0).RValue = "JBIS"
dsDQ.QueryWhereItem(1).RValue = 1
dsDQ.QueryWhereItem(2).RValue = CDate(dteStartDate.Text).ToString("yyyyMMdd") 'this will format a date from 09/01/2014 to 20140901
dsDQ.QueryWhereItem(3).RValue = CDate(dteEndDate.Text).ToString("yyyyMMdd") 'this will format a date from 09/01/2014 to 20140901
dsDQ.AcceptChanges()
ds2 = dynQry.Execute(dsDQ, dsEx)
Dim JobNum As String = ""
Dim dtJobData As New System.Data.DataTable
dtJobData.TableName = "JobData"
dtJobData.Columns.Add("JobNum", System.Type.GetType("System.String"))
dtJobData.Columns.Add("PartNum", System.Type.GetType("System.String"))
dtJobData.Columns.Add("ProdQty", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("QtyCompleted", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("JobCompletionDate", System.Type.GetType("System.DateTime"))
dtJobData.Columns.Add("MtlAct", System.Type.GetType("System.String"))
dtJobData.Columns.Add("MtlEst", System.Type.GetType("System.String"))
dtJobData.Columns.Add("Scrap", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("UnitCostAct", System.Type.GetType("System.String"))
dtJobData.Columns.Add("UnitCostEst", System.Type.GetType("System.String"))
dtJobData.Columns.Add("Op10Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op10Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op10SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op10SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op20Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op20Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op20SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op20SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op30Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op30Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op30SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op30SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op40Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op40Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op40SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op40SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op50Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op50Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op50SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op50SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op60Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op60Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op60SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op60SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op70Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op70Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op70SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op70SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op80Act", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op80Est", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op80SuAct", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Op80SuEst", System.Type.GetType("System.Decimal"))
dtJobData.Columns.Add("Rework", System.Type.GetType("System.Boolean"))
Dim dt1 As System.Data.DataTable
dt1 = ds2.Tables(0)
Dim dt2 As System.Data.DataTable = ds2.Tables(0).DefaultView.ToTable("JobHead", True, "JobHead_JobNum")
For Each dr2 As DataRow In dt2.Rows
JobNum = dr2(0).ToString
Dim PartNum As String = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item(1).ToString
Dim CompletionDate As Date = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item(2).ToString
Dim ProdQty As Decimal = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item(3).ToString
Dim QtyCompleted As Decimal = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item(4).ToString
Dim MatAct As Object = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item("MatAct")
Dim MtlEst As Object = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item("MtlEst")
Dim Op10Act As Object = dt1.Compute("Sum(Op10Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op10Est As Object = dt1.Compute("Sum(Op10Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op10SuAct As Object = dt1.Compute("Sum(Op10SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op10SuEst As Object = dt1.Compute("Sum(Op10SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op20Act As Object = dt1.Compute("Sum(Op20Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op20Est As Object = dt1.Compute("Sum(Op20Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op20SuAct As Object = dt1.Compute("Sum(Op20SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op20SuEst As Object = dt1.Compute("Sum(Op20SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op30Act As Object = dt1.Compute("Sum(Op30Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op30Est As Object = dt1.Compute("Sum(Op30Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op30SuAct As Object = dt1.Compute("Sum(Op30SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op30SuEst As Object = dt1.Compute("Sum(Op30SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op40Act As Object = dt1.Compute("Sum(Op40Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op40Est As Object = dt1.Compute("Sum(Op40Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op40SuAct As Object = dt1.Compute("Sum(Op40SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op40SuEst As Object = dt1.Compute("Sum(Op40SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op50Act As Object = dt1.Compute("Sum(Op50Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op50Est As Object = dt1.Compute("Sum(Op50Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op50SuAct As Object = dt1.Compute("Sum(Op50SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op50SuEst As Object = dt1.Compute("Sum(Op50SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op60Act As Object = dt1.Compute("Sum(Op60Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op60Est As Object = dt1.Compute("Sum(Op60Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op60SuAct As Object = dt1.Compute("Sum(Op60SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op60SuEst As Object = dt1.Compute("Sum(Op60SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op70Act As Object = dt1.Compute("Sum(Op70Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op70Est As Object = dt1.Compute("Sum(Op70Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op70SuAct As Object = dt1.Compute("Sum(Op70SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op70SuEst As Object = dt1.Compute("Sum(Op70SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op80Act As Object = dt1.Compute("Sum(Op80Act)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op80Est As Object = dt1.Compute("Sum(Op80Est)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op80SuAct As Object = dt1.Compute("Sum(Op80SuAct)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim Op80SuEst As Object = dt1.Compute("Sum(Op80SuEst)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim UnitCostAct2 As Object = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item("UnitCostAct2")
Dim UnitCostEst2 As Object = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))(0).Item("UnitCostEst2")
RetRows = ds2.Tables(0).Select(String.Format("JobHead_JobNum='{0}'", JobNum))
If RetRows(0)("JobHead_Checkbox01") is System.DBNull.value then
Rework = False
else
Rework = RetRows(0)("JobHead_Checkbox01")
end if
Dim Scrap As Object = dt1.Compute("Sum(Scrap)", String.Format("JobHead_JobNum='{0}'", JobNum))
Dim jdRow As DataRow = dtJobData.NewRow()
jdRow("JobCompletionDate") = CompletionDate
jdRow("JobNum") = JobNum
jdRow("PartNum") = PartNum
jdRow("ProdQty") = ProdQty
jdRow("QtyCompleted") = QtyCompleted
jdRow("MtlAct") = string.format("{0:C}", MatAct)
jdRow("MtlEst") = string.format("{0:C}", MtlEst)
jdRow("Op10Act") = Op10Act
jdRow("Op10Est") = Op10Est
jdRow("Op10SuAct") = Op10SuAct
jdRow("Op10SuEst") = Op10SuEst
jdRow("Op20Act") = Op20Act
jdRow("Op20Est") = Op20Est
jdRow("Op20SuAct") = Op20SuAct
jdRow("Op20SuEst") = Op20SuEst
jdRow("Op30Act") = Op30Act
jdRow("Op30Est") = Op30Est
jdRow("Op30SuAct") = Op30SuAct
jdRow("Op30SuEst") = Op30SuEst
jdRow("Op40Act") = Op40Act
jdRow("Op40Est") = Op40Est
jdRow("Op40SuAct") = Op40SuAct
jdRow("Op40SuEst") = Op40SuEst
jdRow("Op50Act") = Op50Act
jdRow("Op50Est") = Op50Est
jdRow("Op50SuAct") = Op50SuAct
jdRow("Op50SuEst") = Op50SuEst
jdRow("Op60Act") = Op60Act
jdRow("Op60Est") = Op60Est
jdRow("Op60SuAct") = Op60SuAct
jdRow("Op60SuEst") = Op60SuEst
jdRow("Op70Act") = Op70Act
jdRow("Op70Est") = Op70Est
jdRow("Op70SuAct") = Op70SuAct
jdRow("Op70SuEst") = Op70SuEst
jdRow("Op80Act") = Op80Act
jdRow("Op80Est") = Op80Est
jdRow("Op80SuAct") = Op80SuAct
jdRow("Op80SuEst") = Op80SuEst
jdRow("Scrap") = Scrap
jdRow("UnitCostAct") = string.format("{0:C}", UnitCostAct2)
jdRow("UnitCostEst") = string.format("{0:C}", UnitCostEst2)
jdRow("Rework") = Rework
dtJobData.Rows.Add(jdRow)
Next
eugJobData.DataSource = dtJobData
End Sub