OP (Object Print)

Purpose
Print an Object Access Method (OAM) object.
Usage notes
Use this function to print the contents of an object in character format or one of the two dump formats.
Options
You can select the range of bytes or records to print.
You can use the various SET processing options to control the print output:
  • SET PRINTOUT defines the destination of the print output. If set to PRINTOUT=SYSOUT, you can use the PB (Print Browse) function to browse the accumulated output.
  • SET RECLIMIT controls how many bytes of each record are printed.
  • The format of the print output also depends on the settings of SET PAGESIZE, SET PRINTLEN, and SET PRTTRANS.
  • Use SET DUMP to specify the dump format.
Related functions
ODL
List OAM objects
OE
Erase an OAM object
Figure 1. Syntax

1 OP COLLECTN=collection OBJNAME=object
1! FORMAT=CHAR
1 FORMAT=format
1! BLKSIZE=4096
1 BLKSIZE=blksize
1! POSITION=0
1 POSITION=skip
1! BYTES=ALL
1 BYTES=nbytes
blksize
Logical record size to be used to deblock the OAM object into logical records. The maximum is 32 768; the default is 4 096.
collection
Name of the OAM object collection. In any mode except batch mode, the user's TSO prefix (normally the user ID) is used as the high-level qualifier for any name that is not entered in quotation marks.
format
The format of the output:
CHAR
Character format (the default)
HEX
Hexadecimal format.
nbytes
Maximum number of bytes to be printed or ALL. If this number is exceeded, printing stops. This parameter provides protection against printing an OAM object that is much larger than expected. The maximum number is 99 999 999. If you specify ALL or you omit the parameter, the entire object is printed.
object
Name of the OAM object. In any mode except batch mode, the user's TSO prefix (normally the user ID) is used as the high-level qualifier for any name that is not entered in quotation marks.
skip
Number of bytes to be skipped from the beginning of the object. The maximum is 99 999 999; the default is 0.
//JOB (acct),'name',Print OAM Object
//S1       EXEC PGM=FILEMGR
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
$$FILEM OP  COLLECTN='SYSU.OAM.CLLCT000',
$$FILEM     OBJNAME='DTT.ITT.TBL21',
$$FILEM     BYTES=1000
$$FILEM EOJ
/*