FDRSARLR Examples

All examples in this section are found in the JCL library installed with FDR. The member names are EX1523x.

Load SAR to DASD volume from ICL library example

Execute FDRSARLR to place SAR onto a DASD volume, copying it from the FDR Installation Control Library (ICL) (change the data set name to match what you used during FDR installation). This is the recommended way to load SAR to a DASD volume as most FDR installs are performed electronically.

//SAR2DISK EXEC PGM=FDRSARLR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //OBJIN DD DISP=SHR,DSN=IDP.ICLFDR54(SAROBJ) //OUTPUT DD UNIT=SYSALLDA,VOL=SER=volser,DISP=SHR

Load SAR to DASD volume and changing options example

Execute FDRSARLR to place SAR onto a DASD volume, copying it from the FDR Installation Control Library (ICL), specify several alternate console addresses, and place SAR onto the label track of a DASD volume. If you want to copy SAR to a DASD without changing any options, omit SYSIN and the control statements.

//SAR2DISK EXEC PGM=FDRSARLR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //OBJIN DD UNIT=TAPE,VOL=SER=FDR54P, // DSN=SAR,DISP=OLD //OUTPUT DD UNIT=SYSALLDA,VOL=SER=volser,DISP=SHR //SYSIN DD * CONSOLE DEVICE=3270 CONSOLE UNIT=005 CONSOLE UNIT=006 CONSOLE UNIT=007 /*

Load SAR to tape from ICL library example

Execute FDRSARLR to place SAR onto an unlabeled tape volume, copying it from the FDR Installation Control Library (ICL) (change the data set name to match what you used during FDR installation).

//SAR2TAPE EXEC PGM=FDRSARLR,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //OBJIN DD DISP=SHR,DSN=IDP.ICLFDR54(SAROBJ) //OUTPUT DD UNIT=TAPE,LABEL=(,NL),VOL=SER=IPLSAR, // DSN=IPLSAR,DISP=(,KEEP)

Modifying SAR on DASD example

Execute FDRSARLR to modify a copy of SAR previously written to DASD and write it back to the same DASD. The example shows VER and REP statements used to apply an BMC-provided fix to SAR, but this can also be used to change console addresses or message option defaults stored in that copy of SAR.

//SAZAP EXEC PGM=FDRSARLR,REGION=0M
//SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //OBJIN DD UNIT=SYSALLDA,VOL=SER=volser,DISP=SHR //OUTPUT DD UNIT=SYSALLDA,VOL=SER=volser,DISP=SHR //SYSIN DD * VER aaaa dddd VERIFY 'dddd' at address 'aaaa' REP aaaa eeee REPLACE 'eeee' at address 'aaaa' DUMP Print SAR object module /*

Print SAR boot records

Execute FDRSARLR to print the IPL records as well as the FDRSAR program that is loaded on the DASD volume. PARM option PROBJIN (Print Object Input) is used to print the SAR object code from the volume specified in OBJIN DD statement. This can be used as a debugging tool to determine if the latest version of FDRSAR is being loaded.

//FDRSARLR EXEC PGM=FDRSARLR,PARM='PROBJIN' //STEPLIB DD DISP=SHR,DSN=fdr.loadlib //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //OBJIN DD UNIT=SYSALLDA,DISP=SHR, // VOL=SER=volser //OUTPUT DD DUMMY

This is an example of the output.

FDR400 -- STAND-ALONE LOADER UTILITY - FDRSARLR VER 5.4/89P - INNOVATION DATA PROCESSING DATE-2019.176 PAGE- 2

>>>>>>>---DISK IPL1 RECORD WILL BE PRINTED---<<<<

0000 00000000 00000000 06010000 40000090 08010000 00000001 *................................*

>>>>>>>---DISK IPL2 RECORD WILL BE PRINTED---<<<<

0000 07010020 40000006 31010026 40000005 08010008 00000001 06000000 0000825C *................................*

0020 00000000 00000000 00000400 00000000 00000000 00000000 00000000 00000000 *................................*

0040 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 *................................*

0060 000000C1 E2D4F2F0 F1F7F1F0 F1F80000 42150102 99011917 6FC6C4D9 E2C1D9D3 *...ASM20171018...........FDRSARL*

0080 D960F54B F461F8F7 F0F30000 00000000 *R.5.4.8703......................*

>>>>>>>---DISK DATA RECORD WILL BE PRINTED---<<<<

0000 00000000 00000000 000C0000 00000390 00000000 00000000 00000000 00000000 *................................*

0020 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000 *................................*

FDR400 -- STAND-ALONE LOADER UTILITY - FDRSARLR VER 5.4/89P - INNOVATION DATA PROCESSING DATE-2019.176 PAGE- 3

…

06C0 00000000 00000000 00000000 00000000 2A822A00 40000FFF 2A40C6C4 D940E2C1 *..........................FDR.SA*

06E0 D940C9D5 D5D6E5C1 E3C9D6D5 40C4C1E3 C140D7D9 D6C3C5E2 E2C9D5C7 40E5C5D9 *R.INNOVATION.DATA.PROCESSING.VER*

0700 40F54BF4 61F8F940 60404040 D7D9C5E2 E240C5D5 E3C5D940 C1C6E3C5 D940C5C1 *.5.4.89.....PRESS.ENTER.AFTER.EA*

In the above listing on page 3, the version of SAR’s object code is highlighted. This can be useful to verify that the desired SAR object code was specified in the OBJIN DD when writing the IPLable version of SAR was to the specified DASD volume.