ASKER
SELECT TOP 10
TBL_Defects_DCRs.[EDR_#]
, TBL_ISSUES.Rank
, TBL_Defects_DCRs.Top5
FROM TBL_Defects_DCRs
INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#] = TBL_ISSUES.[EDR#]
WHERE TBL_Defects_DCRs.Top5 = TRUE
ORDER BY TBL_ISSUES.Rank DESC
UNION ALL SELECT TOP 5
TBL_Defects_DCRs.[EDR_#]
, TBL_ISSUES.Rank
, TBL_Defects_DCRs.Top5
FROM TBL_Defects_DCRs
INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#] = TBL_ISSUES.[EDR#]
WHERE TBL_Defects_DCRs.Top5 = FALSE
ORDER BY TBL_ISSUES.Rank DESC;
I saved this as Qry_ListOf15SELECT TBL_Defects_DCRs.EDR_Type
, TBL_Defects_DCRs.[EDR_#]
, TBL_Defects_DCRs.DCR_Status
, TBL_Defects_DCRs.DCR_Submit_Date
, TBL_Defects_DCRs.DCR_Headline
, TBL_Defects_DCRs.DCR_Description
, TBL_Defects_DCRs.DCR_ICBS_Impact
, TBL_Defects_DCRs.DCR_Target_Release
, TBL_Defects_DCRs.DCR_Comments
, TBL_ISSUES.[WHITEBOARD#]
, TBL_ISSUES.[TICKET#]
, TBL_ISSUES.[WORKAROUND#]
, TBL_ISSUES.Workload
, TBL_ISSUES.System
, TBL_ISSUES.[DATABASE_ISSUE_#]
, TBL_ISSUES.STATUS
, TBL_ISSUES.Rank
, IsNull([Workload]) AS Expr1
, TBL_ISSUES.Priority
, TBL_ISSUES.[DATABASE_ISSUE_#]
, TBL_Defects_DCRs.Top5
, TBL_Defects_DCRs.DCR_EDR_Priority
, ([TBL_ISSUES].[Workload]) = [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] OR [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] IS NULL AS Expr2
FROM (TBL_Defects_DCRs
INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#] = TBL_ISSUES.[EDR#])
INNER JOIN Qry_ListOf15 ON TBL_Defects_DCRs.[EDR_#] = Qry_ListOf15.[EDR_#];
ASKER
ASKER
SELECT
TBL_Defects_DCRs.Top5
, TBL_ISSUES.Rank
, TBL_Defects_DCRs.EDR_Type
, TBL_Defects_DCRs.[EDR_#]
, TBL_Defects_DCRs.DCR_Status
, TBL_Defects_DCRs.DCR_Submit_Date
, TBL_Defects_DCRs.DCR_Headline
, TBL_Defects_DCRs.DCR_Description
, TBL_Defects_DCRs.DCR_ICBS_Impact
, TBL_Defects_DCRs.DCR_Target_Release
, TBL_Defects_DCRs.DCR_Comments
, TBL_ISSUES.[WHITEBOARD#]
, TBL_ISSUES.[TICKET#]
, TBL_ISSUES.[WORKAROUND#]
, TBL_ISSUES.Workload
, TBL_ISSUES.System
, TBL_ISSUES.[DATABASE_ISSUE_#]
, TBL_ISSUES.STATUS
, IsNull([Workload]) AS Expr1
, TBL_ISSUES.Priority
, TBL_ISSUES.[DATABASE_ISSUE_#]
, TBL_Defects_DCRs.DCR_EDR_Priority
, ([TBL_ISSUES].[Workload]) = [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] OR [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] IS NULL AS Expr2
FROM TBL_Defects_DCRs
INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#] = TBL_ISSUES.[EDR#]
WHERE (
((TBL_ISSUES.Workload) IS NOT NULL) AND ((TBL_ISSUES.STATUS) <> 11 AND (TBL_ISSUES.STATUS) <> 12 AND (TBL_ISSUES.STATUS) <> 24) AND (
(TBL_ISSUES.Rank) IN (
SELECT TOP 10 Rank
FROM TBL_ISSUES AS R
WHERE R.System = TBL_ISSUES.System
ORDER BY TBL_ISSUES.Rank ASC
)
) AND ((IsNull([Workload])) = False)
) OR (
((TBL_ISSUES.Workload) IS NULL) AND ((TBL_ISSUES.STATUS) <> 11 AND (TBL_ISSUES.STATUS) <> 12 AND (TBL_ISSUES.STATUS) <> 24) AND (
(TBL_ISSUES.Rank) IN (
SELECT TOP 10 Rank
FROM TBL_ISSUES AS R
WHERE R.System = TBL_ISSUES.System
ORDER BY TBL_ISSUES.Rank ASC
)
)
)
ORDER BY
TBL_Defects_DCRs.Top5 ASC
, Nz(TBL_ISSUES.Rank, 0) DESC
;
SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE TBL_ISSUES.Rank In (SELECT top 5 T5.Rank FROM TBL_ISSUES As T5 WHERE T5.Status Not In (11,12,24)
And T5.system = [TBL_ISSUES].system
ORDER BY T5.Rank DESC )
UNION ALL
SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE TBL_ISSUES.Rank In (SELECT top 5 T5.Rank FROM TBL_ISSUES As T5 WHERE T5.Status Not In (11,12,24)
And T5.system = [TBL_ISSUES].system
And TBL_Defects_DCRs.Top5=False
ORDER BY T5.Rank DESC )
ORDER BY TBL_ISSUES.System, TBL_Defects_DCRs.Top5, TBL_ISSUES.Rank DESC
ASKER
ASKER
SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE TBL_ISSUES.Rank In (SELECT top 5 T5.Rank FROM TBL_ISSUES As T5 WHERE T5.Status Not In (11,12,24)
And T5.system = [TBL_ISSUES].system
ORDER BY T5.Rank DESC )
UNION ALL SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE TBL_ISSUES.Rank In (SELECT top 10 T10.Rank FROM TBL_ISSUES As T10 WHERE T10.Status Not In (11,12,24)
And T10.system = [TBL_ISSUES].system
And TBL_Defects_DCRs.Top5=False
ORDER BY T10.Rank DESC )
ORDER BY TBL_ISSUES.System, TBL_Defects_DCRs.Top5, TBL_ISSUES.Rank DESC;
ASKER
SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE
Status Not In (11,12,24)
And Top5 = True
UNION ALL
SELECT TBL_Defects_DCRs.EDR_Type, TBL_Defects_DCRs.[EDR_#], TBL_Defects_DCRs.DCR_Status, TBL_Defects_DCRs.DCR_Submit_Date, TBL_Defects_DCRs.DCR_Headline, TBL_Defects_DCRs.DCR_Description, TBL_Defects_DCRs.DCR_ICBS_Impact, TBL_Defects_DCRs.DCR_Target_Release, TBL_Defects_DCRs.DCR_Comments, TBL_ISSUES.[WHITEBOARD#], TBL_ISSUES.[TICKET#], TBL_ISSUES.[WORKAROUND#], TBL_ISSUES.Workload, TBL_ISSUES.System, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_ISSUES.Status, TBL_ISSUES.Rank, IsNull([Workload]) AS Expr1, TBL_ISSUES.Priority, TBL_ISSUES.[DATABASE_ISSUE_#], TBL_Defects_DCRs.Top5, TBL_Defects_DCRs.DCR_EDR_Priority, ([TBL_ISSUES].[Workload])=[Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Or [Which workload: 2-PIT; 3-BE; 8-PIT and BE; 4-Corr; or blank-All?] Is Null AS Expr2
FROM TBL_Defects_DCRs INNER JOIN TBL_ISSUES ON TBL_Defects_DCRs.[EDR_#]=TBL_ISSUES.[EDR#]
WHERE TBL_ISSUES.Rank In (SELECT top 10 T10.Rank FROM TBL_ISSUES As T10 WHERE T10.Status Not In (11,12,24)
And T10.system = [TBL_ISSUES].system
And TBL_Defects_DCRs.Top5=False
ORDER BY T10.Rank DESC )
ORDER BY TBL_ISSUES.System, TBL_Defects_DCRs.Top5, TBL_ISSUES.Rank DESC;
ASKER
ASKER
ASKER
Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.
TRUSTED BY
What determines whether a task/project is being worked on?