On Mon, Jun 19, 2017 at 8:26 AM, esmie moo <
[email protected]> wrote:
> Gentle Readers,
> I am trying to run a TMS report to fine all the tape ranges in this
particular LPAR. I checked the doc and I found that TMSBINQ would produce
Report-12 . However, when I ran the job I get the following error message:
> UNKNOWN CARD TYPETMC CTL REC #1 END OF REPORT 12
> Here is my jcl:
> /* //TMSBINQ EXEC PGM=TMSBINQ //TMSRPT
DD SYSOUT=* //SYSIN DD * TMC CTL REC #1
/* //
> Would someone please let me know where my error is?
> Thanks.
You're report listing is not easily readable [grin]. If you are wanting a
report on the CA-1 (TMS) control records, then the JCL should look like:
//TMSBINQ EXEC PGM=TMSBINQ
/
/SYSIN DD *
HEADERS
//TMSRPT DD SYSOUT=*
The output will looks something like (from my system):
1MONDAY, JUNE 19, 2017.170 H E A L T H M A R K E T S
I N C P02025 PAGE=0000
0TMS REPORT-12 BATCH INQUIRY HEADERS
0TMC CTL REC #1 IPL DATE=2017/071 IPL TIME=15.30
NUMBER RANGES=01 FLAG1=00
0TMC CTL REC #2 DSNBS ALLOCATED=00335000 DSNBS USED=00044542 DSNB
BASE=00200003 1ST AVAIL DSNB=00018083 VSN PTR=00000000
0AUDIT CTL REC #4 AUDIT ALLOCATED=00750006 1ST AUDIT REC=00300993 NEXT
AVAIL=00301724 NEXT LABEL=00000001 BKUPIND=00
NEXT CA-DYNAM/T POINTER=00000000
AUDIT FLAG=00 EXTENDED TMC VSN=......
0 LAST TMC BACK-UP ===> DATE=2017/170
TIME=06.49 VOLUME=212239
DSN=BKUPTMC.TMC.BACKUP.G2843V00
0TMC CTL REC #1 & #3 VOLUME RANGES
1 LOW=00100000 HIGH=00299999 ADJ=00099997-
--
Veni, Vidi, VISA: I came, I saw, I did a little shopping.
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
