実用的かはわかりませんが、以下の手順はどうでしょうか？

1.WRKSPLFで*OUTPUTを*PRINT指定して現在のスプールリストを印刷
2.結果をCPYSPLFでPFに落とす。
3.結果ファイルを読込み該当する用紙タイプのとき、CPYSPLFを実行