Oooops I forgot to remove custom tables
This should be working by now
//--- Report Summary --- //
Begin ReportSummary
ReportType = reporttypeOrders
ReportTitle = "Sell Thru (Qty) with Parity"
PageOrientation = pageorientationLandscape
WordWrap = False
ShowDateTimePicker = True
OutLineMode = True
Groups = 1
GroupDescription = ""
DisplayLogo = True
LogoFileName = "MyLogo.bmp"
ProcedureCall = ""
PreQuery1 = ""
PreQuery2 = ""
TablesQueried = <BEGIN>
FROM ( SELECT ID WorksheetID ,
Status WorksheetStatus ,
CAST(EffectiveDate AS DATE) EffectiveDate
FROM dbo.Worksheet WITH ( NOLOCK )
WHERE Status >= 2
) tblw
INNER JOIN ( SELECT WorksheetID ,
PONumber ,
SupplierID ,
Terms ,
CAST(DateCreated AS DATE) DateCreated ,
CAST(RequiredDate AS DATE) RequiredDate ,
CAST(DATEADD(DAY, 7, RequiredDate) AS DATE) CancellationDate
FROM dbo.WorksheetHeader_PurchaseOrder WITH ( NOLOCK )
) tblheader ON tblheader.WorksheetID = tblw.WorksheetID
INNER JOIN dbo.WorksheetStore ws WITH ( NOLOCK ) ON ws.WorksheetID = tblw.WorksheetID
INNER JOIN ( SELECT ID ,
SupplierName
FROM dbo.Supplier WITH ( NOLOCK )
) Supplier ON Supplier.ID = tblheader.SupplierID
INNER JOIN ( SELECT WorksheetID ,
ItemID ,
QuantityOrdered
FROM dbo.Worksheet_PurchaseOrder WITH ( NOLOCK )
) tblwp ON tblw.WorksheetID = tblwp.WorksheetID
LEFT JOIN ( SELECT ID ,
ItemLookupCode ,
DepartmentID ,
CategoryID ,
Cost ,
Price ,
SubDescription1 SubCategory ,
SubDescription3 StockNo ,
Description
FROM dbo.Item WITH ( NOLOCK )
) tblitem ON tblitem.ID = tblwp.ItemID
INNER JOIN dbo.Department ON dbo.Department.ID = tblitem.DepartmentID
LEFT JOIN ( SELECT po.StoreID ,
po.WorksheetID ,
po.PONumber ,
po.Status ,
po.LastUpdated ,
pe.ItemID ,
pe.QuantityReceivedToDate ,
pe.Price
FROM ( SELECT ID ,
WorksheetID ,
StoreID ,
PONumber ,
Status ,
CAST(LastUpdated AS DATE) LastUpdated
FROM dbo.PurchaseOrder WITH ( NOLOCK )
WHERE POType = 1
AND Status = 2
) po
INNER JOIN ( SELECT PurchaseOrderID ,
StoreID ,
ItemID ,
Price ,
QuantityReceivedToDate
FROM dbo.PurchaseOrderEntry WITH ( NOLOCK )
) pe ON po.StoreID = pe.StoreID
AND po.ID = pe.PurchaseOrderID
) tblpo ON tblw.WorksheetID = tblpo.WorksheetID
AND tblpo.StoreID = ws.StoreID
AND tblpo.ItemID = tblwp.ItemID
LEFT JOIN ( SELECT tblpo.ID ,
tblpo.WorksheetID ,
tblpo.StoreID ,
tblpo.PONumber ,
pe.ItemID ,
SUM(tblsold.QtySold) QtySold ,
SUM(tblsold.AmtSold) AmtSold
FROM ( SELECT ID ,
WorksheetID ,
StoreID ,
PONumber ,
CAST(LastUpdated AS DATE) LastUpdated
FROM dbo.PurchaseOrder WITH ( NOLOCK )
WHERE POType = 1
AND Status = 2
) tblpo
INNER JOIN ( SELECT PurchaseOrderID ,
StoreID ,
ItemID ,
QuantityReceivedToDate
FROM dbo.PurchaseOrderEntry WITH ( NOLOCK )
) pe ON tblpo.StoreID = pe.StoreID
AND tblpo.ID = pe.PurchaseOrderID
LEFT JOIN ( SELECT tblt.StoreID ,
tblt.DateSold ,
tblte.ItemID ,
SUM(tblte.Quantity) QtySold ,
SUM(tblte.AmtSold) AmtSold
FROM ( SELECT StoreID ,
CAST(TIME AS DATE) DateSold ,
TransactionNumber
FROM dbo.[Transaction]
WITH ( NOLOCK )
) tblt
INNER JOIN ( SELECT
StoreID ,
TransactionNumber ,
ItemID ,
Quantity ,
Price ,
Quantity * Price AmtSold
FROM
dbo.TransactionEntry
WITH ( NOLOCK )
) tblte ON tblt.StoreID = tblte.StoreID
AND tblt.TransactionNumber = tblte.TransactionNumber
GROUP BY tblt.StoreID ,
tblt.DateSold ,
tblte.ItemID
) tblsold ON pe.StoreID = tblsold.StoreID
AND pe.ItemID = tblsold.ItemID
AND tblsold.DateSold >= tblpo.LastUpdated
GROUP BY tblpo.ID ,
tblpo.WorksheetID ,
tblpo.StoreID ,
tblpo.PONumber ,
pe.ItemID
) tblStoreSold ON tblpo.ItemID = tblStoreSold.ItemID
AND tblpo.WorksheetID = tblStoreSold.WorksheetID
AND tblStoreSold.StoreID = tblpo.StoreID
LEFT JOIN dbo.Category WITH ( NOLOCK ) ON Category.DepartmentID = dbo.Department.ID
AND Category.ID = tblitem.CategoryID
LEFT JOIN ( SELECT ItemID ,
StoreID ,
SnapshotQuantity ,
SnapshotPrice
FROM dbo.ItemDynamic WITH ( NOLOCK )
) tblidy ON tblidy.StoreID = ws.StoreID
AND tblwp.ItemID = tblidy.ItemID
INNER JOIN ( SELECT ID ,
StoreCode
FROM Store WITH ( NOLOCK )
) tblStore ON tblStore.ID = ws.StoreID
<END>
SelCriteria = "(SUBSTRING(Department.Name, 1, 2) IN ( 'OR', 'OB', 'CS', 'CC' ))"
GroupBy = ""
SortOrder = "dbo.Department.Name , Supplier.SupplierName , tblStore.StoreCode , tblheader.PONumber ,tblitem.ItemLookupCode"
End ReportSummary
//--- Title Rows ---//
Begin TitleRow
Text = "<Store Name>"
Font = "Arial"
FontBold = True
FontSize = 16
Color = "Blue"
End TitleRow
Begin TitleRow
Text = "<Report Title>"
Font = "Arial"
FontBold = True
FontSize = 12
Color = "Black"
End TitleRow
Begin TitleRow
Text = "Generated On <Report Date>"
Font = "Arial"
FontBold = True
FontSize = 10
Color = "Black"
End TitleRow
//--- Filters ---//
Begin Filter
FieldName = "tblpo.LastUpdated"
FilterOp = reportfilteropBetween
FilterLoLim = "<MonthStart>"
FilterHiLim = "<Today>"
FilterNegated = False
FilterConnector = reportfilterbooleanconAND
End Filter
Begin Column
FieldName = "Department.Name"
DrillDownFieldName = "Department.Name"
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Department"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1700
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "Supplier.SupplierName"
DrillDownFieldName = "Supplier.SupplierName"
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Supplier"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 2500
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "Category.Name"
DrillDownFieldName = "Category.Name"
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Category"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1500
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "tblitem.SubCategory"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Sub Category"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 2300
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "tblStore.StoreCode"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Store Code"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1200
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "tblheader.PONumber"
DrillDownFieldName = ""
DrillDownReportName = ""
Title = "PO No."
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1000
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblheader.RequiredDate"
DrillDownFieldName = ""
DrillDownReportName = ""
Title = "PO Delivery Date"
VBDataType = vbDate
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1500
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblpo.LastUpdated"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Date Committed"
VBDataType = vbDate
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1600
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "tblitem.ItemLookupCode"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "SKU"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1500
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblitem.Description"
DrillDownFieldName = ""
Title = "Item Description"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 2800
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblitem.Cost"
DrillDownFieldName = ""
Title = "Cost"
VBDataType = vbCurrency
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1000
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblidy.SnapshotPrice"
DrillDownFieldName = ""
Title = "Price"
VBDataType = vbCurrency
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1000
GroupMethod = groupmethodNone
ColFormat = ""
ColAlignment = flexAlignLeftCenter
End Column
Begin Column
FieldName = "tblpo.QuantityReceivedToDate"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Qty Committed"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1400
GroupMethod = groupmethodSum
ColFormat = ""
End Column
Begin Column
FieldName = "tblStoreSold.QtySold"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Qty Sold"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1400
GroupMethod = groupmethodSum
ColFormat = ""
End Column
Begin Column
FieldName = "tblidy.SnapshotQuantity"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "On Hand"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1400
GroupMethod = groupmethodSum
ColFormat = ""
End Column
Begin Column
FieldName = "SubSup.SupplierName"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Sub Supplier"
VBDataType = vbString
Formula = ""
ColHidden = False
ColNotDisplayable = False
FilterDisabled = False
ColWidth = 1400
GroupMethod = groupmethodNone
ColFormat = ""
End Column
Begin Column
FieldName = "SellThru"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Sell Thru (%)"
VBDataType = vbDouble
Formula = <BEGIN>
CASE WHEN ISNULL(tblpo.QuantityReceivedToDate, 0) = 0 THEN NULL
ELSE CAST(tblStoreSold.QtySold AS DECIMAL)
/ CAST(tblpo.QuantityReceivedToDate AS DECIMAL)
END
<END>
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1400
GroupMethod = groupmethodNone
ColFormat = "##.##%"
End Column
Begin Column
FieldName = "Parity"
DrillDownFieldName = ""
DrillDownReportName = ""
StoreIDFieldName = ""
Title = "Running Parity (%)"
VBDataType = vbDouble
Formula = <BEGIN>
CAST(DATEDIFF(DAY, tblpo.LastUpdated, GETDATE()) AS DECIMAL) / 60.00
<END>
ColHidden = False
ColNotDisplayable = False
FilterDisabled = True
ColWidth = 1400
GroupMethod = groupmethodNone
ColFormat = "##.##%"
End Column