Detail report in landscape

[sven2]

Hello,

How can I make a report in landscape?

I have a table like this:

number name value
1 test1 45,3
1 test2 12
1 test3 11,4
2 test1 3,6
2 test5 8,88

Now I want to create a report like this:

1 test1 test2 test3
45,3 12 11,4
2 test1 test5
3,6 8,88

So as you can see i want to make a row for each number and put all the values on one row.

Is this possible and how?

Thanks in advance,

sven.

 

[Ron_dK]

There is a way of doing it.
This post may give you a hint :

http://www.access-programmers.co.uk/forums/showthread.php?t=106426&highlight=ssn

 

[sven2]

Hello,

I understand that making a crosstab is possible but not easy to do.

The Query of my report looks like this:

SELECT TblMoederrollen.Moederrolnummer, TblMoederrollen.Papiersoort, TblMoederrollen.Gramgewicht, TblMoederrollen.Datum, TblKwaliteitgegevens.Kwaliteitsnaam, TblKwaliteitswaarde.KwaliteitID, TblKwaliteitswaarde.Kwaliteitswaarde, TblKwaliteitgegevens.Eenheid
FROM TblMoederrollen INNER JOIN (TblKwaliteitgegevens INNER JOIN TblKwaliteitswaarde ON TblKwaliteitgegevens.KwaliteitID = TblKwaliteitswaarde.KwaliteitID) ON TblMoederrollen.Moederrolnummer = TblKwaliteitswaarde.Moederrolnummer
WHERE (((TblMoederrollen.Papiersoort)=[Forms]![FrmRapportering]![cboPapiersoort]) AND ((TblMoederrollen.Gramgewicht)=[Forms]![FrmRapportering]![cboGramgewicht]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine])) OR (((TblMoederrollen.Gramgewicht)=[Forms]![FrmRapportering]![cboGramgewicht]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cboPapiersoort])='ALLE PAPIERSOORTEN')) OR (((TblMoederrollen.Papiersoort)=[Forms]![FrmRapportering]![cboPapiersoort]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cbogramgewicht])='ALLE GRAMGEWICHTEN')) OR (((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cboPapiersoort])='ALLE PAPIERSOORTEN') AND (([Forms]![FrmRapportering]![cbogramgewicht])='ALLE GRAMGEWICHTEN'));

What I don't understand is where to put the recordset for the report?

Best regards,
Sven.

 

[Ron_dK]

Sven,

I'm not quite sure what you're trying to achieve with this query.
Can you post your DB or fraction thereof, so we might take a closer look.

Hth

 

[sven2]

Hello,

I have made a crosstab query to organize the data for the report. What I can't do is use this query as recordsource for a report.

The query look like this:

PARAMETERS [Forms]![FrmRapportering]![cbopapiersoort] Text ( 255 ), [Forms]![Frmrapportering]![cbogramgewicht] Text ( 255 ), [Forms]![FrmRapportering]![txtmachine] Short, [Forms]![FrmRapportering]![TxtBegindatum] DateTime, [Forms]![FrmRapportering]![TxtEinddatum] DateTime;
TRANSFORM Sum(TblKwaliteitswaarde.Kwaliteitswaarde) AS SomVanKwaliteitswaarde
SELECT TblMoederrollen.Moederrolnummer, TblMoederrollen.Papiersoort, TblMoederrollen.Gramgewicht, TblMoederrollen.Datum
FROM TblMoederrollen INNER JOIN (TblKwaliteitgegevens INNER JOIN TblKwaliteitswaarde ON TblKwaliteitgegevens.KwaliteitID = TblKwaliteitswaarde.KwaliteitID) ON TblMoederrollen.Moederrolnummer = TblKwaliteitswaarde.Moederrolnummer
WHERE (((TblMoederrollen.Papiersoort)=[Forms]![FrmRapportering]![cboPapiersoort]) AND ((TblMoederrollen.Gramgewicht)=[Forms]![FrmRapportering]![cboGramgewicht]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine])) OR (((TblMoederrollen.Gramgewicht)=[Forms]![FrmRapportering]![cboGramgewicht]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cboPapiersoort])='ALLE PAPIERSOORTEN')) OR (((TblMoederrollen.Papiersoort)=[Forms]![FrmRapportering]![cboPapiersoort]) AND ((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cbogramgewicht])='ALLE GRAMGEWICHTEN')) OR (((TblMoederrollen.Datum)>=[Forms]![FrmRapportering]![txtbegindatum] And (TblMoederrollen.Datum)<=[Forms]![FrmRapportering]![txteinddatum]) AND ((TblKwaliteitswaarde.KwaliteitID) Not In (SELECT TblKwaliteitgegevens.KwaliteitID FROM TblKwaliteitgegevens WHERE TblKwaliteitgegevens.MachineID=Forms!Frmrapportering!txtmachine AND TblKwaliteitgegevens.rapportering = false)) AND ((TblMoederrollen.MachineID)=[Forms]![FrmRapportering]![txtmachine]) AND (([Forms]![FrmRapportering]![cboPapiersoort])='ALLE PAPIERSOORTEN') AND (([Forms]![FrmRapportering]![cbogramgewicht])='ALLE GRAMGEWICHTEN'))
GROUP BY TblMoederrollen.Moederrolnummer, TblMoederrollen.Papiersoort, TblMoederrollen.Gramgewicht, TblMoederrollen.Datum
ORDER BY TblMoederrollen.Moederrolnummer
PIVOT TblKwaliteitgegevens.Kwaliteitsnaam;

How can I make a report based on this query?

Thanks in advance,
Sven.