Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Michael Babcock
I work with Ross and can explain what he is trying to accomplish.   We have
a Db2 v13 Global zone for Db2 along with its associated target and DLIB
zones.   We have several Db2 related products (Admin Tool, etc) installed
into the Db2 global with their own target and dlib zones.   He wants to
upgrade an existing product but with new target and dlib zones without
losing the old version.   If he clones the existing target and dlib zones,
updates the DDDEFs and receives the new version, will SMPE try to delete
the old FMID and/or the contents of the existing libraries?

On Thu, Dec 14, 2023 at 2:42 PM Jousma, David <
01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:

> This statement is very confusing to me?So for DB2V13 is installed in
> its own global zone, with target and dlib zones.It’s the next part of
> your statement “use my existing target and dlib zones and update ddefs…”
> that is confusing me.   It sounds like you are trying to marry your V13
> work with some other downlevel environment?  To me it sounds like you
> already have a V13 environment, along with some “older” environment.I
> cannot tell what you are trying to accomplish.
>
>
> >> On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn <
> ross.vaugh...@gmail.com> wrote:
>
> >>
>
> >>> I’m upgrading a product in my DB2v13 global zone.  I plan to use my
> existing target & DLIB zones and just update my DDDEFs to point to my new
> dataset names.
>
> >>> My question is - if I want to create new CSI’s (copied from my
> existing CSIs) for
>
>
> Dave Jousma
> Vice President | Director, Technology Engineering
>
>
>
>
>
> This e-mail transmission contains information that is confidential and may
> be privileged.   It is intended only for the addressee(s) named above. If
> you receive this e-mail in error, please do not read, copy or disseminate
> it in any manner. If you are not the intended recipient, any disclosure,
> copying, distribution or use of the contents of this information is
> prohibited. Please reply to the message immediately by informing the sender
> that the message was misdirected. After replying, please erase it from your
> computer system. Your assistance in correcting this error is appreciated.
>
> --
> 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


CSVQUERY in ARR routine return code 8

2023-12-14 Thread Joseph Reichman
Hi 

I noticed a lot of the info regarding to the abending programs in a ARR
recovery routine( for a space switching pc rtn)  point to the Home address
space such as SDWARBAD that address is from the home address space RB

Wanting to get info on the PC rtn running in Primary I coded a CSVQUERY
using the INADDR parameter having the SDWANXT1 as it value I tried the a
full word containing the address and a pointer to a fullword containing that
address both times It returned R15 = 8

When I do a tso TEST where subcommand with this value it recognizes the
address as Whitin the PC load module

thanks  

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


Re: Can this be done?

2023-12-14 Thread Lennie Dymoke-Bradshaw
I am assuming you are speaking of DASD based data sets rather than those on 
tape or any other medium.

I would have said use EXCP until recently. In addition you would need to be APF 
authorised in order to open VSAM datasets using EXCP.
However, I understand however that there are some undocumented issues running 
EXCP against data sets that are extended format. The DFP Advanced Services 
manual states the following,
"The EXCP and EXCPVR macro instructions allow you to control the data 
organization based on
device characteristics. The exceptions to this capability are partitioned data 
sets extended (PDSEs),
extended format data sets, spooled and dummy data sets, TSO terminals, and z/OS 
UNIX files and
file systems. They are not supported for user-written applications using EXCP."
It seems likely to me that there are ways of circumventing these restrictions. 
There is a low level interface called the media manager which may do what you 
need. But the manual for this is not available to us mere mortals.
As others have said, use ADRDSSU.

Lennie Dymoke-Bradshaw
https: //rsclweb.com
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Billy Ashton
Sent: 14 December 2023 15:44
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Can this be done?

Hey everyone! I have a little down time here at the end of the year with our 
freeze, and I wanted to play with some ideas I have had.

I would like to write a program that can open any kind of file - PDS, 
Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to open 
the file in "raw" format, as if I were going straight to the disk pack and 
scooping up the bytes from the beginning of the allocation to the end.

Is there any way to do this without caring about the catalog RECFM? 
Obviously, the easiest way is through some JCL parameter that says "force as 
PS" but I doubt that is likely. I can't go into more detail at present, sorry!

What do you think?

Thank you and best regards,
Billy Ashton

--
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: SMP/E question of the day

2023-12-14 Thread Paul Gilmartin
On Thu, 14 Dec 2023 22:22:51 +, Kurt Quackenbush wrote:

>> NAME ABCDITSK ABCPROC#C C_CODE
>
>I believe SMP/E supports a maximum of 8 characters for the LMOD, CSECT, and 
>CLASS names specified on the IMASPZAP NAME statement.  CSECT name ABCPROC#C is 
>9 characters.
>
If the section name was generated by a supported IBM compiler and/or reported 
by AMBLIST,
SMP/E needs to be updated to match reality.

WAD is no excuse.

-- 
gil

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


Re: SMP/E question of the day

2023-12-14 Thread Kurt Quackenbush
> NAME ABCDITSK ABCPROC#C C_CODE

I believe SMP/E supports a maximum of 8 characters for the LMOD, CSECT, and 
CLASS names specified on the IMASPZAP NAME statement.  CSECT name ABCPROC#C is 
9 characters.

Kurt Quackenbush
IBM  |  z/OS SMP/E and z/OSMF Software Management  |  ku...@us.ibm.com

Chuck Norris never uses CHECK when he applies PTFs.

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


Re: SMP/E question of the day

2023-12-14 Thread Phil Smith III
Binyamin wrote:
>Unless you are sending this via teletype or FAX, I question why you
>would provide a zap rather than a module replacement.

Well, we've been discussing that already. But we'd like to understand it at 
least.

Meanwhile, Tom Marchant's suggestion sounded helpful, except it's C code. So 
what should:
NAME ABCDITSK ABCPROC#C C_CODE
become? It complains about the ABCPROC#C.


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


Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Jousma, David
This statement is very confusing to me?So for DB2V13 is installed in its 
own global zone, with target and dlib zones.It’s the next part of your 
statement “use my existing target and dlib zones and update ddefs…” that is 
confusing me.   It sounds like you are trying to marry your V13 work with some 
other downlevel environment?  To me it sounds like you already have a V13 
environment, along with some “older” environment.I cannot tell what you are 
trying to accomplish.


>> On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn 
>> mailto:ross.vaugh...@gmail.com>> wrote:

>>

>>> I’m upgrading a product in my DB2v13 global zone.  I plan to use my 
>>> existing target & DLIB zones and just update my DDDEFs to point to my new 
>>> dataset names.

>>> My question is - if I want to create new CSI’s (copied from my existing 
>>> CSIs) for


Dave Jousma
Vice President | Director, Technology Engineering





This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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


Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Mark Zelden
You might want to look at the sysres cloning example on my web site / CBT file 
434 also as that
clones the SMP/E ZONEs with it.  I don't clone the DLIB volser(s) / zones these 
days (haven't
in many years), but you can easily see how it is done. See URL below. 

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html




On Thu, 14 Dec 2023 14:24:30 -0600, Ross Vaughn  wrote:

>Thanks for the info Tom. 
>I had planned to use the ZONEEDIT to update my DDDEFs as well, so thanks for 
>that confirmation.
>
>Ross 
>
>
>> On Dec 14, 2023, at 12:44 PM, Tom Marchant 
>> <000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:
>> 
>> I should have added that when I clone zones, I like to copy the SMPLOG as 
>> well, so that the full history is preserved. Don't forget to define the 
>> disposition for SMPLOG as MOD or the SMPLOG will be useless.
>> 
>> -- 
>> Tom Marchant
>> 
>> On Thu, 14 Dec 2023 12:31:15 -0600, Tom Marchant  
>> wrote:
>> 
>>> Create a new ZONEINDEX in the Global zone for each new zone (target and 
>>> DLIB), and relate them to each other.
>>> 
>>> If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise 
>>> use ZONECOPY.
>>> 
>>> You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget 
>>> that the target zone needs the DLIB data sets, must have their own SMPLTS, 
>>> SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, 
>>> only the SCDS is required in the DLIB zone.
>>> 
>>> Your target and DLIB zones will need DDDEFs for the SMPPTS
>>> 
>>> Be careful that you have not left any DDDEFs pointing to the previous 
>>> zone's data sets.
>>> 
>>> -- 
>>> Tom Marchant
>>> 
>>> On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn  
>>> wrote:
>>> 
 I’m upgrading a product in my DB2v13 global zone.  I plan to use my 
 existing target & DLIB zones and just update my DDDEFs to point to my new 
 dataset names.  
 My question is - if I want to create new CSI’s (copied from my existing 
 CSIs) for the target & DLIB what’s the best way to point the target & DLIB 
 to those new CSI’s?   My thought is using new CSI’s would allow me to keep 
 the previous FMID around if I needed it for any reason.
 
 Thanks,
 Ross Vaughn
 OneMain Financial
 
 
 
 
 
 
 
 

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


Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Ross Vaughn
Thanks for the info Tom. 
I had planned to use the ZONEEDIT to update my DDDEFs as well, so thanks for 
that confirmation.

Ross 


> On Dec 14, 2023, at 12:44 PM, Tom Marchant 
> <000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:
> 
> I should have added that when I clone zones, I like to copy the SMPLOG as 
> well, so that the full history is preserved. Don't forget to define the 
> disposition for SMPLOG as MOD or the SMPLOG will be useless.
> 
> -- 
> Tom Marchant
> 
> On Thu, 14 Dec 2023 12:31:15 -0600, Tom Marchant  
> wrote:
> 
>> Create a new ZONEINDEX in the Global zone for each new zone (target and 
>> DLIB), and relate them to each other.
>> 
>> If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise use 
>> ZONECOPY.
>> 
>> You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget 
>> that the target zone needs the DLIB data sets, must have their own SMPLTS, 
>> SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, 
>> only the SCDS is required in the DLIB zone.
>> 
>> Your target and DLIB zones will need DDDEFs for the SMPPTS
>> 
>> Be careful that you have not left any DDDEFs pointing to the previous zone's 
>> data sets.
>> 
>> -- 
>> Tom Marchant
>> 
>> On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn  
>> wrote:
>> 
>>> I’m upgrading a product in my DB2v13 global zone.  I plan to use my 
>>> existing target & DLIB zones and just update my DDDEFs to point to my new 
>>> dataset names.  
>>> My question is - if I want to create new CSI’s (copied from my existing 
>>> CSIs) for the target & DLIB what’s the best way to point the target & DLIB 
>>> to those new CSI’s?   My thought is using new CSI’s would allow me to keep 
>>> the previous FMID around if I needed it for any reason.
>>> 
>>> Thanks,
>>> Ross Vaughn
>>> OneMain Financial
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> 
>>> --
>>> 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: What is RSED and do I need it on the Mainframe

2023-12-14 Thread Sri h Kolusu
>> What is the STC RSED?  Is it something I need or can I shut it down and 
>> remove the software?

Lizette,

It is a started task for IDZ (IBM Developer for Z)  which will be used to 
connect to HOST systems from IDZ.

https://www.ibm.com/docs/en/developer-for-zos/9.1.1?topic=f-rse-daemon

Thanks,
Kolusu

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


Re: What is RSED and do I need it on the Mainframe

2023-12-14 Thread Jousma, David
If the STC proc looks similar to this, it’s a part of z/explorer and/or iDZ.   
You could shut it down, and see who complains.   There is usually a JMON task 
that goes with it for JES interface.

//RSED PROC IVP=, * 'IVP' to do an IVP
//PORT=,
//CNFG='/etc/zexpl',
//HOME='/usr/lpp/IBM/zexpl'
//*
//RSED EXEC PGM=BPXBATSL,REGION=0M,TIME=NOLIMIT,
// PARM='PGM &HOME./bin/rsed.sh &IVP -C&CNFG -P&PORT'
//STDOUT   DD SYSOUT=*
//STDERR   DD SYSOUT=*



Dave Jousma
Vice President | Director, Technology Engineering





From: IBM Mainframe Discussion List  on behalf of 
Lizette Koehler 
Date: Thursday, December 14, 2023 at 2:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: What is RSED and do I need it on the Mainframe
What is the STC RSED? Is it something I need or can I shut it down and remove 
the software? I have very little documentation on this function and how it is 
used in a Mainframe Thank you Lizette 
--






What is the STC RSED?  Is it something I need or can I shut it down and

remove the software?







I have very little documentation on this function and how it is used in a

Mainframe









Thank you







Lizette





--

For IBM-MAIN subscribe / signoff / archive access instructions,

send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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


What is RSED and do I need it on the Mainframe

2023-12-14 Thread Lizette Koehler
 

What is the STC RSED?  Is it something I need or can I shut it down and
remove the software?

 

I have very little documentation on this function and how it is used in a
Mainframe

 


Thank you 

 

Lizette


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


Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Tom Marchant
I should have added that when I clone zones, I like to copy the SMPLOG as well, 
so that the full history is preserved. Don't forget to define the disposition 
for SMPLOG as MOD or the SMPLOG will be useless.

-- 
Tom Marchant

On Thu, 14 Dec 2023 12:31:15 -0600, Tom Marchant  
wrote:

>Create a new ZONEINDEX in the Global zone for each new zone (target and DLIB), 
>and relate them to each other.
>
>If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise use 
>ZONECOPY.
>
>You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget 
>that the target zone needs the DLIB data sets, must have their own SMPLTS, 
>SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, 
>only the SCDS is required in the DLIB zone.
>
>Your target and DLIB zones will need DDDEFs for the SMPPTS
>
>Be careful that you have not left any DDDEFs pointing to the previous zone's 
>data sets.
>
>-- 
>Tom Marchant
>
>On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn  
>wrote:
>
>>I’m upgrading a product in my DB2v13 global zone.  I plan to use my existing 
>>target & DLIB zones and just update my DDDEFs to point to my new dataset 
>>names.  
>>My question is - if I want to create new CSI’s (copied from my existing CSIs) 
>>for the target & DLIB what’s the best way to point the target & DLIB to those 
>>new CSI’s?   My thought is using new CSI’s would allow me to keep the 
>>previous FMID around if I needed it for any reason.
>>
>>Thanks,
>>Ross Vaughn
>>OneMain Financial
>>
>>
>>
>>
>>
>>
>>
>>
>> 
>> 
>>
>>
>>--
>>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: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Tom Marchant
Create a new ZONEINDEX in the Global zone for each new zone (target and DLIB), 
and relate them to each other.

If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise use 
ZONECOPY.

You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget 
that the target zone needs the DLIB data sets, must have their own SMPLTS, 
SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, 
only the SCDS is required in the DLIB zone.

Your target and DLIB zones will need DDDEFs for the SMPPTS

Be careful that you have not left any DDDEFs pointing to the previous zone's 
data sets.

-- 
Tom Marchant

On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn  wrote:

>I’m upgrading a product in my DB2v13 global zone.  I plan to use my existing 
>target & DLIB zones and just update my DDDEFs to point to my new dataset 
>names.  
>My question is - if I want to create new CSI’s (copied from my existing CSIs) 
>for the target & DLIB what’s the best way to point the target & DLIB to those 
>new CSI’s?   My thought is using new CSI’s would allow me to keep the previous 
>FMID around if I needed it for any reason.
>
>Thanks,
>Ross Vaughn
>OneMain Financial
>
>
>
>
>
>
>
>
> 
> 
>
>
>--
>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: Can this be done?

2023-12-14 Thread Paul Gilmartin
On Thu, 14 Dec 2023 15:43:40 +, Billy Ashton wrote:
>..
>Is there any way to do this without caring about the catalog RECFM? 
>Obviously, the easiest way is through some JCL parameter that says 
>"force as PS" but I doubt that is likely. I can't go into more detail at 
>present, sorry!
> 
JCL overriding to DSORG=PS does some of what yow want, but probably
not all.  I have used that to read the directory of a PDS as a PS file.
It's documented as working alike for PDSE, but I suspect it's simulated.

You omitted UNIX files.  On a non-z UNIIX system I have used "df" to find
the character special file underlying a mouht  and copied that to a *.iso which
I could mount as type=loopback.  Would that work with zFS?  for DSFS?

Where's the User's Guide for DSFS?

-- 
gil

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


Re: SMP/E question of the day

2023-12-14 Thread Binyamin Dissen
Unless you are sending this via teletype or FAX, I question why you would
provide a zap rather than a module replacement.

On Thu, 14 Dec 2023 11:54:28 -0500 Phil Smith III  wrote:

:>From a coworker, who tried to post but it seems to have vanished-not even a 
bounce?! If it just got stuck somewhere, this might be a duplicate, sorry.
:>
:> 
:>
:> 
:>
:>I am having problems trying to convert a normal ZOS AMASPZAP to a SMPE ++ZAP.
:>
:> 
:>
:>When I run the zap through a standalone AMASPZAP process everything works 
fine:
:>
:> 
:>
:>IGWSPZAP  INSPECTS, MODIFIES, AND DUMPS CSECTS OR SPECIFIC DATA RECORDS ON 
DIRECT ACCESS STORAGE.
:>
:>AMA168I SYSIN PROCESSING STARTED
:>
:>NAME ABCDITSK ABCPROC#C C_CODE
:>
:>VER 067A EC0A008C,A077
:>
:>VER 0680 5800926C
:>
:>VER 0684 A7011000
:>
:>VER 0792 58F0301E
:>
:>VER 0796 E54CD0E0,
:>
:>VER 07AA E300D13B,0094
:>
:>VER 07B0 EC060018,007E
:>
:>REP 067A EC0A0102,A077
:>
:>AMA122I OLD DATA WAS EC0A008CA077
:>
:>CHECKSUM C08C1494
:>
:>AMA132I CHECKSUM WAS CORRECT, IS NOW 0.
:>
:>AMA163I PREVIOUS GROUP ENDED, ASSOCIATED MESSAGES FOLLOW:
:>
:>AMA125I IDR COUNT = 1 FOR SECTION = ABCPROC#C
:>
:>AMA164I END OF MESSAGES FOR PREVIOUS GROUP
:>
:>AMA168I SYSIN PROCESSING COMPLETED
:>
:>AMA100I IGWSPZAP   PROCESSING COMPLETED
:>
:> 
:>
:>However when I try to apply:
:>
:> 
:>
:>++VER(Z038) FMID(VABC840) .
:>
:>++ZAP(ABCDITSK) .
:>
:>NAME ABCDITSK ABCPROC#C C_CODE
:>
:>VER 067A EC0A008C,A077
:>
:>VER 0680 5800926C
:>
:>VER 0684 A7011000
:>
:>VER 0792 58F0301E
:>
:>VER 0796 E54CD0E0,
:>
:>VER 07AA E300D13B,0094
:>
:>VER 07B0 EC060018,007E
:>
:>REP 067A EC0A0102,A077
:>
:> 
:>
:>SMPE has issues
:>
:> 
:>
:>  SET BOUNDARY(TARGET) .
:>
:>GIM20501ISET PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 00.
:>
:> 
:>
:> 
:>
:>  APPLY S(ABC8401) .
:>
:> 
:>
:>--NAME ABCDITSK ABCPROC#C C_CODE
:>
:>GIM23101E ** THERE IS A SYNTAX ERROR IN A ZAP CONTROL STATEMENT FOR MODULE
:>
:> ABCDITSK IN SYSMOD ABC8401.
:>
:>GIM30216IAPPLY PROCESSING FAILED FOR SYSMOD ABC8401. SYSTEM UTILITY
:>
:> PROCESSING FAILED FOR AN ELEMENT IN ABC8401.
:>
:>GIM20501IAPPLY PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 08.
:>
:>
:>--
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Director, Dissen Software, Bar & Grill - Israel

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


Re: SMP/E question of the day

2023-12-14 Thread Tom Marchant
Does this help, from the SMP/E User's Guide:


The superzap control statements are the same as you would use if you were 
calling 
the superzap utility. The only exception is that on the NAME statement, you 
should 
specify only the CSECT name within the distribution library module, rather than 
the 
load module name and the CSECT name. When SMP/E installs the SYSMOD, it 
determines all the load modules into which this distribution module was 
link-edited 
and then calls the superzap utility for each of these load modules, modifying 
the 
NAME statement as appropriate.


-- 
Tom Marchant

On Thu, 14 Dec 2023 11:54:28 -0500, Phil Smith III  wrote:

>From a coworker, who tried to post but it seems to have vanished-not even a 
>bounce?! If it just got stuck somewhere, this might be a duplicate, sorry.
>
> 
>
> 
>
>I am having problems trying to convert a normal ZOS AMASPZAP to a SMPE ++ZAP.
>
> 
>
>When I run the zap through a standalone AMASPZAP process everything works fine:
>
> 
>
>IGWSPZAP  INSPECTS, MODIFIES, AND DUMPS CSECTS OR SPECIFIC DATA RECORDS ON 
>DIRECT ACCESS STORAGE.
>
>AMA168I SYSIN PROCESSING STARTED
>
>NAME ABCDITSK ABCPROC#C C_CODE
>
>VER 067A EC0A008C,A077
>
>VER 0680 5800926C
>
>VER 0684 A7011000
>
>VER 0792 58F0301E
>
>VER 0796 E54CD0E0,
>
>VER 07AA E300D13B,0094
>
>VER 07B0 EC060018,007E
>
>REP 067A EC0A0102,A077
>
>AMA122I OLD DATA WAS EC0A008CA077
>
>CHECKSUM C08C1494
>
>AMA132I CHECKSUM WAS CORRECT, IS NOW 0.
>
>AMA163I PREVIOUS GROUP ENDED, ASSOCIATED MESSAGES FOLLOW:
>
>AMA125I IDR COUNT = 1 FOR SECTION = ABCPROC#C
>
>AMA164I END OF MESSAGES FOR PREVIOUS GROUP
>
>AMA168I SYSIN PROCESSING COMPLETED
>
>AMA100I IGWSPZAP   PROCESSING COMPLETED
>
> 
>
>However when I try to apply:
>
> 
>
>++VER(Z038) FMID(VABC840) .
>
>++ZAP(ABCDITSK) .
>
>NAME ABCDITSK ABCPROC#C C_CODE
>
>VER 067A EC0A008C,A077
>
>VER 0680 5800926C
>
>VER 0684 A7011000
>
>VER 0792 58F0301E
>
>VER 0796 E54CD0E0,
>
>VER 07AA E300D13B,0094
>
>VER 07B0 EC060018,007E
>
>REP 067A EC0A0102,A077
>
> 
>
>SMPE has issues
>
> 
>
>  SET BOUNDARY(TARGET) .
>
>GIM20501ISET PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 00.
>
> 
>
> 
>
>  APPLY S(ABC8401) .
>
> 
>
>--NAME ABCDITSK ABCPROC#C C_CODE
>
>GIM23101E ** THERE IS A SYNTAX ERROR IN A ZAP CONTROL STATEMENT FOR MODULE
>
> ABCDITSK IN SYSMOD ABC8401.
>
>GIM30216IAPPLY PROCESSING FAILED FOR SYSMOD ABC8401. SYSTEM UTILITY
>
> PROCESSING FAILED FOR AN ELEMENT IN ABC8401.
>
>GIM20501IAPPLY PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 08.
>
>
>--
>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: RFC3280 (and 5280), "Basic Constraints" set to Critical

2023-12-14 Thread Phil Smith III
Oh. It does say:
"If TLS V1.3 is negotiated for a secure connection, certificate validation is 
done according to RFC 5280 unless explicitly specified."
but also still says "The default value is ANY."

That seems a tad bit unclear, should be more like:
" The default value is ANY, unless TLS V1.3 is negotiated for a secure 
connection, in which case certificate validation is done according to RFC 5280 
unless explicitly specified."

In the meantime, I've verified that adding the environment variable fixes it, 
so I'm good!

Thanks again to all. This all harkens back to two long-departed cow-orkers, who 
said:

Hansen's Law: It's always a certificate problem.
Weald's Corollary: Even when it's not a certificate problem, it's a certificate 
problem.

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


SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's

2023-12-14 Thread Ross Vaughn
I’m upgrading a product in my DB2v13 global zone.  I plan to use my existing 
target & DLIB zones and just update my DDDEFs to point to my new dataset names. 
 
My question is - if I want to create new CSI’s (copied from my existing CSIs) 
for the target & DLIB what’s the best way to point the target & DLIB to those 
new CSI’s?   My thought is using new CSI’s would allow me to keep the previous 
FMID around if I needed it for any reason.

Thanks,
Ross Vaughn
OneMain Financial








 
 


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


Re: Can this be done?

2023-12-14 Thread Seymour J Metz
You may need additional authorization, but EXCP is definitely the way to go. 
Parsing the raw data once you've read them might be sticky.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Billy Ashton 
Sent: Thursday, December 14, 2023 10:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Can this be done?

Hey everyone! I have a little down time here at the end of the year with
our freeze, and I wanted to play with some ideas I have had.

I would like to write a program that can open any kind of file - PDS,
Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to
open the file in "raw" format, as if I were going straight to the disk
pack and scooping up the bytes from the beginning of the allocation to
the end.

Is there any way to do this without caring about the catalog RECFM?
Obviously, the easiest way is through some JCL parameter that says
"force as PS" but I doubt that is likely. I can't go into more detail at
present, sorry!

What do you think?

Thank you and best regards,
Billy Ashton

--
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: Can this be done?

2023-12-14 Thread Binyamin Dissen
On Thu, 14 Dec 2023 15:43:40 + Billy Ashton 
wrote:

:>Hey everyone! I have a little down time here at the end of the year with 
:>our freeze, and I wanted to play with some ideas I have had.

:>I would like to write a program that can open any kind of file - PDS, 
:>Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to 
:>open the file in "raw" format, as if I were going straight to the disk 
:>pack and scooping up the bytes from the beginning of the allocation to 
:>the end.

:>Is there any way to do this without caring about the catalog RECFM? 
:>Obviously, the easiest way is through some JCL parameter that says 
:>"force as PS" but I doubt that is likely. I can't go into more detail at 
:>present, sorry!

:>What do you think?

Well, there is already such a program - ADRDSSU.

Just use EXCP - it don't care about the organization. Though I do not know if
OPEN will build a DEB for VSAM (or a VSAM component) with MACRF=E. 

Of course if you can get into supervisor state, you can build your own DEB and
access anything.

What is your business case? Playing around? In such case start with standard
files and PDS's. Use MACRF=E to dump the directory and members.

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

Director, Dissen Software, Bar & Grill - Israel

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


SMP/E question of the day

2023-12-14 Thread Phil Smith III
>From a coworker, who tried to post but it seems to have vanished-not even a 
>bounce?! If it just got stuck somewhere, this might be a duplicate, sorry.

 

 

I am having problems trying to convert a normal ZOS AMASPZAP to a SMPE ++ZAP.

 

When I run the zap through a standalone AMASPZAP process everything works fine:

 

IGWSPZAP  INSPECTS, MODIFIES, AND DUMPS CSECTS OR SPECIFIC DATA RECORDS ON 
DIRECT ACCESS STORAGE.

AMA168I SYSIN PROCESSING STARTED

NAME ABCDITSK ABCPROC#C C_CODE

VER 067A EC0A008C,A077

VER 0680 5800926C

VER 0684 A7011000

VER 0792 58F0301E

VER 0796 E54CD0E0,

VER 07AA E300D13B,0094

VER 07B0 EC060018,007E

REP 067A EC0A0102,A077

AMA122I OLD DATA WAS EC0A008CA077

CHECKSUM C08C1494

AMA132I CHECKSUM WAS CORRECT, IS NOW 0.

AMA163I PREVIOUS GROUP ENDED, ASSOCIATED MESSAGES FOLLOW:

AMA125I IDR COUNT = 1 FOR SECTION = ABCPROC#C

AMA164I END OF MESSAGES FOR PREVIOUS GROUP

AMA168I SYSIN PROCESSING COMPLETED

AMA100I IGWSPZAP   PROCESSING COMPLETED

 

However when I try to apply:

 

++VER(Z038) FMID(VABC840) .

++ZAP(ABCDITSK) .

NAME ABCDITSK ABCPROC#C C_CODE

VER 067A EC0A008C,A077

VER 0680 5800926C

VER 0684 A7011000

VER 0792 58F0301E

VER 0796 E54CD0E0,

VER 07AA E300D13B,0094

VER 07B0 EC060018,007E

REP 067A EC0A0102,A077

 

SMPE has issues

 

  SET BOUNDARY(TARGET) .

GIM20501ISET PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 00.

 

 

  APPLY S(ABC8401) .

 

--NAME ABCDITSK ABCPROC#C C_CODE

GIM23101E ** THERE IS A SYNTAX ERROR IN A ZAP CONTROL STATEMENT FOR MODULE

 ABCDITSK IN SYSMOD ABC8401.

GIM30216IAPPLY PROCESSING FAILED FOR SYSMOD ABC8401. SYSTEM UTILITY

 PROCESSING FAILED FOR AN ELEMENT IN ABC8401.

GIM20501IAPPLY PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 08.


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


Re: RFC3280 (and 5280), "Basic Constraints" set to Critical

2023-12-14 Thread Phil Smith III
Chris Meyer wrote:
>I checked with the System SSL folks on this.  

>It sounds like what you're observing is a difference in default System
>SSL certificate validation mode settings Between TLSv1.2 and TLSv1.3.
>See the description of the System SSL GSK_CERT_VALIDATION_MODE
>parameter in this table:
>https://www.ibm.com/docs/en/zos/3.1.0?topic=programming-environment-variables.
>Note that the default for TLSv1.2 (and earlier) is ANY, which initally
>validates against RFC 2459 which has the relaxed requirements
>regarding the critical bit. For TLSv1.3, however, System SSL defaults
>to RFC 5280 checking which requires the critical bit to be set.

>Based on what you've said in this thread, I'm assuming that you have
>not specified a value for GSK_CERT_VALIDATION_MODE, as that would
>result in the behavior you described.

Ah HAH -- this has to be it! An no, we are not specifying a 
GSK_CERT_VALIDATION_MODE.

All the doc says ANY is and remains the default. Are you saying that the 
default silently changes when it's TLSv1.3? If so, is that a code bug or a doc 
bug?

It looks like an environment variable can change that setting, too. I'm going 
to see if I can get someone to replace the certificate with the "bad" one and 
try that. If that'll get us around it, we'll be good--if some customer hits it, 
we can say "Add this" and they'll be good to go. As I think I wrote before, I'm 
not all that worried about that happening, since any real modern root cert 
SHOULD have BC set correctly, but it would be good to know.

Thanks!

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


Re: Can this be done?

2023-12-14 Thread Farley, Peter
Is FAMS-level I/O publicly documented, or only for NDA+$?

Peter

From: IBM Mainframe Discussion List  On Behalf Of Tom 
Brennan
Sent: Thursday, December 14, 2023 11:35 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Can this be done?


Like Mike said, run your own CCW's with EXCP or similar.  But you could

also get a quick look with a program that already does this, such as:



//ADRDSSU EXEC PGM=ADRDSSU

//SYSPRINT  DD SYSOUT=*

//VOL   DD UNIT=3390,VOL=SER=VOLSER,DISP=OLD

//SYSIN DD *

  PRINT INDD(VOL) TRACKS(0,1,5,15)



On 12/14/2023 7:43 AM, Billy Ashton wrote:

> Hey everyone! I have a little down time here at the end of the year with

> our freeze, and I wanted to play with some ideas I have had.

>

> I would like to write a program that can open any kind of file - PDS,

> Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to

> open the file in "raw" format, as if I were going straight to the disk

> pack and scooping up the bytes from the beginning of the allocation to

> the end.

>

> Is there any way to do this without caring about the catalog RECFM?

> Obviously, the easiest way is through some JCL parameter that says

> "force as PS" but I doubt that is likely. I can't go into more detail at

> present, sorry!

>

> What do you think?

>

> Thank you and best regards,

> Billy Ashton

--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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


Re: Can this be done?

2023-12-14 Thread Tom Brennan
Like Mike said, run your own CCW's with EXCP or similar.  But you could 
also get a quick look with a program that already does this, such as:


//ADRDSSU EXEC PGM=ADRDSSU
//SYSPRINT  DD SYSOUT=*
//VOL   DD UNIT=3390,VOL=SER=VOLSER,DISP=OLD
//SYSIN DD *
 PRINT INDD(VOL) TRACKS(0,1,5,15)

On 12/14/2023 7:43 AM, Billy Ashton wrote:
Hey everyone! I have a little down time here at the end of the year with 
our freeze, and I wanted to play with some ideas I have had.


I would like to write a program that can open any kind of file - PDS, 
Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to 
open the file in "raw" format, as if I were going straight to the disk 
pack and scooping up the bytes from the beginning of the allocation to 
the end.


Is there any way to do this without caring about the catalog RECFM? 
Obviously, the easiest way is through some JCL parameter that says 
"force as PS" but I doubt that is likely. I can't go into more detail at 
present, sorry!


What do you think?

Thank you and best regards,
Billy Ashton

--
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: Can this be done?

2023-12-14 Thread Mike Schwab
EXCP (execute channel program)
Cyl 0 trk 0 is volume label, points to VTOC which holds DSCB records.
DCSB has DSN, DSORG, RECFM, LRECL, BLKSIZE, tracks, etc.


On Thu, Dec 14, 2023 at 9:44 AM Billy Ashton  wrote:

> Hey everyone! I have a little down time here at the end of the year with
> our freeze, and I wanted to play with some ideas I have had.
>
> I would like to write a program that can open any kind of file - PDS,
> Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to
> open the file in "raw" format, as if I were going straight to the disk
> pack and scooping up the bytes from the beginning of the allocation to
> the end.
>
> Is there any way to do this without caring about the catalog RECFM?
> Obviously, the easiest way is through some JCL parameter that says
> "force as PS" but I doubt that is likely. I can't go into more detail at
> present, sorry!
>
> What do you think?
>
> Thank you and best regards,
> Billy Ashton
>
> --
> 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: Can this be done?

2023-12-14 Thread Sri h Kolusu
Billy,

Just out of curiosity what is the main intent of the request ?  Get the raw 
data and then do what? Edit/ Print ?

Also, when you get a pds , do you process ALL the members ? or any specific 
member? How do you distinguish it?

Thanks,
Kolusu

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


Re: Can this be done?

2023-12-14 Thread Steve Thompson
If you use SVC 99, you can query the dataset to find out what it 
is. And then you can do SVC99 to allocate.


It will keep you busy for a while understanding the text units 
and looking at control blocks


Steve Thompson


On 12/14/2023 10:43 AM, Billy Ashton wrote:
Hey everyone! I have a little down time here at the end of the 
year with our freeze, and I wanted to play with some ideas I 
have had.


I would like to write a program that can open any kind of file 
- PDS, Sequential, Panvalet, loadlib, and maybe even VSAM 
components. I want to open the file in "raw" format, as if I 
were going straight to the disk pack and scooping up the bytes 
from the beginning of the allocation to the end.


Is there any way to do this without caring about the catalog 
RECFM? Obviously, the easiest way is through some JCL parameter 
that says "force as PS" but I doubt that is likely. I can't go 
into more detail at present, sorry!


What do you think?

Thank you and best regards,
Billy Ashton

-- 


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


Enhanced PassTickets

2023-12-14 Thread Radoslaw Skorupka

I just converted legacy Passtickets to ENCRYPTED mode.
That is related with new keys in ICSF CKDS.

Just for testing purposes I also created few Ehanced Passticket 
(PTKTDATA) profiles. Used some dummy labels, however no key entry was 
created in CKDS repository.


Q: Should I manually create relevant key with the label as it was used 
in RDEF command?
Q2: How to do it? I mean key type. AFAIK there is no such functionality 
in ISPF panels, do I have to write my own program to call the API?


--
Radoslaw Skorupka
Lodz, Poland

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


Can this be done?

2023-12-14 Thread Billy Ashton
Hey everyone! I have a little down time here at the end of the year with 
our freeze, and I wanted to play with some ideas I have had.


I would like to write a program that can open any kind of file - PDS, 
Sequential, Panvalet, loadlib, and maybe even VSAM components. I want to 
open the file in "raw" format, as if I were going straight to the disk 
pack and scooping up the bytes from the beginning of the allocation to 
the end.


Is there any way to do this without caring about the catalog RECFM? 
Obviously, the easiest way is through some JCL parameter that says 
"force as PS" but I doubt that is likely. I can't go into more detail at 
present, sorry!


What do you think?

Thank you and best regards,
Billy Ashton

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