Code:
SELECT dbo_Rsv.OrdNo, dbo_Rsv.SerNo, dbo_ShpBal.Inf, dbo_Rsv.ProdNo, dbo_Rsv.ShpNo, dbo_Ord.Nm, dbo_Ord.Ad1, dbo_OrdLn.TrInf1, dbo_FreeInf2.Gr12, dbo_FreeInf2.Txt2, dbo_OrdLn.Descr, dbo_Rsv.TrInf2, dbo_Ord.PNo, dbo_Ord.YrRef, dbo_Ord.Label, dbo_ShpBal.DurDt AS EXP, dbo_ShpBal.Dt1 AS Cure, DateSerial(Left(IIf([EXP]=0,"19000101",[EXP]),4),Mid(IIf([EXP]=0,"19000101",[EXP]),5,2),Right(IIf([EXP]=0,"19000101",[EXP]),2)) AS EXPfix, DateSerial(Left(IIf([Cure]=0,"19000101",[Cure]),4),Mid(IIf([Cure]=0,"19000101",[Cure]),5,2),Right(IIf([Cure]=0,"19000101",[Cure]),2)) AS Curefix, dbo_OrdLn.FinDt AS Ferdigmeldtdato, Format([dbo_OrdLn]![TrInf1],"000000") AS Sorting, dbo_FreeInf2.Val28, IIf([Val27]=0,"",[Val27]) & IIf([Val28]>0,"-") & IIf([Val28]=0,"",[Val28]) AS Hard, dbo_OrdLn.LnNo, [dbo_Rsv]![OrdNo] & [lnno] AS [key], dbo_Ord.PArea, dbo_OrdLn.TrInf1 AS item, dbo_FreeInf2.Val1, dbo_FreeInf2.Val2, dbo_FreeInf2.Val3, dbo_FreeInf2.Val4, dbo_FreeInf2.Val5, dbo_FreeInf2.Val6, dbo_FreeInf2.Val7, dbo_FreeInf2.Val8, dbo_FreeInf2.Val9, dbo_FreeInf2.Val23, dbo_FreeInf2.Val22, dbo_FreeInf2.Val24, dbo_FreeInf2.Val25, dbo_FreeInf2.Val26, dbo_FreeInf2.Val27, dbo_FreeInf2.Val12, dbo_FreeInf2.Val11, dbo_FreeInf2.Val10, dbo_FreeInf2.PK, dbo_FreeInf2.Gr2, dbo_FreeInf2.Val17, dbo_FreeInf2.Val13
FROM dbo_OrdLn INNER JOIN (dbo_Ord INNER JOIN (dbo_ShpBal INNER JOIN (dbo_Rsv INNER JOIN dbo_FreeInf2 ON (dbo_Rsv.ProdNo = dbo_FreeInf2.ProdNo) AND (dbo_Rsv.ShpNo = dbo_FreeInf2.ShpNo)) ON (dbo_ShpBal.ShpNo = dbo_Rsv.ShpNo) AND (dbo_ShpBal.ProdNo = dbo_Rsv.ProdNo)) ON dbo_Ord.OrdNo = dbo_Rsv.OrdNo) ON (dbo_OrdLn.OrdNo = dbo_Ord.OrdNo) AND (dbo_OrdLn.LnNo = dbo_Rsv.OrdLnNo) AND (dbo_OrdLn.ProdNo = dbo_ShpBal.ProdNo)
GROUP BY dbo_Rsv.OrdNo, dbo_Rsv.SerNo, dbo_ShpBal.Inf, dbo_Rsv.ProdNo, dbo_Rsv.ShpNo, dbo_Ord.Nm, dbo_Ord.Ad1, dbo_FreeInf2.Gr12, dbo_FreeInf2.Txt2, dbo_OrdLn.Descr, dbo_Rsv.TrInf2, dbo_Ord.PNo, dbo_Ord.YrRef, dbo_Ord.Label, dbo_ShpBal.DurDt, dbo_ShpBal.Dt1, dbo_OrdLn.FinDt, Format([dbo_OrdLn]![TrInf1],"000000"), dbo_FreeInf2.Val28, dbo_OrdLn.LnNo, [dbo_Rsv]![OrdNo] & [lnno], dbo_Ord.PArea, dbo_OrdLn.TrInf1, dbo_FreeInf2.Val1, dbo_FreeInf2.Val2, dbo_FreeInf2.Val3, dbo_FreeInf2.Val4, dbo_FreeInf2.Val5, dbo_FreeInf2.Val6, dbo_FreeInf2.Val7, dbo_FreeInf2.Val8, dbo_FreeInf2.Val9, dbo_FreeInf2.Val23, dbo_FreeInf2.Val22, dbo_FreeInf2.Val24, dbo_FreeInf2.Val25, dbo_FreeInf2.Val26, dbo_FreeInf2.Val27, dbo_FreeInf2.Val12, dbo_FreeInf2.Val11, dbo_FreeInf2.Val10, dbo_FreeInf2.PK, dbo_FreeInf2.Gr2, dbo_FreeInf2.Val17, dbo_FreeInf2.Val13
HAVING (((dbo_Rsv.OrdNo)=[Forms]![Printingform]![Input]) AND ((dbo_Rsv.ProdNo) Like [Forms]![Printingform]![cmoProduct] & "*") AND ((dbo_Rsv.ShpNo) Like [Forms]![Printingform]![cmoParti] & "*") AND ((dbo_Rsv.TrInf2)>"0") AND ((dbo_OrdLn.FinDt) Like [Forms]![Printingform]![cmoFerddato] & "*") AND ((dbo_OrdLn.TrInf1) Like [Forms]![Printingform]![cmoitem] & "*" And (dbo_OrdLn.TrInf1) Like [Forms]![Printingform]![cmoItem] & "*" And (dbo_OrdLn.TrInf1) Not Like "*r") AND ((dbo_FreeInf2.Gr2)=3))
ORDER BY Format([dbo_OrdLn]![TrInf1],"000000");
I would like to generete seperate PDF grupped by TrInf1 field