Yes of course, here's the code:
Private Sub Command325_Click()
On Error GoTo Command325_Click_Err
DoCmd.OpenReport "RPtCB", acViewReport, "", "[PO#]=" & [PO#], acNormal
DoCmd.OutputTo acOutputReport, "RPtCB", "PDFFormat(*.pdf)", Me.PO_ & "-Price", False...