Fill out report based on rank from query

Prev: Filter Report by Form - VBA Code
Next: Counting Blanks in Non Numeric Fields

From: NeoFax on 8 Apr 2010 14:16

---

I have a query:

SELECT a.workorderNum, a.workorderName, a.workorderMaterial,
a.workorderSerialNum, a.workorderComponent, a.ProductName,
a.Discrepancy, a.dateDisc, a.qualCNumber, a.qualFName, a.qualLName,
a.qualRole, (SELECT COUNT(*) FROM qryDiscrepancies AS b WHERE
b.workorderNum=a.workorderNum AND b.discID <= a.discID) AS
discrepancyNum, a.discID
FROM qryDiscrepancies AS a
GROUP BY a.workorderNum, a.workorderName, a.workorderMaterial,
a.workorderSerialNum, a.workorderComponent, a.ProductName,
a.Discrepancy, a.dateDisc, a.qualCNumber, a.qualFName, a.qualLName,
a.qualRole, a.discID;

That places a "rank" on the quality discrepancies found during
production of material. I need to place the discrepancies in order on
the report like so:

Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
Corrective Action QCInsp
1 BlahBlahBlah More Blah Blank 5
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
Corrective Action QCInsp
2 BlahBlahBlah More Blah Blank 6
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
Corrective Action QCInsp
3 BlahBlahBlah More Blah Blank 7
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
Corrective Action QCInsp
4 BlahBlahBlah More Blah Blank 8
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank
BlahBlahBlah More Blah Blank
BlahBlahBlah MoreBlah Blank

I cannot get the report to place the info in the blocks in this
format. I either get 1 page per discrepancy, or a subreport that has
1-8 on the left, with the right side blank. How would I go about
putting this info in the desired format? Second, if there are not
enough discrepancies to make 8, how do I generate enough blank blocks
to make 8? Third, if I have more than 8, how do I place the remainder
on a second and subsequent pages?

From: KARL DEWEY on 9 Apr 2010 11:38

---

Did you go to Print and setup as two column?

--
Build a little, test a little.


"NeoFax" wrote:

> I have a query:
>
> SELECT a.workorderNum, a.workorderName, a.workorderMaterial,
> a.workorderSerialNum, a.workorderComponent, a.ProductName,
> a.Discrepancy, a.dateDisc, a.qualCNumber, a.qualFName, a.qualLName,
> a.qualRole, (SELECT COUNT(*) FROM qryDiscrepancies AS b WHERE
> b.workorderNum=a.workorderNum AND b.discID <= a.discID) AS
> discrepancyNum, a.discID
> FROM qryDiscrepancies AS a
> GROUP BY a.workorderNum, a.workorderName, a.workorderMaterial,
> a.workorderSerialNum, a.workorderComponent, a.ProductName,
> a.Discrepancy, a.dateDisc, a.qualCNumber, a.qualFName, a.qualLName,
> a.qualRole, a.discID;
>
> That places a "rank" on the quality discrepancies found during
> production of material. I need to place the discrepancies in order on
> the report like so:
>
> Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
> Corrective Action QCInsp
> 1 BlahBlahBlah More Blah Blank 5
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
> Corrective Action QCInsp
> 2 BlahBlahBlah More Blah Blank 6
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
> Corrective Action QCInsp
> 3 BlahBlahBlah More Blah Blank 7
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> Disc# Discrepancy Corrective Action QCInsp Disc# Discrepancy
> Corrective Action QCInsp
> 4 BlahBlahBlah More Blah Blank 8
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
> BlahBlahBlah More Blah Blank
> BlahBlahBlah MoreBlah Blank
>
> I cannot get the report to place the info in the blocks in this
> format. I either get 1 page per discrepancy, or a subreport that has
> 1-8 on the left, with the right side blank. How would I go about
> putting this info in the desired format? Second, if there are not
> enough discrepancies to make 8, how do I generate enough blank blocks
> to make 8? Third, if I have more than 8, how do I place the remainder
> on a second and subsequent pages?
> .
>

 | 
Pages: 1
Prev: Filter Report by Form - VBA Code
Next: Counting Blanks in Non Numeric Fields