Re: rename a dataset in acs routine?

2020-09-18 Thread Gibney, David Allen
JES exit 6

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Brian Westerman
> Sent: Friday, September 18, 2020 9:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: rename a dataset in acs routine?
> 
> They would like an approach that didn't include editing the thousands of JCL
> sets.
> 
> On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser
>  wrote:
> 
> >Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
> >Can use system symbols to generate the date and time in the JCL output
> DD.
> >
> >Brian
> >
> >
> >On Fri, 18 Sep 2020 at 15:36, Brian Westerman
> 
> >wrote:
> >
> >> Hi,
> >>
> >> I was asked a question today that I honestly don't know how to answer.
> >> The programmer has a (very large) series of jobs that generate fiche tapes
> >> that get created and have a expiration date but never are cataloged
> >> (because they all have exactly the same DSN).  So over time, they ended
> up
> >> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
> >> until expiration date.  Obviously, these are not the easiest datasets to
> >> use later because they need to look up the tape volser every time.
> >>
> >> The problem is that they want to know if there is a way to automatically
> >> catalog datasets at creation time, to which I told them we could, but only
> >> 1 of them because you can't catalog two datasets with the same name.
> But
> >> they want to have "the system" which I'm guessing is me :), dynamically
> >> rename these datasets at creation time to add a date and time, such as
> >> change HLQ.FICHE.TAPE to which I would dynamically make it
> >> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current
> time (if
> >> it was 11:23am).
> >>
> >> I can't think of a way to do that in an acs routine, or any other simple
> >> way, and I'm hoping that someone has an idea that might apply here.  I
> >> think I can alter almost anything about the dataset, except the name.  Is
> >> there something I am missing?
> >>
> >> Brian
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >>
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Paul Gilmartin
On Fri, 18 Sep 2020 23:05:04 -0500, Brian Westerman wrote:

>They would like an approach that didn't include editing the thousands of JCL 
>sets.
> 
Thousands!?  Not just one with parameters!?

The design is wrong.  It will remain broken until it's fixed.

Facing a similar requirement once, I appended a minimal data set
with a unique name to each tape and catalogued that.  I needed to
deceive the tape management system; something like EXPDT=99000.
I don't recall the details.  I might have needed VOL=REF,LABEL=(1,SL)
to get to the payload data sets.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
Actually I'm leaning towards the JES or SMF UJI exit as well.  File tailoring 
doesn't help in this case because most of the JCL doesn't get submitted via TSO.

Brian

On Fri, 18 Sep 2020 16:41:29 +, Seymour J Metz  wrote:

>Well, if they want to use a chainsaw to open a bag of peanuts, you could write 
>a JES exit, but the proper way to handle it is for the process that creates 
>the JCL to generate a unique name. If they're using ISPF it's super easy to do 
>it with File Tailoring, and many production control programs have similar 
>capabilities.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Brian Westerman 
Sent: Friday, September 18, 2020 3:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: rename a dataset in acs routine?

Hi,

I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
Changing the JCL is my preferred method, but they would like an "easier" way.  
Also, D09182020 is 9 characters, so would cause a JCL error.  But I understand 
what you meant. :)

Brian

 On Fri, 18 Sep 2020 16:37:30 +, Sasso, Len  wrote:

>
   //*
   //EXPORT   EXPORT SYMLIST=(MNTH,DY,YR) 
   //SETSYMBL SET MNTH=,DY=,YR=
   //*

HLQ.FICHE.TAPE.D  =  HLQ.FICHE.TAPE.D09182020


Thank You and�Please Be Safe!

Len Sasso
Systems Administrator Senior
CSRA, A General Dynamics Information Technology Company
327 Columbia TPKE
Rensselaer, NY 12144
Office Hours: M-F� 7 AM - 3:45 PM
Phone: (518) 257-4209
Cell: (518) 894-0879
Fax: (518) 257-4300
len.sa...@gdit.com
URL:�www.gdit.com

�



�






From: IBM Mainframe Discussion List  on behalf of 
Seymour J Metz 
Sent: Friday, September 18, 2020 12:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: rename a dataset in acs routine? 
�


�[External: Use caution with links & attachments]

Mike designed REXX as a programming language. JCL is not and was never intended 
to be a programming language. This is something that should be handled in the 
environment that creates and submits the JCL.


--
Shmuel (Seymour J.) Metz
https://urldefense.us/v3/__http://mason.gmu.edu/*smetz3__;fg!!JRQnnSFuzw7wjAKq6ti6!mkx1yaW-aw-3YqQyrzTWwpc4Xwrfp9G3-ZFVghxkJr8upxVCmr20Trud5LSTbQ$
 



From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Friday, September 18, 2020 8:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: rename a dataset in acs routine?

On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:

>Why can't his jobs generate dsns like� HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
>
I understand that system symbols are not supported in JCL DSNs because of
o ambiguity between EXECSYS and CNVTSYS
o queue latency -- the job might run at a time not matching the JCL symbols.

(If the actual date and time values are important I understand they
may be invalid because around midnight date and time might be
fetched on different days, resulting in a 23+ hour error.� Murphy
says this will only be a problem when it matters.� Rexx can do it
right; why can't JCL?)


>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>��� ...� So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>> until expiration date.
>>
>> The problem is that they want to know if there is a way to automatically
>> catalog datasets at creation time, to which I told them we could, but only
>> 1 of them because you can't catalog two datasets with the same name.� But
>> they want to have "the system" which I'm guessing is me :), dynamically
>> rename these datasets at creation time to add a date and time, such as
>> change HLQ.FICHE.TAPE to which I would dynamically make it
>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>> it was 11:23am).
>>
Use the seconds also, as D200917.T112359.� With thousands of entries
a collision is likely.� And use YYMMDD for the date for easy sorting of
displays.

Is it possible to rename a tape data set?� That would seem to require
overwriting the HDR1 label, but tapes can't be updated in place.

I'm imagining a sequence such as:

Momentarily catalog HLQ.FICHE.TAPE

DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
��� SYMBOLICRELATE HLQ.FICHE.TAPE

Uncatalog HLQ.FICHE.TAPE.� I understand that symbolic aliases
remain when the RELATED name is uncatalogued.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
I don't see that you can do that with tapes, the hdr1 won't match the new DSN.

On Fri, 18 Sep 2020 07:19:33 -0700, Sri h Kolusu  wrote:

>>The problem is that they want to know if there is a way to automatically
>catalog datasets at creation time, to which I told them we could, but only
>1 of them because you can't catalog two datasets with the same name.
>
>Generate the RENAME cards in the same program/JCL to rename the file from
>HLQ.FICHE.TAPE  to HLQ.FICHE.TAPE.Yccyy.Mmm.Ddd.Thhmmss
>
>Run those rename control cards thru IDCAMS in the same JCL
>
>
>Thannks,
>Kolusu
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
I agree, but that decision was made 30 years ago.

On Fri, 18 Sep 2020 15:28:40 +0300, Binyamin Dissen 
 wrote:

>On Fri, 18 Sep 2020 02:36:24 -0500 Brian Westerman
> wrote:
>
>:>I was asked a question today that I honestly don't know how to answer.  The 
>programmer has a (very large) series of jobs that generate fiche tapes that 
>get created and have a expiration date but never are cataloged (because they 
>all have exactly the same DSN).  So over time, they ended up with about 30,000 
>tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
>Obviously, these are not the easiest datasets to use later because they need 
>to look up the tape volser every time.
>
>:>The problem is that they want to know if there is a way to automatically 
>catalog datasets at creation time, to which I told them we could, but only 1 
>of them because you can't catalog two datasets with the same name.  But they 
>want to have "the system" which I'm guessing is me :), dynamically rename 
>these datasets at creation time to add a date and time, such as change 
>HLQ.FICHE.TAPE to which I would dynamically make it 
>HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if it 
>was 11:23am).
>
>:>I can't think of a way to do that in an acs routine, or any other simple 
>way, and I'm hoping that someone has an idea that might apply here.  I think I 
>can alter almost anything about the dataset, except the name.  Is there 
>something I am missing?
>
>That is what GDG's were built for.
>
>--
>Binyamin Dissen 
>http://www.dissensoftware.com
>
>Director, Dissen Software, Bar & Grill - Israel
>
>
>Should you use the mailblocks package and expect a response from me,
>you should preauthorize the dissensoftware.com domain.
>
>I very rarely bother responding to challenge/response systems,
>especially those from irresponsible companies.
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
dealing with the existing tapes is doable via a rexx exec that submits a series 
of IEBGENER, but it's the JCL that they want (preferably SMS) to deal with.
On Fri, 18 Sep 2020 07:12:15 -0500, Paul Gilmartin  wrote:

>On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:
>
>>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>>Can use system symbols to generate the date and time in the JCL output DD.
>> 
>I understand that system symbols are not supported in JCL DSNs because of
>o ambiguity between EXECSYS and CNVTSYS
>o queue latency -- the job might run at a time not matching the JCL symbols.
>
>(If the actual date and time values are important I understand they
>may be invalid because around midnight date and time might be
>fetched on different days, resulting in a 23+ hour error.  Murphy
>says this will only be a problem when it matters.  Rexx can do it
>right; why can't JCL?)
>
>
>>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>>...  So over time, they ended up
>>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>>> until expiration date. 
>>>
>>> The problem is that they want to know if there is a way to automatically
>>> catalog datasets at creation time, to which I told them we could, but only
>>> 1 of them because you can't catalog two datasets with the same name.  But
>>> they want to have "the system" which I'm guessing is me :), dynamically
>>> rename these datasets at creation time to add a date and time, such as
>>> change HLQ.FICHE.TAPE to which I would dynamically make it
>>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>>> it was 11:23am).
>>> 
>Use the seconds also, as D200917.T112359.  With thousands of entries
>a collision is likely.  And use YYMMDD for the date for easy sorting of
>displays.
>
>Is it possible to rename a tape data set?  That would seem to require
>overwriting the HDR1 label, but tapes can't be updated in place.
>
>I'm imagining a sequence such as:
>
>Momentarily catalog HLQ.FICHE.TAPE
>
>DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
>SYMBOLICRELATE HLQ.FICHE.TAPE
>
>Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases
>remain when the RELATED name is uncatalogued.
>
>-- gil
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
They would like an approach that didn't include editing the thousands of JCL 
sets.

On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser  wrote:

>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
>
>Brian
>
>
>On Fri, 18 Sep 2020 at 15:36, Brian Westerman 
>wrote:
>
>> Hi,
>>
>> I was asked a question today that I honestly don't know how to answer.
>> The programmer has a (very large) series of jobs that generate fiche tapes
>> that get created and have a expiration date but never are cataloged
>> (because they all have exactly the same DSN).  So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>> until expiration date.  Obviously, these are not the easiest datasets to
>> use later because they need to look up the tape volser every time.
>>
>> The problem is that they want to know if there is a way to automatically
>> catalog datasets at creation time, to which I told them we could, but only
>> 1 of them because you can't catalog two datasets with the same name.  But
>> they want to have "the system" which I'm guessing is me :), dynamically
>> rename these datasets at creation time to add a date and time, such as
>> change HLQ.FICHE.TAPE to which I would dynamically make it
>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>> it was 11:23am).
>>
>> I can't think of a way to do that in an acs routine, or any other simple
>> way, and I'm hoping that someone has an idea that might apply here.  I
>> think I can alter almost anything about the dataset, except the name.  Is
>> there something I am missing?
>>
>> Brian
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
I'm all for editing the JCL, but they say there are far too many to do at one 
time, (and not screw it up) 

n Fri, 18 Sep 2020 19:32:01 +1000, Greg Price  
wrote:

>On 2020-09-18 5:36 PM, Brian Westerman wrote:
>> would dynamically make it HLQ.FICHE.TAPE.D091720.T1123
>
>I don't suppose the hard-coded data set name can be changed to include
>dynamic system symbols in new low-level qualifiers which would be
>resolved to the current date and time?
>
>Cheers,
>Greg
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Mike Schwab
Renaming a tape?  The last 17 characters are on the label of the tape
so it must remain the same or any use will result in a Tape DSN name
mismatch.  You will also need to Update TMS, RMM, and any tape
management system that uses the data set name.  MUCH easier to just
create new tape correctly and copy old tapes to the revised name and
scratch the old tape.

On Fri, Sep 18, 2020 at 7:12 AM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:
>
> >Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
> >Can use system symbols to generate the date and time in the JCL output DD.
> >
> I understand that system symbols are not supported in JCL DSNs because of
> o ambiguity between EXECSYS and CNVTSYS
> o queue latency -- the job might run at a time not matching the JCL symbols.
>
> (If the actual date and time values are important I understand they
> may be invalid because around midnight date and time might be
> fetched on different days, resulting in a 23+ hour error.  Murphy
> says this will only be a problem when it matters.  Rexx can do it
> right; why can't JCL?)
>
>
> >On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
> >...  So over time, they ended up
> >> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
> >> until expiration date.
> >>
> >> The problem is that they want to know if there is a way to automatically
> >> catalog datasets at creation time, to which I told them we could, but only
> >> 1 of them because you can't catalog two datasets with the same name.  But
> >> they want to have "the system" which I'm guessing is me :), dynamically
> >> rename these datasets at creation time to add a date and time, such as
> >> change HLQ.FICHE.TAPE to which I would dynamically make it
> >> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
> >> it was 11:23am).
> >>
> Use the seconds also, as D200917.T112359.  With thousands of entries
> a collision is likely.  And use YYMMDD for the date for easy sorting of
> displays.
>
> Is it possible to rename a tape data set?  That would seem to require
> overwriting the HDR1 label, but tapes can't be updated in place.
>
> I'm imagining a sequence such as:
>
> Momentarily catalog HLQ.FICHE.TAPE
>
> DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
> SYMBOLICRELATE HLQ.FICHE.TAPE
>
> Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases
> remain when the RELATED name is uncatalogued.
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread Paul Gilmartin
On Fri, 18 Sep 2020 13:12:01 -0500, Wendell Lovewell wrote:

>Is there a way to get a mixed-case string substituted into SYSIN data using 
>"EXPORT SYMLIST=*" and the "DD *,SYMBOLS=(JCLONLY)" facility?
> 
Rules to remember:

o The JCL reader/converter/interpreter *always* takes SYSIN (SYSTSIN,SYSUT1,...)
  asis and never preforms case conversion.  This applies alike to the definition
  and replacement of symbols.

o You must check the documentation of the program that reads that SYSIN
  to know whether that program performs case conversion.

o FTP may regard apostrophes as protecting special characters in the
  enclosed strings; the apostrophes are not treated as part of the
  string's value.

o TSO has the *horrible* design feature of not always treating strings
  quoted with apostrophes asis.

o ISPF may treat commands entered on the command line asis or uppercase,
  depending on the panel definition.  I don't believe this is well documented.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread Wendell Lovewell
Well John, to risk stating the obvious, "You're a genius!" :)

Thanks a lot!

Wendell

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread Sasso, Len
---
//FTP  PROC 
   //* 
  //PS0010   EXEC PGM=FTP,REGION=6M   
  //SYSPRINT DD SYSOUT=*  
  //OUTPUT   DD SYSOUT=*  
  //* 
  //INPUTDD DUMMY 
  //* 
  //XMLFILE  DD DSN=SOMEFILE.XMIT,
  //DISP=(NEW,CATLG),...  
  //* 

How about using a DD Override?
 
  //JS0010   EXEC FTP
  //*
  //PS0010.INPUT DD *
  GET ht.jst0c1.xmi   //DD:XMIFILE   
  Quit   
  //*


Thank You and Please Be Safe!

Len Sasso
Systems Administrator Senior
CSRA, A General Dynamics Information Technology Company
327 Columbia TPKE
Rensselaer, NY 12144
len.sa...@gdit.com


From: IBM Mainframe Discussion List  on behalf of 
Barry Snoots 
Sent: Friday, September 18, 2020 2:42 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Substituting SYSIN variables via EXPORT SYMLIST containing 
mixed-case values 
 


 [External: Use caution with links & attachments]

Understood

-Original Message- 
From: John McKown
Sent: Friday, September 18, 2020 1:33 PM Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Substituting SYSIN variables via EXPORT SYMLIST containing 
mixed-case values

Try using 3 ticks.

FTPFILE='''lowercase'''

On Fri, Sep 18, 2020, 13:12 Wendell Lovewell <
01e9c0ee0673-dmarc-requ...@listserv.ua.edu> wrote:

> Is there a way to get a mixed-case string substituted into SYSIN data
> using "EXPORT SYMLIST=*" and the "DD *,SYMBOLS=(JCLONLY)" facility?
>
> I'm trying to download files from an FTP server to z/OS using a PROC
> similar to this:
>
> //*-
> //FTPTEST PROC FTPFILE=
> //*-
> //FTP EXEC PGM=FTP,REGION=4M
> //XMIFILE   DD  DSN=SOMEFILE.XMIT,
> //   DISP=(NEW,CATLG),...
> //*
> //INPUT    DD *,SYMBOLS=(JCLONLY)
> blah blah blah
> BINARY
> GET   //DD:XMIFILE
> QUIT
> /*
> // PEND
>
> Without the EXPORT SYMLIST=*,  doesn't get replaced in the SYSIN:
>
> EZA1460I Command:
> EZA1736I GET   //DD:XMIFILE
> EZA1701I >>> RETR 
> 550 : No such file or directory
>
>
> So with it added:
>
> //*---
> //FTPTEST PROC FTPFILE=
> //EXP    EXPORT SYMLIST=*
> // SET   FTPFID=
> //FTP
> ...
> ...and the GET changed to:
> GET   //DD:XMIFILE
>
> With a lower-case value in FTPFILE, the job errors out with a JCL problem
> before it starts:
>
> //FTPTEST EXEC PROC=FTPTEST,
> // FTPFILE='ht.jst0c1.xmi'
>
> In the joblog:
>    5 XX  SET    FTPFID=
>  IEFC653I SUBSTITUTION JCL - FTPFID=ht.jst0c1.xmi
>   ...
> And:
>    5 IEFC620I UNIDENTIFIABLE CHARACTER h ON THE SET STATEMENT
>    5 IEFC620I UNIDENTIFIABLE CHARACTER t ON THE SET STATEMENT
>    5 IEFC620I UNIDENTIFIABLE CHARACTER j ON THE SET STATEMENT
>  ..
>
>
> Although with an upper-case FTP file name:
>
> //FTPTEST EXEC PROC=FTPTEST,
> // FTPFILE='HT.JST0C1.XMI'
>
> The job runs, but of course that file doesn't exist on the FTP server so
> the RETR fails:
>
> EZA1701I >>> RETR HT.JST0C1.XMI
> 550 HT.JST0C1.XMI: No such file or directory
>
>
>
> If you try changing the SET for FTPFID in the PROC to allow lower-case by
> using apostrophes:
> //  SET    FTPFID=''
> ...that passes the string  as-is and the RETR fails:
>
> EZA1701I >>> RETR 
> 550 : No such file or directory
>
>
> So, is there any way to get the  in the GET command to be replaced
> with a mixed-case value?
>
> TIA,
> Wendell
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Seymour J Metz
Yes, and NOPROT should be used only until you clean up the code, but at least 
IBM no longer has nonrefreshable code in the LPA.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of Joe 
Monk 
Sent: Friday, September 18, 2020 3:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Searching MLPA module

"The MLPA is read-only, unless NOPROT is specified on the MLPA system
parameter."

So, the default is read-only.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieae100/mlpae.htm

Joe

On Fri, Sep 18, 2020 at 1:43 PM Seymour J Metz  wrote:

> The MLPA is key zero and it's bad form to put nonrefreshable code there,
> but it is not always read only. Unlike PLPA, it is subject to page out.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Joe Monk 
> Sent: Friday, September 18, 2020 12:55 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Searching MLPA module
>
> Thats incorrect.  MLPA is read only.
>
> Joe
>
> On Fri, Sep 18, 2020 at 9:42 AM Itschak Mugzach <
> 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > MLPA is in CSA and is modifiable while lpa is read only.
> >
> > בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:
> >
> > > Apology for being ingorant .. if LPA and MLPA are same then why are
> they
> > > being placed in a different parmlibs ? Aren't any difference between
> MLPA
> > > and LPA ?
> > >
> > > On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
> > >
> > > > We have a MLPA module from adabas which got loaded But we aren't able
> > to
> > > > trace from which dataset it was loaded.
> > > >
> > > > Is there a way to know the dataset name from which or where it is
> > saved ?
> > > >
> > > > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > > > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> > > >
> > > >> Peter,
> > > >>
> > > >> There are some 3rd party products that load modules to modified LPA
> > (CSA
> > > >> or
> > > >> ECSA) as they start. They do it dynamically so if they don't start,
> > you
> > > >> save the storage.
> > > >>
> > > >> ITschak
> > > >>
> > > >> *| **Itschak Mugzach | Director | SecuriTeam Software **|**
> IronSphere
> > > >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> > > zLinux
> > > >> and IBM I **|  *
> > > >>
> > > >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522
> 986404
> > > >> **|*
> > > >> *Skype**: ItschakMugzach **|* *Web**:
> http://secure-web.cisco.com/1uYnAuN5Ol9abEOzh6GC-P1tZbk86urrVNMwVjYQIOlgTTKT4QSFQUFWraW13edzSO87wcJpA_vlV83vjhQ6pNhwF_TPNNPinlw5-2OILY5iiPF6DCNEZf4V-snl77CC0ryDjJKX1IXqCSzVhmJyKDOHkeEPJVg5n3quERi5iKXNa8lPNRGG-nmnINU7l5ZqjQng3vMroYdM7NK9E6v8PUHuVZI_x-Os9BGacDvzUahCMk5zMagXS8ROJaZQrz6y5-pGJViFEhcRs27I7fmMZLvNqMg6NpG-7hBpElMxKW6HcMnUxUawEKd8vBATe_5Yk6i8ofPMrlUQJgXqbkyA_tdm5NN2iHk0LTeqaqQLvNDvmGIHfZWuID3FID6Syv2zm4lihXQEkcf_AZEnOmVCu2hkzgEziOHKxVOokp5hlF5Gs2Y3jvSeTxRhvRxd67TM9/http%3A%2F%2Fwww.Securiteam.co.il
> **|*
> > > >>
> > > >>
> > > >>
> > > >>
> > > >>
> > > >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson 
> > wrote:
> > > >>
> > > >> > 
> > > >> > Is there any utility which can help to search the loaded MLPA
> > module ?
> > > >> > 
> > > >> > What do you mean by "search the loaded MLPA module"?
> > > >> >
> > > >> > A program can use CSVQUERY to locate the address of a module in
> LPA
> > > >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use
> LOAD
> > > and
> > > >> > then DELETE (CSVQUERY typically has less overhead than that pair
> of
> > > >> > operations).
> > > >> >
> > > >> > 
> > > >> > We have a product which loads via MLPA and we just trying to
> > > understand
> > > >> if
> > > >> > it's possible to load it dynamically without the need of IPL
> > > >> > 
> > > >> > I do not understand this sentence either. Nothing loads "via
> MLPA".
> > > Some
> > > >> > things might require that their parts be in LPA. Is that what you
> > > meant?
> > > >> > If a program wants to put module(s) into LPA it can use the
> CSVDYLPA
> > > >> > macro. If a customer wants to put module(s) in LPA it can use the
> > LPA
> > > >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> > > >> >
> > > >> >
> > > >> > Peter Relson
> > > >> > z/OS Core Technology Design
> > > >> >
> > > >> >
> > > >> >
> > --
> > > >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > >> > send email to lists...@listserv.ua.edu with the message: INFO
> > > IBM-MAIN
> > > >> >
> > > >>
> > > >>
> --
> > > >> For IBM-MAIN subscribe / signoff / archive access instructions,
> > > >> send email to lists...@listserv.ua.edu with the message: INFO
> > IBM-MAIN
> > > >>
> > > >
> > >
> > > 

Re: Searching MLPA module

2020-09-18 Thread Joe Monk
"The MLPA is read-only, unless NOPROT is specified on the MLPA system
parameter."

So, the default is read-only.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieae100/mlpae.htm

Joe

On Fri, Sep 18, 2020 at 1:43 PM Seymour J Metz  wrote:

> The MLPA is key zero and it's bad form to put nonrefreshable code there,
> but it is not always read only. Unlike PLPA, it is subject to page out.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Joe Monk 
> Sent: Friday, September 18, 2020 12:55 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Searching MLPA module
>
> Thats incorrect.  MLPA is read only.
>
> Joe
>
> On Fri, Sep 18, 2020 at 9:42 AM Itschak Mugzach <
> 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > MLPA is in CSA and is modifiable while lpa is read only.
> >
> > בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:
> >
> > > Apology for being ingorant .. if LPA and MLPA are same then why are
> they
> > > being placed in a different parmlibs ? Aren't any difference between
> MLPA
> > > and LPA ?
> > >
> > > On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
> > >
> > > > We have a MLPA module from adabas which got loaded But we aren't able
> > to
> > > > trace from which dataset it was loaded.
> > > >
> > > > Is there a way to know the dataset name from which or where it is
> > saved ?
> > > >
> > > > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > > > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> > > >
> > > >> Peter,
> > > >>
> > > >> There are some 3rd party products that load modules to modified LPA
> > (CSA
> > > >> or
> > > >> ECSA) as they start. They do it dynamically so if they don't start,
> > you
> > > >> save the storage.
> > > >>
> > > >> ITschak
> > > >>
> > > >> *| **Itschak Mugzach | Director | SecuriTeam Software **|**
> IronSphere
> > > >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> > > zLinux
> > > >> and IBM I **|  *
> > > >>
> > > >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522
> 986404
> > > >> **|*
> > > >> *Skype**: ItschakMugzach **|* *Web**:
> http://secure-web.cisco.com/1uYnAuN5Ol9abEOzh6GC-P1tZbk86urrVNMwVjYQIOlgTTKT4QSFQUFWraW13edzSO87wcJpA_vlV83vjhQ6pNhwF_TPNNPinlw5-2OILY5iiPF6DCNEZf4V-snl77CC0ryDjJKX1IXqCSzVhmJyKDOHkeEPJVg5n3quERi5iKXNa8lPNRGG-nmnINU7l5ZqjQng3vMroYdM7NK9E6v8PUHuVZI_x-Os9BGacDvzUahCMk5zMagXS8ROJaZQrz6y5-pGJViFEhcRs27I7fmMZLvNqMg6NpG-7hBpElMxKW6HcMnUxUawEKd8vBATe_5Yk6i8ofPMrlUQJgXqbkyA_tdm5NN2iHk0LTeqaqQLvNDvmGIHfZWuID3FID6Syv2zm4lihXQEkcf_AZEnOmVCu2hkzgEziOHKxVOokp5hlF5Gs2Y3jvSeTxRhvRxd67TM9/http%3A%2F%2Fwww.Securiteam.co.il
> **|*
> > > >>
> > > >>
> > > >>
> > > >>
> > > >>
> > > >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson 
> > wrote:
> > > >>
> > > >> > 
> > > >> > Is there any utility which can help to search the loaded MLPA
> > module ?
> > > >> > 
> > > >> > What do you mean by "search the loaded MLPA module"?
> > > >> >
> > > >> > A program can use CSVQUERY to locate the address of a module in
> LPA
> > > >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use
> LOAD
> > > and
> > > >> > then DELETE (CSVQUERY typically has less overhead than that pair
> of
> > > >> > operations).
> > > >> >
> > > >> > 
> > > >> > We have a product which loads via MLPA and we just trying to
> > > understand
> > > >> if
> > > >> > it's possible to load it dynamically without the need of IPL
> > > >> > 
> > > >> > I do not understand this sentence either. Nothing loads "via
> MLPA".
> > > Some
> > > >> > things might require that their parts be in LPA. Is that what you
> > > meant?
> > > >> > If a program wants to put module(s) into LPA it can use the
> CSVDYLPA
> > > >> > macro. If a customer wants to put module(s) in LPA it can use the
> > LPA
> > > >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> > > >> >
> > > >> >
> > > >> > Peter Relson
> > > >> > z/OS Core Technology Design
> > > >> >
> > > >> >
> > > >> >
> > --
> > > >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > >> > send email to lists...@listserv.ua.edu with the message: INFO
> > > IBM-MAIN
> > > >> >
> > > >>
> > > >>
> --
> > > >> For IBM-MAIN subscribe / signoff / archive access instructions,
> > > >> send email to lists...@listserv.ua.edu with the message: INFO
> > IBM-MAIN
> > > >>
> > > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to 

Re: Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread Barry Snoots

Understood

-Original Message- 
From: John McKown

Sent: Friday, September 18, 2020 1:33 PM Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Substituting SYSIN variables via EXPORT SYMLIST containing 
mixed-case values


Try using 3 ticks.

FTPFILE='''lowercase'''

On Fri, Sep 18, 2020, 13:12 Wendell Lovewell <
01e9c0ee0673-dmarc-requ...@listserv.ua.edu> wrote:


Is there a way to get a mixed-case string substituted into SYSIN data
using "EXPORT SYMLIST=*" and the "DD *,SYMBOLS=(JCLONLY)" facility?

I'm trying to download files from an FTP server to z/OS using a PROC
similar to this:

//*-
//FTPTEST PROC FTPFILE=
//*-
//FTP EXEC PGM=FTP,REGION=4M
//XMIFILE   DD  DSN=SOMEFILE.XMIT,
//   DISP=(NEW,CATLG),...
//*
//INPUTDD *,SYMBOLS=(JCLONLY)
blah blah blah
BINARY
GET   //DD:XMIFILE
QUIT
/*
// PEND

Without the EXPORT SYMLIST=*,  doesn't get replaced in the SYSIN:

EZA1460I Command:
EZA1736I GET   //DD:XMIFILE
EZA1701I >>> RETR 
550 : No such file or directory


So with it added:

//*---
//FTPTEST PROC FTPFILE=
//EXPEXPORT SYMLIST=*
// SET   FTPFID=
//FTP
...
...and the GET changed to:
GET   //DD:XMIFILE

With a lower-case value in FTPFILE, the job errors out with a JCL problem
before it starts:

//FTPTEST EXEC PROC=FTPTEST,
// FTPFILE='ht.jst0c1.xmi'

In the joblog:
   5 XX  SETFTPFID=
 IEFC653I SUBSTITUTION JCL - FTPFID=ht.jst0c1.xmi
  ...
And:
   5 IEFC620I UNIDENTIFIABLE CHARACTER h ON THE SET STATEMENT
   5 IEFC620I UNIDENTIFIABLE CHARACTER t ON THE SET STATEMENT
   5 IEFC620I UNIDENTIFIABLE CHARACTER j ON THE SET STATEMENT
 ..


Although with an upper-case FTP file name:

//FTPTEST EXEC PROC=FTPTEST,
// FTPFILE='HT.JST0C1.XMI'

The job runs, but of course that file doesn't exist on the FTP server so
the RETR fails:

EZA1701I >>> RETR HT.JST0C1.XMI
550 HT.JST0C1.XMI: No such file or directory



If you try changing the SET for FTPFID in the PROC to allow lower-case by
using apostrophes:
//  SETFTPFID=''
...that passes the string  as-is and the RETR fails:

EZA1701I >>> RETR 
550 : No such file or directory


So, is there any way to get the  in the GET command to be replaced
with a mixed-case value?

TIA,
Wendell

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Seymour J Metz
The MLPA is key zero and it's bad form to put nonrefreshable code there, but it 
is not always read only. Unlike PLPA, it is subject to page out.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of Joe 
Monk 
Sent: Friday, September 18, 2020 12:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Searching MLPA module

Thats incorrect.  MLPA is read only.

Joe

On Fri, Sep 18, 2020 at 9:42 AM Itschak Mugzach <
0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:

> MLPA is in CSA and is modifiable while lpa is read only.
>
> בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:
>
> > Apology for being ingorant .. if LPA and MLPA are same then why are they
> > being placed in a different parmlibs ? Aren't any difference between MLPA
> > and LPA ?
> >
> > On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
> >
> > > We have a MLPA module from adabas which got loaded But we aren't able
> to
> > > trace from which dataset it was loaded.
> > >
> > > Is there a way to know the dataset name from which or where it is
> saved ?
> > >
> > > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> > >
> > >> Peter,
> > >>
> > >> There are some 3rd party products that load modules to modified LPA
> (CSA
> > >> or
> > >> ECSA) as they start. They do it dynamically so if they don't start,
> you
> > >> save the storage.
> > >>
> > >> ITschak
> > >>
> > >> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
> > >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> > zLinux
> > >> and IBM I **|  *
> > >>
> > >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404
> > >> **|*
> > >> *Skype**: ItschakMugzach **|* *Web**: 
> > >> http://secure-web.cisco.com/1uYnAuN5Ol9abEOzh6GC-P1tZbk86urrVNMwVjYQIOlgTTKT4QSFQUFWraW13edzSO87wcJpA_vlV83vjhQ6pNhwF_TPNNPinlw5-2OILY5iiPF6DCNEZf4V-snl77CC0ryDjJKX1IXqCSzVhmJyKDOHkeEPJVg5n3quERi5iKXNa8lPNRGG-nmnINU7l5ZqjQng3vMroYdM7NK9E6v8PUHuVZI_x-Os9BGacDvzUahCMk5zMagXS8ROJaZQrz6y5-pGJViFEhcRs27I7fmMZLvNqMg6NpG-7hBpElMxKW6HcMnUxUawEKd8vBATe_5Yk6i8ofPMrlUQJgXqbkyA_tdm5NN2iHk0LTeqaqQLvNDvmGIHfZWuID3FID6Syv2zm4lihXQEkcf_AZEnOmVCu2hkzgEziOHKxVOokp5hlF5Gs2Y3jvSeTxRhvRxd67TM9/http%3A%2F%2Fwww.Securiteam.co.il
> > >>   **|*
> > >>
> > >>
> > >>
> > >>
> > >>
> > >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson 
> wrote:
> > >>
> > >> > 
> > >> > Is there any utility which can help to search the loaded MLPA
> module ?
> > >> > 
> > >> > What do you mean by "search the loaded MLPA module"?
> > >> >
> > >> > A program can use CSVQUERY to locate the address of a module in LPA
> > >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD
> > and
> > >> > then DELETE (CSVQUERY typically has less overhead than that pair of
> > >> > operations).
> > >> >
> > >> > 
> > >> > We have a product which loads via MLPA and we just trying to
> > understand
> > >> if
> > >> > it's possible to load it dynamically without the need of IPL
> > >> > 
> > >> > I do not understand this sentence either. Nothing loads "via MLPA".
> > Some
> > >> > things might require that their parts be in LPA. Is that what you
> > meant?
> > >> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> > >> > macro. If a customer wants to put module(s) in LPA it can use the
> LPA
> > >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> > >> >
> > >> >
> > >> > Peter Relson
> > >> > z/OS Core Technology Design
> > >> >
> > >> >
> > >> >
> --
> > >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > >> > send email to lists...@listserv.ua.edu with the message: INFO
> > IBM-MAIN
> > >> >
> > >>
> > >> --
> > >> For IBM-MAIN subscribe / signoff / archive access instructions,
> > >> send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > >>
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread John McKown
Try using 3 ticks.

FTPFILE='''lowercase'''

On Fri, Sep 18, 2020, 13:12 Wendell Lovewell <
01e9c0ee0673-dmarc-requ...@listserv.ua.edu> wrote:

> Is there a way to get a mixed-case string substituted into SYSIN data
> using "EXPORT SYMLIST=*" and the "DD *,SYMBOLS=(JCLONLY)" facility?
>
> I'm trying to download files from an FTP server to z/OS using a PROC
> similar to this:
>
> //*-
> //FTPTEST PROC FTPFILE=
> //*-
> //FTP EXEC PGM=FTP,REGION=4M
> //XMIFILE   DD  DSN=SOMEFILE.XMIT,
> //   DISP=(NEW,CATLG),...
> //*
> //INPUTDD *,SYMBOLS=(JCLONLY)
> blah blah blah
> BINARY
> GET   //DD:XMIFILE
> QUIT
> /*
> // PEND
>
> Without the EXPORT SYMLIST=*,  doesn't get replaced in the SYSIN:
>
> EZA1460I Command:
> EZA1736I GET   //DD:XMIFILE
> EZA1701I >>> RETR 
> 550 : No such file or directory
>
>
> So with it added:
>
> //*---
> //FTPTEST PROC FTPFILE=
> //EXPEXPORT SYMLIST=*
> // SET   FTPFID=
> //FTP
> ...
> ...and the GET changed to:
> GET   //DD:XMIFILE
>
> With a lower-case value in FTPFILE, the job errors out with a JCL problem
> before it starts:
>
> //FTPTEST EXEC PROC=FTPTEST,
> // FTPFILE='ht.jst0c1.xmi'
>
> In the joblog:
>5 XX  SETFTPFID=
>  IEFC653I SUBSTITUTION JCL - FTPFID=ht.jst0c1.xmi
>   ...
> And:
>5 IEFC620I UNIDENTIFIABLE CHARACTER h ON THE SET STATEMENT
>5 IEFC620I UNIDENTIFIABLE CHARACTER t ON THE SET STATEMENT
>5 IEFC620I UNIDENTIFIABLE CHARACTER j ON THE SET STATEMENT
>  ..
>
>
> Although with an upper-case FTP file name:
>
> //FTPTEST EXEC PROC=FTPTEST,
> // FTPFILE='HT.JST0C1.XMI'
>
> The job runs, but of course that file doesn't exist on the FTP server so
> the RETR fails:
>
> EZA1701I >>> RETR HT.JST0C1.XMI
> 550 HT.JST0C1.XMI: No such file or directory
>
>
>
> If you try changing the SET for FTPFID in the PROC to allow lower-case by
> using apostrophes:
> //  SETFTPFID=''
> ...that passes the string  as-is and the RETR fails:
>
> EZA1701I >>> RETR 
> 550 : No such file or directory
>
>
> So, is there any way to get the  in the GET command to be replaced
> with a mixed-case value?
>
> TIA,
> Wendell
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Substituting SYSIN variables via EXPORT SYMLIST containing mixed-case values

2020-09-18 Thread Wendell Lovewell
Is there a way to get a mixed-case string substituted into SYSIN data using 
"EXPORT SYMLIST=*" and the "DD *,SYMBOLS=(JCLONLY)" facility?

I'm trying to download files from an FTP server to z/OS using a PROC similar to 
this:

//*-
//FTPTEST PROC FTPFILE=
//*-
//FTP EXEC PGM=FTP,REGION=4M
//XMIFILE   DD  DSN=SOMEFILE.XMIT,
//   DISP=(NEW,CATLG),...
//*
//INPUTDD *,SYMBOLS=(JCLONLY)
blah blah blah
BINARY
GET   //DD:XMIFILE
QUIT
/*
// PEND

Without the EXPORT SYMLIST=*,  doesn't get replaced in the SYSIN:

EZA1460I Command:
EZA1736I GET   //DD:XMIFILE
EZA1701I >>> RETR 
550 : No such file or directory


So with it added:

//*---
//FTPTEST PROC FTPFILE=
//EXPEXPORT SYMLIST=*
// SET   FTPFID=
//FTP
...
...and the GET changed to:
GET   //DD:XMIFILE

With a lower-case value in FTPFILE, the job errors out with a JCL problem 
before it starts:

//FTPTEST EXEC PROC=FTPTEST,
// FTPFILE='ht.jst0c1.xmi'

In the joblog:
   5 XX  SETFTPFID=
 IEFC653I SUBSTITUTION JCL - FTPFID=ht.jst0c1.xmi
  ...
And:
   5 IEFC620I UNIDENTIFIABLE CHARACTER h ON THE SET STATEMENT
   5 IEFC620I UNIDENTIFIABLE CHARACTER t ON THE SET STATEMENT
   5 IEFC620I UNIDENTIFIABLE CHARACTER j ON THE SET STATEMENT
 ..


Although with an upper-case FTP file name:

//FTPTEST EXEC PROC=FTPTEST,
// FTPFILE='HT.JST0C1.XMI'

The job runs, but of course that file doesn't exist on the FTP server so the 
RETR fails:

EZA1701I >>> RETR HT.JST0C1.XMI
550 HT.JST0C1.XMI: No such file or directory



If you try changing the SET for FTPFID in the PROC to allow lower-case by using 
apostrophes:
//  SETFTPFID=''
...that passes the string  as-is and the RETR fails:

EZA1701I >>> RETR 
550 : No such file or directory


So, is there any way to get the  in the GET command to be replaced with 
a mixed-case value?

TIA, 
Wendell

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Mark Jacobs
By default, yes. OP can specify the NOPROT option on the MLPA=xx specification 
in IEASYSxx.

Mark Jacobs

Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com

‐‐‐ Original Message ‐‐‐
On Friday, September 18, 2020 12:55 PM, Joe Monk  wrote:

> Thats incorrect. MLPA is read only.
>
> Joe
>
> On Fri, Sep 18, 2020 at 9:42 AM Itschak Mugzach <
> 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > MLPA is in CSA and is modifiable while lpa is read only.
> > בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏dbajava...@gmail.com:
> >
> > > Apology for being ingorant .. if LPA and MLPA are same then why are they
> > > being placed in a different parmlibs ? Aren't any difference between MLPA
> > > and LPA ?
> > > On Fri, 18 Sep, 2020, 5:56 pm Peter, dbajava...@gmail.com wrote:
> > >
> > > > We have a MLPA module from adabas which got loaded But we aren't able
> > > > to
> > >
> > > > trace from which dataset it was loaded.
> > > > Is there a way to know the dataset name from which or where it is
> > > > saved ?
> > >
> > > > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > > > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> > > >
> > > > > Peter,
> > > > > There are some 3rd party products that load modules to modified LPA
> > > > > (CSA
> > >
> > > > > or
> > > > > ECSA) as they start. They do it dynamically so if they don't start,
> > > > > you
> > >
> > > > > save the storage.
> > > > > ITschak
> > > > > *| *Itschak Mugzach | Director | SecuriTeam Software | IronSphere
> > > > > Platform | *Information Security Continuous Monitoring for Z/OS,zLinux
> > > >
> > > > > and IBM I **| *
> > > > > | Email*: i_mugz...@securiteam.co.il | Mob: +972 522 986404
> > > > > |
> > > > >
> > > > > Skype: ItschakMugzach | Web: www.Securiteam.co.il *|On Fri, Sep 18, 
> > > > > 2020 at 3:06 PM Peter Relson rel...@us.ibm.com
> > > > > wrote:
> > >
> > > > > > 
> > > > > > Is there any utility which can help to search the loaded MLPA
> > > > > > module ?
> > >
> > > > > > 
> > > > > > What do you mean by "search the loaded MLPA module"?
> > > > > > A program can use CSVQUERY to locate the address of a module in LPA
> > > > > > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD
> > > > > > and
> > > >
> > > > > > then DELETE (CSVQUERY typically has less overhead than that pair of
> > > > > > operations).
> > > > > > 
> > > > > > We have a product which loads via MLPA and we just trying to
> > > > > > understand
> > > >
> > > > > if
> > > > >
> > > > > > it's possible to load it dynamically without the need of IPL
> > > > > > 
> > > > > > I do not understand this sentence either. Nothing loads "via MLPA".
> > > > > > Some
> > > >
> > > > > > things might require that their parts be in LPA. Is that what you
> > > > > > meant?
> > > >
> > > > > > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> > > > > > macro. If a customer wants to put module(s) in LPA it can use the
> > > > > > LPA
> > >
> > > > > > statement of the PROGxx parmlib member or the SETPROG LPA command.
> > > > > > Peter Relson
> > > > > > z/OS Core Technology Design
> >
> > > > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > > > send email to lists...@listserv.ua.edu with the message: INFO
> > > > > > IBM-MAIN
> > > >
> > > > > >
> > > > >
> > > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > > send email to lists...@listserv.ua.edu with the message: INFO
> > > > > IBM-MAIN
> > >
> > > > >
> > >
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Joe Monk
Thats incorrect.  MLPA is read only.

Joe

On Fri, Sep 18, 2020 at 9:42 AM Itschak Mugzach <
0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:

> MLPA is in CSA and is modifiable while lpa is read only.
>
> בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:
>
> > Apology for being ingorant .. if LPA and MLPA are same then why are they
> > being placed in a different parmlibs ? Aren't any difference between MLPA
> > and LPA ?
> >
> > On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
> >
> > > We have a MLPA module from adabas which got loaded But we aren't able
> to
> > > trace from which dataset it was loaded.
> > >
> > > Is there a way to know the dataset name from which or where it is
> saved ?
> > >
> > > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> > >
> > >> Peter,
> > >>
> > >> There are some 3rd party products that load modules to modified LPA
> (CSA
> > >> or
> > >> ECSA) as they start. They do it dynamically so if they don't start,
> you
> > >> save the storage.
> > >>
> > >> ITschak
> > >>
> > >> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
> > >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> > zLinux
> > >> and IBM I **|  *
> > >>
> > >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404
> > >> **|*
> > >> *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*
> > >>
> > >>
> > >>
> > >>
> > >>
> > >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson 
> wrote:
> > >>
> > >> > 
> > >> > Is there any utility which can help to search the loaded MLPA
> module ?
> > >> > 
> > >> > What do you mean by "search the loaded MLPA module"?
> > >> >
> > >> > A program can use CSVQUERY to locate the address of a module in LPA
> > >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD
> > and
> > >> > then DELETE (CSVQUERY typically has less overhead than that pair of
> > >> > operations).
> > >> >
> > >> > 
> > >> > We have a product which loads via MLPA and we just trying to
> > understand
> > >> if
> > >> > it's possible to load it dynamically without the need of IPL
> > >> > 
> > >> > I do not understand this sentence either. Nothing loads "via MLPA".
> > Some
> > >> > things might require that their parts be in LPA. Is that what you
> > meant?
> > >> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> > >> > macro. If a customer wants to put module(s) in LPA it can use the
> LPA
> > >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> > >> >
> > >> >
> > >> > Peter Relson
> > >> > z/OS Core Technology Design
> > >> >
> > >> >
> > >> >
> --
> > >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > >> > send email to lists...@listserv.ua.edu with the message: INFO
> > IBM-MAIN
> > >> >
> > >>
> > >> --
> > >> For IBM-MAIN subscribe / signoff / archive access instructions,
> > >> send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > >>
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Allan Staller
Classification: HCL Internal

See my earlier. IMO, the answer is Not Possible

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Brian Westerman
Sent: Friday, September 18, 2020 2:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: rename a dataset in acs routine?

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don’t click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Hi,

I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Seymour J Metz
Well, if they want to use a chainsaw to open a bag of peanuts, you could write 
a JES exit, but the proper way to handle it is for the process that creates the 
JCL to generate a unique name. If they're using ISPF it's super easy to do it 
with File Tailoring, and many production control programs have similar 
capabilities.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Brian Westerman 
Sent: Friday, September 18, 2020 3:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: rename a dataset in acs routine?

Hi,

I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Sasso, Len

   //*
   //EXPORT   EXPORT SYMLIST=(MNTH,DY,YR) 
   //SETSYMBL SET MNTH=,DY=,YR=
   //*

HLQ.FICHE.TAPE.D  =  HLQ.FICHE.TAPE.D09182020


Thank You and Please Be Safe!

Len Sasso
Systems Administrator Senior
CSRA, A General Dynamics Information Technology Company
327 Columbia TPKE
Rensselaer, NY 12144
Office Hours: M-F  7 AM - 3:45 PM
Phone: (518) 257-4209
Cell: (518) 894-0879
Fax: (518) 257-4300
len.sa...@gdit.com
URL: www.gdit.com

 



 






From: IBM Mainframe Discussion List  on behalf of 
Seymour J Metz 
Sent: Friday, September 18, 2020 12:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: rename a dataset in acs routine? 
 


 [External: Use caution with links & attachments]

Mike designed REXX as a programming language. JCL is not and was never intended 
to be a programming language. This is something that should be handled in the 
environment that creates and submits the JCL.


--
Shmuel (Seymour J.) Metz
https://urldefense.us/v3/__http://mason.gmu.edu/*smetz3__;fg!!JRQnnSFuzw7wjAKq6ti6!mkx1yaW-aw-3YqQyrzTWwpc4Xwrfp9G3-ZFVghxkJr8upxVCmr20Trud5LSTbQ$
 



From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Friday, September 18, 2020 8:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: rename a dataset in acs routine?

On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:

>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
>
I understand that system symbols are not supported in JCL DSNs because of
o ambiguity between EXECSYS and CNVTSYS
o queue latency -- the job might run at a time not matching the JCL symbols.

(If the actual date and time values are important I understand they
may be invalid because around midnight date and time might be
fetched on different days, resulting in a 23+ hour error.  Murphy
says this will only be a problem when it matters.  Rexx can do it
right; why can't JCL?)


>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>    ...  So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>> until expiration date.
>>
>> The problem is that they want to know if there is a way to automatically
>> catalog datasets at creation time, to which I told them we could, but only
>> 1 of them because you can't catalog two datasets with the same name.  But
>> they want to have "the system" which I'm guessing is me :), dynamically
>> rename these datasets at creation time to add a date and time, such as
>> change HLQ.FICHE.TAPE to which I would dynamically make it
>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>> it was 11:23am).
>>
Use the seconds also, as D200917.T112359.  With thousands of entries
a collision is likely.  And use YYMMDD for the date for easy sorting of
displays.

Is it possible to rename a tape data set?  That would seem to require
overwriting the HDR1 label, but tapes can't be updated in place.

I'm imagining a sequence such as:

Momentarily catalog HLQ.FICHE.TAPE

DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
    SYMBOLICRELATE HLQ.FICHE.TAPE

Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases
remain when the RELATED name is uncatalogued.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Seymour J Metz
Mike designed REXX as a programming language. JCL is not and was never intended 
to be a programming language. This is something that should be handled in the 
environment that creates and submits the JCL.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Friday, September 18, 2020 8:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: rename a dataset in acs routine?

On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:

>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
>
I understand that system symbols are not supported in JCL DSNs because of
o ambiguity between EXECSYS and CNVTSYS
o queue latency -- the job might run at a time not matching the JCL symbols.

(If the actual date and time values are important I understand they
may be invalid because around midnight date and time might be
fetched on different days, resulting in a 23+ hour error.  Murphy
says this will only be a problem when it matters.  Rexx can do it
right; why can't JCL?)


>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>...  So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>> until expiration date.
>>
>> The problem is that they want to know if there is a way to automatically
>> catalog datasets at creation time, to which I told them we could, but only
>> 1 of them because you can't catalog two datasets with the same name.  But
>> they want to have "the system" which I'm guessing is me :), dynamically
>> rename these datasets at creation time to add a date and time, such as
>> change HLQ.FICHE.TAPE to which I would dynamically make it
>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>> it was 11:23am).
>>
Use the seconds also, as D200917.T112359.  With thousands of entries
a collision is likely.  And use YYMMDD for the date for easy sorting of
displays.

Is it possible to rename a tape data set?  That would seem to require
overwriting the HDR1 label, but tapes can't be updated in place.

I'm imagining a sequence such as:

Momentarily catalog HLQ.FICHE.TAPE

DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
SYMBOLICRELATE HLQ.FICHE.TAPE

Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases
remain when the RELATED name is uncatalogued.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Greg Price

On 2020-09-19 12:17 AM, Peter wrote:

if LPA and MLPA are same


LPA covers PLPA, MLPA, FLPA and DLPA.

PLPA is built when CLPA is specified at IPL time.

MLPA and FLPA are built every IPL time when required - they may have 
zero size if no modules are loaded there - the modules to be load in 
MLPA and FLPA are specified by locally customized system parameters.


DLPA is for LPA modules that are dynamically loaded by programs issuing 
CSVDYLPA macros or by system SETPROG LPA commands, after IPL and after 
the storage address ranges of the various address space parts have been 
determined.  In terms of these address space parts of virtual storage, 
DLPA modules physically reside in CSA and not in PLPA, MLPA or FLPA, the 
latter 3 being optimized to use the minimum storage to hold the required 
modules and so have no "spare" space to add additional modules after IPL.


I believe DLPA is the way to go if you want a program object (as opposed 
to a load module) made resident in LPA.


DLPA was introduced in OS/390 in the 1990s so it's older than this 
century.  Do some reading to find out all you need.


If you want to track program usage including the data set name of the 
libraries from which they were originally fetched, the IBM product 
called Tivoli Asset Discovery for z/OS (how many products still have 
Tivoli in their name?) does a good job of tracking application program 
use including application programs residing in any type of LPA.


Cheers,
Greg

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Seymour J Metz
No, Everything in FLPA, MLPA and PLPA is LPA.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Itschak Mugzach <0305158ad67d-dmarc-requ...@listserv.ua.edu>
Sent: Friday, September 18, 2020 10:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Searching MLPA module

MLPA is in CSA and is modifiable while lpa is read only.

בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:

> Apology for being ingorant .. if LPA and MLPA are same then why are they
> being placed in a different parmlibs ? Aren't any difference between MLPA
> and LPA ?
>
> On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
>
> > We have a MLPA module from adabas which got loaded But we aren't able to
> > trace from which dataset it was loaded.
> >
> > Is there a way to know the dataset name from which or where it is saved ?
> >
> > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> >
> >> Peter,
> >>
> >> There are some 3rd party products that load modules to modified LPA (CSA
> >> or
> >> ECSA) as they start. They do it dynamically so if they don't start, you
> >> save the storage.
> >>
> >> ITschak
> >>
> >> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
> >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> zLinux
> >> and IBM I **|  *
> >>
> >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404
> >> **|*
> >> *Skype**: ItschakMugzach **|* *Web**: 
> >> http://secure-web.cisco.com/1vxJZsVXa0NEZNYrvQr2A6X5KQ4ZoST-UuNcEDuc73q_bKmTVmz2o-MqfdfQuv9_O1Qe2eV8xqdhqJUjjjIo0UnEUxOrHgR9FakNHhhzRaZG6KVvX7_tdt57Wg0sY_IX2OJUfLBl_nPJ_3LaCrEdlXGdu5-vP0P9zLKIDvF1maBfvT73IQSpXrKA6qofxLTbzC-2htGRP3EkThfOahQHnngMZchRqjdZZJtwO31d0GT7TCz-p5VALI22EulJEW3sfTRVrOEso7Sm_bxvDJ1ppdMUQRsT3x1Sz89MfJEz9hIPFYuy6aqdmF1DXw_VqeOhV5yqFvGHXvMx8tI93EUQGIjLtZuWpIKwcOUPsnJSVVEHuDcH9_JOL1TreRGl92uxMC8F_OVHF0SuQ34j7WF65lBlCDL8R_9oxdK7gU7Sm86-N1bC0zxy_HptnPgfrgRc7/http%3A%2F%2Fwww.Securiteam.co.il
> >>   **|*
> >>
> >>
> >>
> >>
> >>
> >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson  wrote:
> >>
> >> > 
> >> > Is there any utility which can help to search the loaded MLPA module ?
> >> > 
> >> > What do you mean by "search the loaded MLPA module"?
> >> >
> >> > A program can use CSVQUERY to locate the address of a module in LPA
> >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD
> and
> >> > then DELETE (CSVQUERY typically has less overhead than that pair of
> >> > operations).
> >> >
> >> > 
> >> > We have a product which loads via MLPA and we just trying to
> understand
> >> if
> >> > it's possible to load it dynamically without the need of IPL
> >> > 
> >> > I do not understand this sentence either. Nothing loads "via MLPA".
> Some
> >> > things might require that their parts be in LPA. Is that what you
> meant?
> >> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> >> > macro. If a customer wants to put module(s) in LPA it can use the LPA
> >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> >> >
> >> >
> >> > Peter Relson
> >> > z/OS Core Technology Design
> >> >
> >> >
> >> > --
> >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> >> > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> >> >
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >>
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Itschak Mugzach
MLPA is in CSA and is modifiable while lpa is read only.

בתאריך יום ו׳, 18 בספט׳ 2020, 17:17, מאת Peter ‏:

> Apology for being ingorant .. if LPA and MLPA are same then why are they
> being placed in a different parmlibs ? Aren't any difference between MLPA
> and LPA ?
>
> On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:
>
> > We have a MLPA module from adabas which got loaded But we aren't able to
> > trace from which dataset it was loaded.
> >
> > Is there a way to know the dataset name from which or where it is saved ?
> >
> > On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> > 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
> >
> >> Peter,
> >>
> >> There are some 3rd party products that load modules to modified LPA (CSA
> >> or
> >> ECSA) as they start. They do it dynamically so if they don't start, you
> >> save the storage.
> >>
> >> ITschak
> >>
> >> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
> >> Platform* *|* *Information Security Continuous Monitoring for Z/OS,
> zLinux
> >> and IBM I **|  *
> >>
> >> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404
> >> **|*
> >> *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*
> >>
> >>
> >>
> >>
> >>
> >> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson  wrote:
> >>
> >> > 
> >> > Is there any utility which can help to search the loaded MLPA module ?
> >> > 
> >> > What do you mean by "search the loaded MLPA module"?
> >> >
> >> > A program can use CSVQUERY to locate the address of a module in LPA
> >> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD
> and
> >> > then DELETE (CSVQUERY typically has less overhead than that pair of
> >> > operations).
> >> >
> >> > 
> >> > We have a product which loads via MLPA and we just trying to
> understand
> >> if
> >> > it's possible to load it dynamically without the need of IPL
> >> > 
> >> > I do not understand this sentence either. Nothing loads "via MLPA".
> Some
> >> > things might require that their parts be in LPA. Is that what you
> meant?
> >> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> >> > macro. If a customer wants to put module(s) in LPA it can use the LPA
> >> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> >> >
> >> >
> >> > Peter Relson
> >> > z/OS Core Technology Design
> >> >
> >> >
> >> > --
> >> > For IBM-MAIN subscribe / signoff / archive access instructions,
> >> > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> >> >
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >>
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Sri h Kolusu
>The problem is that they want to know if there is a way to automatically
catalog datasets at creation time, to which I told them we could, but only
1 of them because you can't catalog two datasets with the same name.

Generate the RENAME cards in the same program/JCL to rename the file from
HLQ.FICHE.TAPE  to HLQ.FICHE.TAPE.Yccyy.Mmm.Ddd.Thhmmss

Run those rename control cards thru IDCAMS in the same JCL


Thannks,
Kolusu

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Peter
Apology for being ingorant .. if LPA and MLPA are same then why are they
being placed in a different parmlibs ? Aren't any difference between MLPA
and LPA ?

On Fri, 18 Sep, 2020, 5:56 pm Peter,  wrote:

> We have a MLPA module from adabas which got loaded But we aren't able to
> trace from which dataset it was loaded.
>
> Is there a way to know the dataset name from which or where it is saved ?
>
> On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
> 0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:
>
>> Peter,
>>
>> There are some 3rd party products that load modules to modified LPA (CSA
>> or
>> ECSA) as they start. They do it dynamically so if they don't start, you
>> save the storage.
>>
>> ITschak
>>
>> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
>> Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
>> and IBM I **|  *
>>
>> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404
>> **|*
>> *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*
>>
>>
>>
>>
>>
>> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson  wrote:
>>
>> > 
>> > Is there any utility which can help to search the loaded MLPA module ?
>> > 
>> > What do you mean by "search the loaded MLPA module"?
>> >
>> > A program can use CSVQUERY to locate the address of a module in LPA
>> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD and
>> > then DELETE (CSVQUERY typically has less overhead than that pair of
>> > operations).
>> >
>> > 
>> > We have a product which loads via MLPA and we just trying to understand
>> if
>> > it's possible to load it dynamically without the need of IPL
>> > 
>> > I do not understand this sentence either. Nothing loads "via MLPA". Some
>> > things might require that their parts be in LPA. Is that what you meant?
>> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
>> > macro. If a customer wants to put module(s) in LPA it can use the LPA
>> > statement of the PROGxx parmlib member or the SETPROG LPA command.
>> >
>> >
>> > Peter Relson
>> > z/OS Core Technology Design
>> >
>> >
>> > --
>> > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>> >
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Pew, Curtis G

On Sep 18, 2020, at 2:36 AM, Brian Westerman  
wrote:
> 
> I can't think of a way to do that in an acs routine, or any other simple way, 
> and I'm hoping that someone has an idea that might apply here.  I think I can 
> alter almost anything about the dataset, except the name.  Is there something 
> I am missing?

You can’t do it in the ACS routine, but it’s easy to do in JCL:

//ddname DD DSN=HLQ.FICHE.TAPE.D


-- 
Pew, Curtis G
curtis@austin.utexas.edu






--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Peter
We have a MLPA module from adabas which got loaded But we aren't able to
trace from which dataset it was loaded.

Is there a way to know the dataset name from which or where it is saved ?

On Fri, 18 Sep, 2020, 4:16 pm Itschak Mugzach, <
0305158ad67d-dmarc-requ...@listserv.ua.edu> wrote:

> Peter,
>
> There are some 3rd party products that load modules to modified LPA (CSA or
> ECSA) as they start. They do it dynamically so if they don't start, you
> save the storage.
>
> ITschak
>
> *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
> Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
> and IBM I **|  *
>
> *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|*
> *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*
>
>
>
>
>
> On Fri, Sep 18, 2020 at 3:06 PM Peter Relson  wrote:
>
> > 
> > Is there any utility which can help to search the loaded MLPA module ?
> > 
> > What do you mean by "search the loaded MLPA module"?
> >
> > A program can use CSVQUERY to locate the address of a module in LPA
> > (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD and
> > then DELETE (CSVQUERY typically has less overhead than that pair of
> > operations).
> >
> > 
> > We have a product which loads via MLPA and we just trying to understand
> if
> > it's possible to load it dynamically without the need of IPL
> > 
> > I do not understand this sentence either. Nothing loads "via MLPA". Some
> > things might require that their parts be in LPA. Is that what you meant?
> > If a program wants to put module(s) into LPA it can use the CSVDYLPA
> > macro. If a customer wants to put module(s) in LPA it can use the LPA
> > statement of the PROGxx parmlib member or the SETPROG LPA command.
> >
> >
> > Peter Relson
> > z/OS Core Technology Design
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Allan Staller
Classification: HCL Internal

As I am sure you know, ACS routines only apply at creation time and don’t have 
the power to alter the DSN anyway.

ISTR a (fairly recent (z/OS 1+)) modification that will allow creation and 
cataloging of a 2nd dataset with the same name and avoiding the NOT CATLGD 2 
jcl message.
However only one dataset will be in the catalog (other ways to avoid this w/o 
changing the system default),

It seems this is the old "its too much work to change all that JCL" (not to 
mention recreating all of the tapes).

The only thing I can think of is to define a dataset alias pointing back to the 
volser. Considering this is tape I am not even sure it will work.
This is not a savings in work based on the numbers below! However, it might be 
"automatable" via REXX or other utility,

I hope this helps you formulate your response,



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Brian Westerman
Sent: Friday, September 18, 2020 2:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: rename a dataset in acs routine?

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don’t click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Hi,

I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Allan Staller
Classification: HCL Internal

Paul,

That is incorrect.

DYNAMIC system symbols were not supported until JES2 V2. (Z/OS 2.1+). The 
installation gets to define where symbols are resolved via JESPARMS
STATIC system symbols have been supported for "eons".  (e.g. SYSDATE, SYSIME, 
SYSUID). Init and Tuning ref defines the IBM supplied static symbols.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Friday, September 18, 2020 7:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: rename a dataset in acs routine?

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don’t click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:

>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
>
I understand that system symbols are not supported in JCL DSNs because of o 
ambiguity between EXECSYS and CNVTSYS o queue latency -- the job might run at a 
time not matching the JCL symbols.

(If the actual date and time values are important I understand they may be 
invalid because around midnight date and time might be fetched on different 
days, resulting in a 23+ hour error.  Murphy says this will only be a problem 
when it matters.  Rexx can do it right; why can't JCL?)


>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>...  So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps
>> around until expiration date.
>>
>> The problem is that they want to know if there is a way to
>> automatically catalog datasets at creation time, to which I told them
>> we could, but only
>> 1 of them because you can't catalog two datasets with the same name.
>> But they want to have "the system" which I'm guessing is me :),
>> dynamically rename these datasets at creation time to add a date and
>> time, such as change HLQ.FICHE.TAPE to which I would dynamically make
>> it HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current
>> time (if it was 11:23am).
>>
Use the seconds also, as D200917.T112359.  With thousands of entries a 
collision is likely.  And use YYMMDD for the date for easy sorting of displays.

Is it possible to rename a tape data set?  That would seem to require 
overwriting the HDR1 label, but tapes can't be updated in place.

I'm imagining a sequence such as:

Momentarily catalog HLQ.FICHE.TAPE

DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
SYMBOLICRELATE HLQ.FICHE.TAPE

Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases remain when the 
RELATED name is uncatalogued.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
::DISCLAIMER::

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Binyamin Dissen
On Fri, 18 Sep 2020 02:36:24 -0500 Brian Westerman
 wrote:

:>I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

:>The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

:>I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

That is what GDG's were built for.

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Itschak Mugzach
Peter,

There are some 3rd party products that load modules to modified LPA (CSA or
ECSA) as they start. They do it dynamically so if they don't start, you
save the storage.

ITschak

*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
and IBM I **|  *

*|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|*
*Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il  **|*





On Fri, Sep 18, 2020 at 3:06 PM Peter Relson  wrote:

> 
> Is there any utility which can help to search the loaded MLPA module ?
> 
> What do you mean by "search the loaded MLPA module"?
>
> A program can use CSVQUERY to locate the address of a module in LPA
> (whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD and
> then DELETE (CSVQUERY typically has less overhead than that pair of
> operations).
>
> 
> We have a product which loads via MLPA and we just trying to understand if
> it's possible to load it dynamically without the need of IPL
> 
> I do not understand this sentence either. Nothing loads "via MLPA". Some
> things might require that their parts be in LPA. Is that what you meant?
> If a program wants to put module(s) into LPA it can use the CSVDYLPA
> macro. If a customer wants to put module(s) in LPA it can use the LPA
> statement of the PROGxx parmlib member or the SETPROG LPA command.
>
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Paul Gilmartin
On Fri, 18 Sep 2020 17:34:17 +0800, Brian Fraser wrote:

>Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
>Can use system symbols to generate the date and time in the JCL output DD.
> 
I understand that system symbols are not supported in JCL DSNs because of
o ambiguity between EXECSYS and CNVTSYS
o queue latency -- the job might run at a time not matching the JCL symbols.

(If the actual date and time values are important I understand they
may be invalid because around midnight date and time might be
fetched on different days, resulting in a 23+ hour error.  Murphy
says this will only be a problem when it matters.  Rexx can do it
right; why can't JCL?)


>On Fri, 18 Sep 2020 at 15:36, Brian Westerman wrote:
>...  So over time, they ended up
>> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
>> until expiration date. 
>>
>> The problem is that they want to know if there is a way to automatically
>> catalog datasets at creation time, to which I told them we could, but only
>> 1 of them because you can't catalog two datasets with the same name.  But
>> they want to have "the system" which I'm guessing is me :), dynamically
>> rename these datasets at creation time to add a date and time, such as
>> change HLQ.FICHE.TAPE to which I would dynamically make it
>> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
>> it was 11:23am).
>> 
Use the seconds also, as D200917.T112359.  With thousands of entries
a collision is likely.  And use YYMMDD for the date for easy sorting of
displays.

Is it possible to rename a tape data set?  That would seem to require
overwriting the HDR1 label, but tapes can't be updated in place.

I'm imagining a sequence such as:

Momentarily catalog HLQ.FICHE.TAPE

DEFINE ALIAS HLQ.FICHE.TAPE.D200917.T112359
SYMBOLICRELATE HLQ.FICHE.TAPE

Uncatalog HLQ.FICHE.TAPE.  I understand that symbolic aliases
remain when the RELATED name is uncatalogued.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Peter Relson

Is there any utility which can help to search the loaded MLPA module ?  

What do you mean by "search the loaded MLPA module"?

A program can use CSVQUERY to locate the address of a module in LPA 
(whether PLPA, MLPA, FLPA, or dynamic LPA), just as it can use LOAD and 
then DELETE (CSVQUERY typically has less overhead than that pair of 
operations).


We have a product which loads via MLPA and we just trying to understand if
it's possible to load it dynamically without the need of IPL

I do not understand this sentence either. Nothing loads "via MLPA". Some 
things might require that their parts be in LPA. Is that what you meant? 
If a program wants to put module(s) into LPA it can use the CSVDYLPA 
macro. If a customer wants to put module(s) in LPA it can use the LPA 
statement of the PROGxx parmlib member or the SETPROG LPA command.


Peter Relson
z/OS Core Technology Design


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Brian Fraser
Why can't his jobs generate dsns like  HLQ.FICHE.TAPE.D091720.T1123 ?
Can use system symbols to generate the date and time in the JCL output DD.

Brian


On Fri, 18 Sep 2020 at 15:36, Brian Westerman 
wrote:

> Hi,
>
> I was asked a question today that I honestly don't know how to answer.
> The programmer has a (very large) series of jobs that generate fiche tapes
> that get created and have a expiration date but never are cataloged
> (because they all have exactly the same DSN).  So over time, they ended up
> with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around
> until expiration date.  Obviously, these are not the easiest datasets to
> use later because they need to look up the tape volser every time.
>
> The problem is that they want to know if there is a way to automatically
> catalog datasets at creation time, to which I told them we could, but only
> 1 of them because you can't catalog two datasets with the same name.  But
> they want to have "the system" which I'm guessing is me :), dynamically
> rename these datasets at creation time to add a date and time, such as
> change HLQ.FICHE.TAPE to which I would dynamically make it
> HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if
> it was 11:23am).
>
> I can't think of a way to do that in an acs routine, or any other simple
> way, and I'm hoping that someone has an idea that might apply here.  I
> think I can alter almost anything about the dataset, except the name.  Is
> there something I am missing?
>
> Brian
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: rename a dataset in acs routine?

2020-09-18 Thread Greg Price

On 2020-09-18 5:36 PM, Brian Westerman wrote:

would dynamically make it HLQ.FICHE.TAPE.D091720.T1123


I don't suppose the hard-coded data set name can be changed to include 
dynamic system symbols in new low-level qualifiers which would be 
resolved to the current date and time?


Cheers,
Greg

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


rename a dataset in acs routine?

2020-09-18 Thread Brian Westerman
Hi,

I was asked a question today that I honestly don't know how to answer.  The 
programmer has a (very large) series of jobs that generate fiche tapes that get 
created and have a expiration date but never are cataloged (because they all 
have exactly the same DSN).  So over time, they ended up with about 30,000 
tapes from the over 9,000 jobs that CA-1 keeps around until expiration date.  
Obviously, these are not the easiest datasets to use later because they need to 
look up the tape volser every time.

The problem is that they want to know if there is a way to automatically 
catalog datasets at creation time, to which I told them we could, but only 1 of 
them because you can't catalog two datasets with the same name.  But they want 
to have "the system" which I'm guessing is me :), dynamically rename these 
datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE 
to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning 
today's date and the current time (if it was 11:23am).

I can't think of a way to do that in an acs routine, or any other simple way, 
and I'm hoping that someone has an idea that might apply here.  I think I can 
alter almost anything about the dataset, except the name.  Is there something I 
am missing?

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Binyamin Dissen
On Fri, 18 Sep 2020 07:43:21 +0400 Peter  wrote:

:>Is there any utility which can help to search the loaded MLPA module ?  Is
:>it possible to load MLPA dynamically by avoiding IPL?(apology if this a
:>ignorant question)

:>We have a product which loads via MLPA and we just trying to understand if
:>it's possible to load it dynamically without the need of IPL

:>Any advice on this is much appreciated

You must also confirm that the original address is not saved somewhere and
that the caller will always load the module.

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Rob Scott
If you have SDSF for z/OS 2.4 you can use the "LPD" command (Link Pack 
Directory)

Rob Scott
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter
Sent: 18 September 2020 04:43
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Searching MLPA module

EXTERNAL EMAIL





Hello

Is there any utility which can help to search the loaded MLPA module ?  Is it 
possible to load MLPA dynamically by avoiding IPL?(apology if this a ignorant 
question)

We have a product which loads via MLPA and we just trying to understand if it's 
possible to load it dynamically without the need of IPL

Any advice on this is much appreciated

Peter

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: NJE via SNA/EE

2020-09-18 Thread Barbara Nitz
>We ran a mixture of TCP and SNA NJE for a long, long time and then
>eventually (by accident in fact) ended up with an OSA hardware
>configuration that could no longer support SNA. We couldn't use EE
>because both ends of the connection were not MVS. So we capitulated and
>changed everything over to TCP. It's a bit less predictable than SNA
>was, but gets the job done. I see no reason to believe  that falling
>back to SNA would not work if we chose to do so (and had the necessary
>OSA hardware).

Falling back to SNA *did* work, once all the NJE/TCP parms were removed from 
the JES2 deck. It 'just' cost us an IPL on both ends of the connection. I got 
the impression that somehow the TCP parms take precedence over SNA just by 
being in the deck.

Regards, Barbara

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Searching MLPA module

2020-09-18 Thread Itschak Mugzach
Yes.

בתאריך יום ו׳, 18 בספט׳ 2020, 8:58, מאת Peter ‏:

> IEALPAxx and LPALSTxx treated in same way ?
>
>
>
>
> On Fri, 18 Sep, 2020, 9:44 am Seymour J Metz,  wrote:
>
> > You can search an LPA module with IPCS.
> >
> > In addition to the SETPROG command there's the CSVDYLPA macro.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> >
> > 
> > From: IBM Mainframe Discussion List  on behalf
> > of Peter 
> > Sent: Thursday, September 17, 2020 11:43 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Searching MLPA module
> >
> > Hello
> >
> > Is there any utility which can help to search the loaded MLPA module ?
> Is
> > it possible to load MLPA dynamically by avoiding IPL?(apology if this a
> > ignorant question)
> >
> > We have a product which loads via MLPA and we just trying to understand
> if
> > it's possible to load it dynamically without the need of IPL
> >
> > Any advice on this is much appreciated
> >
> > Peter
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN