Create new option to split sysprint output, would like File Manager Headers, options and $$FILEM details sent to another dd

We want to send Part 1 or Part 2 to another DD without having a separate step to extract the data.

PART 1:

1IBM File Manager for z/OS
0
-
0FMNBA001 IBM File Manager for z/OS Version 11 Release 1
0FMNBA010 APF authorized
0FMNBA010 Service Levels of installed components
0FMNBA010 Base IMS DB2 CICS
0FMNBA010 English UK75017 UK75019 UK74677 UK74681

0DEFAULT SET FUNCTION VALUES:

PRINTOUT=SYSPRINT HEADERPG=YES ASCII=NO RECLIMIT=(1,*)
PRINTLEN=132 PAGESKIP=NO PAD=OFF MSGUPPER=NO
PAGESIZE=60 DATAHDR=YES PRTCLASS=A LANGUAGE=ENGLISH
PRTTRANS=ON DUMP=UPDOWN TAPELBL=SL CYLHD=ABSOLUTE
SMFNO=000 PRTDISP=MOD USEIOX=DISABLE IOX=

TEMP UNIT=SYSALLDA DATA= STOR= MANAGEMENT=
PERM UNIT=SYSALLDA DATA= STOR= MANAGEMENT=
TRACECLS=A

1IBM File Manager for z/OS
0*+* FMC2FM: BEGINNING OF FILE MANAGER STATEMENT OUTPUT *+*
0$$FILEM NOSORT
-$$FILEM DSC INPUT=DD01,
$$FILEM OUTPUT=DDDUMMY,
$$FILEM PROC=*
0FMNBC514 REXX procedure statements read from SYSIN.

SELECT
WHEN (FLD(1,2) == '61' & FLD(79,1) == 'A') THEN
TALLY(73,P,'DSM PROD BYTES ON DISK')
WHEN (FLD(1,2) == '61' & FLD(79,1) == 'A') THEN
TALLY(2,1,Z,'MONTHEND ON DISK')
WHEN (FLD(1,2) == '61' & FLD(79,1) == 'M') THEN
TALLY(73,P,'DSM PROD BYTES ON TAPE')
WHEN (FLD(1,2) == '61' & FLD(79,1) == 'M') THEN
TALLY(2,1,Z,'MONTHEND ON TAPE')
OTHERWISE
TALLY(2,1,Z,'TEST MONTHEND ON TAPE')
END

0FMNBB061 REXX procedure statements processed by File Manager (FASTREXX).
0FMNBA377 865801 record(s) read from DD01/PSJ011.PROD.REPORT.VERSIONS
0FMNBB298 865801 record(s) copied: 0 truncated: 0 fields truncated
1IBM File Manager for z/OS
0TALLY summary report
-------------------------------------------------------------------------------
PART 2:
DSM PROD BYTES ON TAPE 5510743451680
DSM PROD BYTES ON DISK 3332048537744