[hercules-os380] Tapemap blues

[[e-mail] [hercules-os380]]

Hi folks;


I am having a bit of blues trying to get my tape read. After I submit the job it asks me to mount the tape. I do devinit 400 tapes/asmxf.het; it says it initialized the tape, but a few minutes later I get mount pending again.


Here is my JCL.


//HERC01A JOB CLASS=A,MSGCLASS=A,REGION=0K
//S3 EXEC PGM=TAPEMAP
//* COND=(4,LT,LKED)
//STEPLIB DD DSN=HERC01.LOAD,DISP=SHR
//SYSPRNT2 DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD VOL=SER=ASMXF,DISP=OLD,UNIT=TAPE
//SYSTERM DD SYSOUT=*
//*
//


regards;


Rahim

[Jon Perryman [e-mail] [hercules-os380]]

LABEL=(1,BLP) will skip the label process and DISP=(OLD,PASS) will keep the tape mounted. Tape map probably needs both of these. It may also need a DSN= but the can be anything when using BLP.
Regards, Jon.

On Sunday, October 21, 2018 7:36 AM, "***@yahoo.com [hercules-os380]" <hercules-***@yahoogroups.com> wrote:


  Hi folks;
I am having a bit of blues trying to get my tape read.  After I submit the job it asks me to mount the tape.  I do devinit 400 tapes/asmxf.het;  it says it initialized the tape, but a few minutes later I get mount pending again.
Here is my JCL.
//HERC01A  JOB CLASS=A,MSGCLASS=A,REGION=0K         
//S3       EXEC PGM=TAPEMAP                         
//*        COND=(4,LT,LKED)                         
//STEPLIB  DD DSN=HERC01.LOAD,DISP=SHR              
//SYSPRNT2     DD      SYSOUT=*                     
//SYSPRINT DD SYSOUT=*                              
//SYSOUT   DD SYSOUT=*                              
//SYSIN    DD DUMMY                                 
//SYSUT1   DD VOL=SER=ASMXF,DISP=OLD,UNIT=TAPE      
//SYSTERM  DD SYSOUT! =*                              
//*                                                 
//                                                   
regards;
Rahim
#yiv1858646100 #yiv1858646100 -- #yiv1858646100ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1858646100 #yiv1858646100ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1858646100 #yiv1858646100ygrp-mkp #yiv1858646100hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv1858646100 #yiv1858646100ygrp-mkp #yiv1858646100ads {margin-bottom:10px;}#yiv1858646100 #yiv1858646100ygrp-mkp .yiv1858646100ad {padding:0 0;}#yiv1858646100 #yiv1858646100ygrp-mkp .yiv1858646100ad p {margin:0;}#yiv1858646100 #yiv1858646100ygrp-mkp .yiv1858646100ad a {color:#0000ff;text-decoration:none;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ygrp-lc {font-family:Arial;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ygrp-lc #yiv1858646100hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ygrp-lc .yiv1858646100ad {margin-bottom:10px;padding:0 0;}#yiv1858646100 #yiv1858646100actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1858646100 #yiv1858646100activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1858646100 #yiv1858646100activity span {font-weight:700;}#yiv1858646100 #yiv1858646100activity span:first-child {text-transform:uppercase;}#yiv1858646100 #yiv1858646100activity span a {color:#5085b6;text-decoration:none;}#yiv1858646100 #yiv1858646100activity span span {color:#ff7900;}#yiv1858646100 #yiv1858646100activity span .yiv1858646100underline {text-decoration:underline;}#yiv1858646100 .yiv1858646100attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv1858646100 .yiv1858646100attach div a {text-decoration:none;}#yiv1858646100 .yiv1858646100attach img {border:none;padding-right:5px;}#yiv1858646100 .yiv1858646100attach label {display:block;margin-bottom:5px;}#yiv1858646100 .yiv1858646100attach label a {text-decoration:none;}#yiv1858646100 blockquote {margin:0 0 0 4px;}#yiv1858646100 .yiv1858646100bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv1858646100 .yiv1858646100bold a {text-decoration:none;}#yiv1858646100 dd.yiv1858646100last p a {font-family:Verdana;font-weight:700;}#yiv1858646100 dd.yiv1858646100last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1858646100 dd.yiv1858646100last p span.yiv1858646100yshortcuts {margin-right:0;}#yiv1858646100 div.yiv1858646100attach-table div div a {text-decoration:none;}#yiv1858646100 div.yiv1858646100attach-table {width:400px;}#yiv1858646100 div.yiv1858646100file-title a, #yiv1858646100 div.yiv1858646100file-title a:active, #yiv1858646100 div.yiv1858646100file-title a:hover, #yiv1858646100 div.yiv1858646100file-title a:visited {text-decoration:none;}#yiv1858646100 div.yiv1858646100photo-title a, #yiv1858646100 div.yiv1858646100photo-title a:active, #yiv1858646100 div.yiv1858646100photo-title a:hover, #yiv1858646100 div.yiv1858646100photo-title a:visited {text-decoration:none;}#yiv1858646100 div#yiv1858646100ygrp-mlmsg #yiv1858646100ygrp-msg p a span.yiv1858646100yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1858646100 .yiv1858646100green {color:#628c2a;}#yiv1858646100 .yiv1858646100MsoNormal {margin:0 0 0 0;}#yiv1858646100 o {font-size:0;}#yiv1858646100 #yiv1858646100photos div {float:left;width:72px;}#yiv1858646100 #yiv1858646100photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv1858646100 #yiv1858646100photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1858646100 #yiv1858646100reco-category {font-size:77%;}#yiv1858646100 #yiv1858646100reco-desc {font-size:77%;}#yiv1858646100 .yiv1858646100replbq {margin:4px;}#yiv1858646100 #yiv1858646100ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv1858646100 #yiv1858646100ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1858646100 #yiv1858646100ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1858646100 #yiv1858646100ygrp-mlmsg select, #yiv1858646100 input, #yiv1858646100 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv1858646100 #yiv1858646100ygrp-mlmsg pre, #yiv1858646100 code {font:115% monospace;}#yiv1858646100 #yiv1858646100ygrp-mlmsg * {line-height:1.22em;}#yiv1858646100 #yiv1858646100ygrp-mlmsg #yiv1858646100logo {padding-bottom:10px;}#yiv1858646100 #yiv1858646100ygrp-msg p a {font-family:Verdana;}#yiv1858646100 #yiv1858646100ygrp-msg p#yiv1858646100attach-count span {color:#1E66AE;font-weight:700;}#yiv1858646100 #yiv1858646100ygrp-reco #yiv1858646100reco-head {color:#ff7900;font-weight:700;}#yiv1858646100 #yiv1858646100ygrp-reco {margin-bottom:20px;padding:0px;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ov li a {font-size:130%;text-decoration:none;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv1858646100 #yiv1858646100ygrp-sponsor #yiv1858646100ov ul {margin:0;padding:0 0 0 8px;}#yiv1858646100 #yiv1858646100ygrp-text {font-family:Georgia;}#yiv1858646100 #yiv1858646100ygrp-text p {margin:0 0 1em 0;}#yiv1858646100 #yiv1858646100ygrp-text tt {font-size:120%;}#yiv1858646100 #yiv1858646100ygrp-vital ul li:last-child {border-right:none !important;}#yiv1858646100

[[e-mail] [hercules-os380]]

Post by Jon Perryman ***@pacbell.net [hercules-os380]
LABEL=(1,BLP) will skip the label process and
DISP=(OLD,PASS) will keep the tape mounted.

I think it's "RETAIN" that keeps the tape mounted,
and a google seems to indicate that the syntax is:

VOL=(XXXXXX,RETAIN)

BFN. Paul.

[[e-mail] [hercules-os380]]

That’s correct, LABEL=(XXXXXX,RETAIN) will keep the tape mounted after processing for another job step to use it. DISP=OLD is required for tapes because, by their nature tapes can’t be shared (DISP=SHR).. As I recall, if you use DISP=SHR, it’s ignored and DISP=OLD is assumed.



From: hercules-***@yahoogroups.com <hercules-***@yahoogroups.com>
Sent: Sunday, October 21, 2018 10:20 PM
To: hercules-***@yahoogroups.com
Subject: Re: [hercules-os380] Tapemap blues

Post by Jon Perryman ***@pacbell.net [hercules-os380]
LABEL=(1,BLP) will skip the label process and
DISP=(OLD,PASS) will keep the tape mounted.

I think it's "RETAIN" that keeps the tape mounted,
and a google seems to indicate that the syntax is:

VOL=(XXXXXX,RETAIN)

BFN. Paul.

[Jon Perryman [e-mail] [hercules-os380]]

DISP=(xxx,PASS) will automatically retain the tape upon close. I believe it's benefit is the tape dismount at end of job. Retain will work just as well but is not necessary. Mounting the tape can also be used to retain the tape. 
As for DISP=SHR, I  believe non-shareable devices will be reserved to prohibit a second open against a file on this tape. Same end result as DISP=OLD but more robust.

On Monday, October 22, 2018 5:41 AM, "***@yahoo.com [hercules-os380]" <hercules-***@yahoogroups.com> wrote:


  That’s correct, LABEL=(XXXXXX,RETAIN) will keep the tape mounted after processing for another job step to use it.  DISP=OLD is required for tapes because, by their nature tapes can’t be shared (DISP=SHR).  As I recall, if you use DISP=SHR, it’s ignored and DISP=OLD is assumed.  From: hercules-***@yahoogroups.com <hercules-***@yahoogroups.com>
Sent: Sunday, October 21, 2018 10:20 PM

Post by Jon Perryman ***@pacbell.net [hercules-os380]
LABEL=(1,BLP) will skip the label process and
DISP=(OLD,PASS) will keep the tape mounted.

I think it's "RETAIN" that keeps the tape mounted,
and a google seems to indicate that the syntax is:

VOL=(XXXXXX,RETAIN)

BFN. Paul. #yiv0442300499 #yiv0442300499 -- #yiv0442300499ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0442300499 #yiv0442300499ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0442300499 #yiv0442300499ygrp-mkp #yiv0442300499hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv0442300499 #yiv0442300499ygrp-mkp #yiv0442300499ads {margin-bottom:10px;}#yiv0442300499 #yiv0442300499ygrp-mkp .yiv0442300499ad {padding:0 0;}#yiv0442300499 #yiv0442300499ygrp-mkp .yiv0442300499ad p {margin:0;}#yiv0442300499 #yiv0442300499ygrp-mkp .yiv0442300499ad a {color:#0000ff;text-decoration:none;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ygrp-lc {font-family:Arial;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ygrp-lc #yiv0442300499hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ygrp-lc .yiv0442300499ad {margin-bottom:10px;padding:0 0;}#yiv0442300499 #yiv0442300499actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0442300499 #yiv0442300499activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0442300499 #yiv0442300499activity span {font-weight:700;}#yiv0442300499 #yiv0442300499activity span:first-child {text-transform:uppercase;}#yiv0442300499 #yiv0442300499activity span a {color:#5085b6;text-decoration:none;}#yiv0442300499 #yiv0442300499activity span span {color:#ff7900;}#yiv0442300499 #yiv0442300499activity span .yiv0442300499underline {text-decoration:underline;}#yiv0442300499 .yiv0442300499attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv0442300499 .yiv0442300499attach div a {text-decoration:none;}#yiv0442300499 .yiv0442300499attach img {border:none;padding-right:5px;}#yiv0442300499 .yiv0442300499attach label {display:block;margin-bottom:5px;}#yiv0442300499 .yiv0442300499attach label a {text-decoration:none;}#yiv0442300499 blockquote {margin:0 0 0 4px;}#yiv0442300499 .yiv0442300499bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv0442300499 .yiv0442300499bold a {text-decoration:none;}#yiv0442300499 dd.yiv0442300499last p a {font-family:Verdana;font-weight:700;}#yiv0442300499 dd.yiv0442300499last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0442300499 dd.yiv0442300499last p span.yiv0442300499yshortcuts {margin-right:0;}#yiv0442300499 div.yiv0442300499attach-table div div a {text-decoration:none;}#yiv0442300499 div.yiv0442300499attach-table {width:400px;}#yiv0442300499 div.yiv0442300499file-title a, #yiv0442300499 div.yiv0442300499file-title a:active, #yiv0442300499 div.yiv0442300499file-title a:hover, #yiv0442300499 div.yiv0442300499file-title a:visited {text-decoration:none;}#yiv0442300499 div.yiv0442300499photo-title a, #yiv0442300499 div.yiv0442300499photo-title a:active, #yiv0442300499 div.yiv0442300499photo-title a:hover, #yiv0442300499 div.yiv0442300499photo-title a:visited {text-decoration:none;}#yiv0442300499 div#yiv0442300499ygrp-mlmsg #yiv0442300499ygrp-msg p a span.yiv0442300499yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0442300499 .yiv0442300499green {color:#628c2a;}#yiv0442300499 .yiv0442300499MsoNormal {margin:0 0 0 0;}#yiv0442300499 o {font-size:0;}#yiv0442300499 #yiv0442300499photos div {float:left;width:72px;}#yiv0442300499 #yiv0442300499photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv0442300499 #yiv0442300499photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0442300499 #yiv0442300499reco-category {font-size:77%;}#yiv0442300499 #yiv0442300499reco-desc {font-size:77%;}#yiv0442300499 .yiv0442300499replbq {margin:4px;}#yiv0442300499 #yiv0442300499ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv0442300499 #yiv0442300499ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0442300499 #yiv0442300499ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0442300499 #yiv0442300499ygrp-mlmsg select, #yiv0442300499 input, #yiv0442300499 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv0442300499 #yiv0442300499ygrp-mlmsg pre, #yiv0442300499 code {font:115% monospace;}#yiv0442300499 #yiv0442300499ygrp-mlmsg * {line-height:1.22em;}#yiv0442300499 #yiv0442300499ygrp-mlmsg #yiv0442300499logo {padding-bottom:10px;}#yiv0442300499 #yiv0442300499ygrp-msg p a {font-family:Verdana;}#yiv0442300499 #yiv0442300499ygrp-msg p#yiv0442300499attach-count span {color:#1E66AE;font-weight:700;}#yiv0442300499 #yiv0442300499ygrp-reco #yiv0442300499reco-head {color:#ff7900;font-weight:700;}#yiv0442300499 #yiv0442300499ygrp-reco {margin-bottom:20px;padding:0px;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ov li a {font-size:130%;text-decoration:none;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv0442300499 #yiv0442300499ygrp-sponsor #yiv0442300499ov ul {margin:0;padding:0 0 0 8px;}#yiv0442300499 #yiv0442300499ygrp-text {font-family:Georgia;}#yiv0442300499 #yiv0442300499ygrp-text p {margin:0 0 1em 0;}#yiv0442300499 #yiv0442300499ygrp-text tt {font-size:120%;}#yiv0442300499 #yiv0442300499ygrp-vital ul li:last-child {border-right:none !important;}#yiv0442300499

[Giuseppe Vitillaro [e-mail] [hercules-os380]]

Post by ***@yahoo.com [hercules-os380]
Hi folks;
I am having a bit of blues trying to get my tape read. After I submit the job it asks me to mount the tape. I do devinit 400 tapes/asmxf.het; it says it initialized the tape, but a few minutes later I get mount pending again.
Here is my JCL.
//HERC01A JOB CLASS=A,MSGCLASS=A,REGION=0K
//S3 EXEC PGM=TAPEMAP
//* COND=(4,LT,LKED)
//STEPLIB DD DSN=HERC01.LOAD,DISP=SHR
//SYSPRNT2 DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD VOL=SER=ASMXF,DISP=OLD,UNIT=TAPE
//SYSTERM DD SYSOUT=*
//*
//
regards;
Rahim

I played a little bit with TAPEMAP, a while ago, so don't trust me
too much about it.

But I stil have the cataloged procedure saved in my SYS2.PROCLIB
I used with TAPEMAP, I took from the CBT tapes:

//TAPEMAP PROC SO='*',T1=TAPLST,UNT='TAPELIB',P=TAPEMAP,CC=
// DN='DUMMY',PRM=TEST
//* PRM=NOCHECK /* LOOKS GOOD */
//* $$$
//* $$$ AUTHOR: A. CASINGHINO
//* $$$ THIS PROC IS USED TO SCAN A TAPE TO GET INFORMATION
//* $$$ ON THE PHYSICAL TAPE
//* $$$
//* $$$ CBT1215 IS THE TAPE MAPPING PGM FROM UCLA VIA COMNET
//* $$$
//* $$$ CBT1215 WILL PROVIDE SPECIAL INFORMATION FOR TAPE FILES
//* $$$ CREATED BY IEBCOPY, IEHMOVE, IEBISAM, OR IEHDASDR.
//* $$$ IN ADDITION, IF A FILE CONTAINS AN
//* $$$ IEBUPDTE INPUT STREAM, THE MEMBER NAMES IN THE STREAM W
//* $$$ BE LISTED.
//* $$$
//* $$$ IF YOU ARE READING THIS OFF OF FILE 299 OF THE MVSMODS1
//* $$$ THEN ON THE PROC STATEMENT CHANGE
//* $$$ P=CBT1215 TO P=TAPEMAP
//* $$$
//* $$$ THE VALID PARMS ARE:
//* $$$ A. TEST
//* $$$ B. INLINE
//* $$$ C. NOMEMBERS
//* $$$ D. NOMEM
//* $$$ E. DEN1
//* $$$ F. NOATTR
//* $$$ G. NONOTE
//* $$$ I. NOCHECK
//* $$$ J. NOSCAN
//* $$$ K. NL
//* $$$ L. '' (NULL)
//* $$$
//CBT1215 EXEC PGM=&P.,REGION=512K,COND=&CC,
// PARM='&PRM.',TIME=1440
//SYSPRINT DD SYSOUT=&SO
//SYSPRNT2 DD SYSOUT=&SO
//SYSUT1 DD DSN=I.&DN,VOL=SER=(&T1),DISP=(OLD,PASS),
// LABEL=(1,BLP),UNIT=(&UNT,,DEFER)

and this is my TAPEMAP test jobs, which call the TAPEMAP proc:

//TAPEMAP JOB (001),'PEPPE',MSGLEVEL=(1,1),REGION=0K,
// MSGCLASS=X,CLASS=A,NOTIFY=&SYSUID
//MAP EXEC TAPEMAP,DN=ESPDTR,T1=ESPDTR

A MAP card like:

//MAP EXEC TAPEMAP,T1=MVSPTF

where T1 is ANY VOL=SER (it shouldn't really matter, as LABEL=(1,BLP)
bypass tape label check).

Just tested on one of my MVS3.8j and it works like a charm, storing
a nice tape map on my JES2 output queue.

I hope it helps, Peppe.

[Rahim Azizarab [e-mail] [hercules-os380]]

Thank you all for your replies.  I am glad to report that I got an output from Tapemap job.  I suspect the reason for the early job failures could be that I had no DSN specified.
The JCL that worked.

//HERC01A  JOB CLASS=A,MSGCLASS=A,REGION=0K                             
//S3       EXEC PGM=TAPEMAP                                             
***        COND=(4,LT,LKED)                                             
//STEPLIB  DD DSN=HERC01.LOAD,DISP=SHR                                  
//SYSPRNT2     DD      SYSOUT=*
//SYSPRINT DD SYSOUT=*                                                  
//SYSOUT   DD SYSOUT=*                                                  
//SYSIN    DD DUMMY                                                     
//SYSUT1   DD VOL=SER=(ASMXF,RETAIN),DISP=OLD,DSN=AAAPE,                
//            UNIT=TAPE,LABEL=(1,BLP)                                   
//SYSTERM  DD SYSOUT=*                                                  
***                                                                     


The job output




VOL=000901  OWNER=HERCULES       TAPE ANALYSIS PROGRAM   (T A P E M A P)        
--------------------------------------------------------------------------------
ASMXF.LOAD        (FILE 0001) WAS UNLOADED BY IEBCOPY...  WAS:  DSORG=PO   LRECL
               FOLLOWING MEMBERS UNLOADED:    
                   IFOX00    IFOX01    IFOX02    IFOX03    IFOX04    IFOX05    I
                   IFOX31    IFOX41    IFOX42    IFOX51    IFOX61    IFOX62   
********************************************************************************
ASMXF.PROCS       (FILE 0002) IS AN IEBUPDTE INPUT STREAM     
               FOLLOWING MEMBERS UNLOADED:    
                   A-ASMXC    A-ASMXCG   A-ASMXCL   A-ASMXCLG
********************************************************************************




regards;


Rahim

[Jon Perryman [e-mail] [hercules-os380]]

If you would have looked at the system log, you would have seen an error message that dismounts the tape because the volser did not match. BLP solved your problem and DSN had nothing to do with it. The system would have assigned a temp DSN which you would have seen in your job output. I suspect that tapemap does a single open which means PASS or RETAIN would be irrelevant (but they don't hurt). 

On Monday, October 22, 2018 6:10 PM, "Rahim Azizarab ***@yahoo.com [hercules-os380]" <hercules-***@yahoogroups.com> wrote:


  Thank you all for your replies.  I am glad to report that I got an output from Tapemap job.  I suspect the reason for the early job failures could be that I had no DSN specified.
The JCL that worked.

//HERC01A  JOB CLASS=A,MSGCLASS=A,REGION=0K                             
//S3       EXEC PGM=TAPEMAP                                             
***        COND=(4,LT,LKED)                                             
//STEPLIB  DD DSN=HERC01.LOAD,DISP=SHR           &! nbsp;                      
//SYSPRNT2     DD      SYSOUT=*
//SYSPRINT DD SYSOUT=*                                                  
//SYSOUT   DD SYSOUT=*                                                  
//SYSIN    DD DUMMY                                                     
//SYSUT1   DD VOL=SER=(ASMXF,RETAIN),DISP=OLD,DSN=AAAPE,                
//            UNIT=TAPE,LABEL=(1,BLP)                                   
//SYSTERM  DD SYSOUT=*                                                  
***      !                                                                


The job output




VOL=000901  OWNER=HERCULES       TAPE ANALYSIS PROGRAM   (T A P E M A P)        
--------------------------------------------------------------------------------
ASMXF.LOAD        (FILE 0001) WAS UNLOADED BY IEBCOPY...  WAS:  DSORG=PO   LRECL
               FOLLOWING MEMBERS UNLOADED:    
                   IFOX00    IFOX01    IFOX02    IFOX03    IFOX04    IFOX05    I
                   IFOX31    IFOX41    IFOX42    IFOX51    IFOX61    IFOX62   
************************! ********************************************************
ASMXF.PROCS       (FILE 0002) IS AN IEBUPDTE INPUT STREAM     
               FOLLOWING MEMBERS UNLOADED:    
                   A-ASMXC    A-ASMXCG   A-ASMXCL   A-ASMXCLG
********************************************************************************




regards;


Rahim
#yiv0235984223 #yiv0235984223 -- #yiv0235984223ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0235984223 #yiv0235984223ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0235984223 #yiv0235984223ygrp-mkp #yiv0235984223hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv0235984223 #yiv0235984223ygrp-mkp #yiv0235984223ads {margin-bottom:10px;}#yiv0235984223 #yiv0235984223ygrp-mkp .yiv0235984223ad {padding:0 0;}#yiv0235984223 #yiv0235984223ygrp-mkp .yiv0235984223ad p {margin:0;}#yiv0235984223 #yiv0235984223ygrp-mkp .yiv0235984223ad a {color:#0000ff;text-decoration:none;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ygrp-lc {font-family:Arial;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ygrp-lc #yiv0235984223hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ygrp-lc .yiv0235984223ad {margin-bottom:10px;padding:0 0;}#yiv0235984223 #yiv0235984223actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0235984223 #yiv0235984223activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0235984223 #yiv0235984223activity span {font-weight:700;}#yiv0235984223 #yiv0235984223activity span:first-child {text-transform:uppercase;}#yiv0235984223 #yiv0235984223activity span a {color:#5085b6;text-decoration:none;}#yiv0235984223 #yiv0235984223activity span span {color:#ff7900;}#yiv0235984223 #yiv0235984223activity span .yiv0235984223underline {text-decoration:underline;}#yiv0235984223 .yiv0235984223attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv0235984223 .yiv0235984223attach div a {text-decoration:none;}#yiv0235984223 .yiv0235984223attach img {border:none;padding-right:5px;}#yiv0235984223 .yiv0235984223attach label {display:block;margin-bottom:5px;}#yiv0235984223 .yiv0235984223attach label a {text-decoration:none;}#yiv0235984223 blockquote {margin:0 0 0 4px;}#yiv0235984223 .yiv0235984223bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv0235984223 .yiv0235984223bold a {text-decoration:none;}#yiv0235984223 dd.yiv0235984223last p a {font-family:Verdana;font-weight:700;}#yiv0235984223 dd.yiv0235984223last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0235984223 dd.yiv0235984223last p span.yiv0235984223yshortcuts {margin-right:0;}#yiv0235984223 div.yiv0235984223attach-table div div a {text-decoration:none;}#yiv0235984223 div.yiv0235984223attach-table {width:400px;}#yiv0235984223 div.yiv0235984223file-title a, #yiv0235984223 div.yiv0235984223file-title a:active, #yiv0235984223 div.yiv0235984223file-title a:hover, #yiv0235984223 div.yiv0235984223file-title a:visited {text-decoration:none;}#yiv0235984223 div.yiv0235984223photo-title a, #yiv0235984223 div.yiv0235984223photo-title a:active, #yiv0235984223 div.yiv0235984223photo-title a:hover, #yiv0235984223 div.yiv0235984223photo-title a:visited {text-decoration:none;}#yiv0235984223 div#yiv0235984223ygrp-mlmsg #yiv0235984223ygrp-msg p a span.yiv0235984223yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0235984223 .yiv0235984223green {color:#628c2a;}#yiv0235984223 .yiv0235984223MsoNormal {margin:0 0 0 0;}#yiv0235984223 o {font-size:0;}#yiv0235984223 #yiv0235984223photos div {float:left;width:72px;}#yiv0235984223 #yiv0235984223photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv0235984223 #yiv0235984223photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0235984223 #yiv0235984223reco-category {font-size:77%;}#yiv0235984223 #yiv0235984223reco-desc {font-size:77%;}#yiv0235984223 .yiv0235984223replbq {margin:4px;}#yiv0235984223 #yiv0235984223ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv0235984223 #yiv0235984223ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0235984223 #yiv0235984223ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0235984223 #yiv0235984223ygrp-mlmsg select, #yiv0235984223 input, #yiv0235984223 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv0235984223 #yiv0235984223ygrp-mlmsg pre, #yiv0235984223 code {font:115% monospace;}#yiv0235984223 #yiv0235984223ygrp-mlmsg * {line-height:1.22em;}#yiv0235984223 #yiv0235984223ygrp-mlmsg #yiv0235984223logo {padding-bottom:10px;}#yiv0235984223 #yiv0235984223ygrp-msg p a {font-family:Verdana;}#yiv0235984223 #yiv0235984223ygrp-msg p#yiv0235984223attach-count span {color:#1E66AE;font-weight:700;}#yiv0235984223 #yiv0235984223ygrp-reco #yiv0235984223reco-head {color:#ff7900;font-weight:700;}#yiv0235984223 #yiv0235984223ygrp-reco {margin-bottom:20px;padding:0px;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ov li a {font-size:130%;text-decoration:none;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv0235984223 #yiv0235984223ygrp-sponsor #yiv0235984223ov ul {margin:0;padding:0 0 0 8px;}#yiv0235984223 #yiv0235984223ygrp-text {font-family:Georgia;}#yiv0235984223 #yiv0235984223ygrp-text p {margin:0 0 1em 0;}#yiv0235984223 #yiv0235984223ygrp-text tt {font-size:120%;}#yiv0235984223 #yiv0235984223ygrp-vital ul li:last-child {border-right:none !important;}#yiv0235984223