NIST Announced Quantum-Safe Cryptographic Standards

[Timothy Sipples]

The U.S. National Institute of Standards and Technology (NIST) has announced 
four algorithms as new NIST standards in quantum-safe cryptography. The four 
winning algorithms are:

CRYSTALS-Kyber public-key encryption ("general encryption")
CRYSTALS-Dilithium digital signatures
FALCON digital signatures
SPHINCS+ digital signatures

"NIST recommends CRYSTALS-Dilithium as the primary [digital signature] 
algorithm, with FALCON for applications that need smaller signatures than 
Dilithium can provide." SPHINCS+ is "somewhat larger and slower than the other 
two" digital signature algorithms. NIST views SPHINCS+ as a "backup" algorithm 
to Dilithium and FALCON.

IBM researchers developed CRYSTALS-Kyber, CRYSTALS-Dilithium, and FALCON in 
collaboration with industry and academic partners. They are already available 
in some IBM products including the new IBM z16 servers. (Previous generations 
can of course use software implementations, and for many generations of IBM 
zSystems/LinuxONE servers the classic algorithms that are quantum-safe, such as 
AES-256, also enjoy deep hardware support.)

The significance of this NIST announcement is that you can (and should) start 
evaluating your systems and software for quantum safety if you haven't started 
already. There's still some more work on the standards front (such as an update 
to TLS) that's expected, but NIST's announcement is big news.

NIST hasn't been able to settle on a "backup" algorithm to CRYSTALS-Kyber yet, 
so NIST is leaving the door open for further refinement and evaluation of four 
candidate "general encryption" algorithms.

For more information

https://www.nist.gov/news-events/news/2022/07/nist-announces-first-four-quantum-resistant-cryptographic-algorithms
https://research.ibm.com/blog/nist-quantum-safe-protocols

— — — — —
Timothy Sipples
Senior Architect
Digital Assets, Industry Solutions, and Cybersecurity
IBM zSystems/LinuxONE, Asia-Pacific
sipp...@sg.ibm.com


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

Re: How do I issue a command with a blank in it?

[Peter Vels]

Try adding some apostrophes, e.g.

$TA,T=12.08,'$VS,''D T'''

works, but

$TA,T=12.08,'$VS,D T'

does not.



On Wed, 6 Jul 2022 at 20:47, Colin Paice  wrote:

> I've issued a command from SDSF with a blank it ,but it is not working
> properly.
> I issue
> /s PYT,,,'COLINs Data',p=CONSNEW
>
> and get on the system console
> IBMUSER  0290  S PYT,,,'COLINs Data',P=CONSNEW
>
>
>- p=CONSNEW is being ignored
>- I am trapping the command using QEDIT, and getting "COLINs."  .
>hex(length 0007 7DC3D6D3 C9D5A21F  COLINs.
>
>
> It works fine with 'COLINS_DATA'
>
> The doc says
>
> *parameters: Program parameters passed to the started program. This might
> be a list in parentheses or a string in single quotation marks. The
> documentation for the started program should state which of the following
> techniques the program supports:*
>
> Parenthesis do not work... I get
>
> S PYT,,,(COLINS DATA)
> IEE307I STARTDELIMITER ERROR
>
>
> what am I missing?
>
> Colin
>
> --
> 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: sys1.parmlib compare

[Paul Gilmartin]

On Wed, 6 Jul 2022 14:36:37 -0500, BM wrote:
>
>I would like to explore the rexx, Appreciate it if you have it handy and 
>share, yes Kolusu suggested one helped.
> 
Sounds like a self-training exercise.  I've used ISRSUPC only to compare single 
members/files,
not entire libraries.

You might use LMMLIST to enumerate members.  I'm aware of the service;
I've never used it.  Long ago, I have read a PDS directory as DSORG=PS,
RECFM=FB,BLKSIZE=256 and parsed the blocks according to the
record definitions in Using Data Sets.

Store the member lists in compound symbols.  (ISPF is stuck in the 1970s
and shuns compound symbols.)  Compare common members.  Don't
try to write your own compare routine.  Off-the-shelf tools are surely better.

-- 
gil

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

Re: sys1.parmlib compare

[Willy Jensen]

I have an ISPF based dialog to compare 2 libraries, and copy between them. See 
MLCMP at http://harders-jensen.com
Start by taking a look at the doc - click on the 'text' text in the righthand 
column. Note that the PDS86 program from cbtttape.org file 182 is required.

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

Re: Using SORT to generate sequential Dates

[Billy Ashton]

Hi Kolusu, and thanks for your help. I have been out for a few days, and 
got to work with it today. It is just what I need, and is easy enough to 
change the volume of data to add another month (which I was going to try 
later).


I appreciate all that you do, and for your expert knowledge!

Thank you and best regards,
Billy Ashton

-- Original Message --

From "Sri h Kolusu" 

To IBM-MAIN@listserv.ua.edu
Date 6/30/2022 6:14:04 PM
Subject Re: Using SORT to generate sequential Dates


Billy,

If I understand your requirement correctly, you need current month begin to end 
and 1 or 2 months before the current month. So if you are run the job 
today(June 30th), it will generate the dates from April 1st to June 30th.   If 
you run the job on July 1st then it would generate dates beginning May 1 thru 
May 31 , June 1 thru June 30 and July 1 thru July 31. If that is true, then use 
the following job which will give you the desired results.

//***
//* Generate DFSORT symbols for begin date and repeat value *
//* Begindate  =  Current month - 2 months (CCYYMM)  01 *
//* Enddate=  Last day of the current month (CCYYMMDD)  *
//* Repeatval  =  Number of entries (Enddate - Begmmdd) *
//***
//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
ABC
//SORTOUT  DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0))
//SYSINDD *
 OPTION COPY,STOPAFT=1,NULLOUT=RC4
 INREC OVERLAY=(01:DATE2-2,C'01',
11:DATE1,
21:11,08,Y4T,LASTDAYM,TOGREG=Y4T,
31:21,08,Y4T,DATEDIFF,01,08,Y4T)

 OUTFIL BUILD=(C'SDATE,C''',01,08,C,/,
   C'EDATE,C''',21,08,C,/,
   C'RPVAL,',31,08,UFF,ADD,+1,M11,LENGTH=8,
   80:X)
/*
//***
//* Use the symbols from previous step and generate the data*
//***
//STEP0200 EXEC PGM=SORT,COND=(0,LT)
//SYSOUT   DD SYSOUT=*
//SYMNOUT  DD SYSOUT=*
//SYMNAMES DD DISP=(OLD,PASS),DSN=&
//SORTIN   DD *
ABC
//SORTOUT  DD SYSOUT=*
//SYSINDD *
 OPTION COPY,STOPAFT=1,NULLOUT=RC4
 OUTFIL REPEAT=RPVAL,
 IFOUTLEN=80,
 IFTHEN=(WHEN=INIT,
  OVERLAY=(081:SDATE,
   091:SEQNUM,3,ZD,START=0,
   101:081,08,Y4T,ADDDAYS,091,3,ZD,TOGREG=Y4T)),
 IFTHEN=(WHEN=INIT,
 BUILD=(C'(''',C'D',SEQNUM,3,ZD,C''',',
C,101,04,C'-',105,02,C'-',107,02,C''',',
C,101,08,C''',',
101,08,C',',
C,101,02,C''',',
C,103,02,C''',',
C,105,02,C''',',
C,107,02,C''')'))
/*


Thanks,
Sri Hari Kolusu
DFSORT Development
IBM Corporation


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Billy Ashton
Sent: Thursday, June 30, 2022 2:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Using SORT to generate sequential Dates

Kolusu, the key data is that I have the previous month start and end date (for 
today, it would be May 1 and 31), with some range of dates before that. I also 
need at least the end of the current month (June 30, today). For running it 
tomorrow, I need at least June 1 - 30 (with some dates in May) and July 1 to 31.
Having more dates than this is fine, and is no problem to go back even another 
month and ahead even another month.

Billy

Sri h Kolusu wrote:






I need this for about 3 months worth of dates. . The dates should
start either on the 15th of the month, 2 months ago, or 45 days ago
(whichever is easier)





Billy,

It is easy to generate the dates in the required format, however  a
few clarifications needed.
•   Can the dates start from current date and go back to 3 months
of dates?
•   Do you want the ability of passing ANY VALID date and number
of entries needed?
•   3 months dates can result in 88 - 93 entries depending on the
current date. For example today's  Current-date is 2022-06-30 and
subtracting 3 months from it results in 2022-03-30. So we can have the
start date from March 30th and get to Current date which will be 93
days of data. Is that OK? If we always use 93 as number of entries to
generate then it might exceed the current date.  I can handle it
dynamically have the repeat value. Is that needed ? or is it ok to
have 93 entries of data?


Thanks,
Kolusu
DFSORT Development
IBM Corporation



--
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

SUSE Linux is hiring - Looking for a change?

[Mark Post]

Cross-posted to Linux-390, IBMVM, and IBM-Main

All,

SUSE Linux (SUSE LLC) is looking to add a mainframe proficient person to 
its software engineering staff. If you're interested in working full 
time with Linux, and Linux for IBM Z in particular, this might be the 
job for you.


More details on what we're looking for, what the person hired will be 
doing, and how to apply for the job can be found at:

https://jobs.suse.com/us/en/job/71003450/IBM-Mainframe-Consultant

Please note that although numerous geographical locations are listed, 
working remotely is 100% possible. We are already a geographically 
dispersed team, with multiple people working remotely.


If you want to ask questions before applying, please contact me 
**off-list** at mp...@suse.com, and I'll try to answer them, or find 
someone who can. Please do this off-list as some listserv subscribers 
work for companies that don't want their employees participating in 
lists where there's a lot of recruiting, etc., traffic in the list.



Thanks,

Mark Post

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

Re: sys1.parmlib compare

[BM]

Hey Paul.

I would like to explore the rexx, Appreciate it if you have it handy and share, 
yes Kolusu suggested one helped.

Thanks all for looking into this and helping.

Regards,

BM

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

NOTSP The Latin of Software Code Is Thriving - The New York Times

[Gabe Goldberg]

Next time you laugh at musty old tech, remember that new technologies 
are often built on it.


Caitlin Mooney is 24 years old and infatuated with technology that dates 
to the age of Sputnik.


Mooney, a recent New Jersey Institute of Technology graduate in computer 
science, is a fan of technologies that were hot a half-century ago, 
including computer mainframes and software called COBOL that powers 
them. That stuff won’t win any cool points in Silicon Valley, but it is 
essential technology at big banks, insurance companies, government 
agencies and other large institutions.


During Mooney’s job hunt, potential employers saw her expertise and 
wanted to talk about more senior positions than she was seeking. “They 
would get really excited,” Mooney told me. She’s now trying to decide 
between multiple job offers.


The resilience of decades-old computing technologies and the people who 
specialize in them shows that new technologies are often built on lots 
of old tech.


When you deposit money using your bank’s iPhone app, behind the scenes 
it probably involves computers that are the progeny of those used in the 
Apollo moon missions. (Also, half-century-old computer code is baked 
into the iPhone software.)


It’s often seen as a problem or a punchline that so much musty 
technology is still around. But it’s not necessarily an issue.


https://www.nytimes.com/2022/07/06/technology/cobol-jobs.html?smid=url-share 


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

Re: sys1.parmlib compare

[Paul Gilmartin]

On Wed, 6 Jul 2022 15:17:58 +, Burrell, Todd wrote:

>You will probably have to generate member lists for both PDS's and then you 
>can use REXX to generate the compare JCL member by member.  There may be a 
>quicker way with something like PDSTOOLS, but this is how I would attempt it.  
> 
Not to disparage Rexx, but won't ISRSUPC, as Kolusu has suggested, do all that
for you in one step?

MR. Natural says, Use the right tool for the job.

-- 
gil

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

Re: sys1.parmlib compare

[Steely.Mark]

This is the way I do it all the time:

//PARMLIB  EXEC PGM=ISRSUPC,
// PARM=(DELTAL,FILECMP) -this will just tell you if there 
is a difference(uncomment the one you want)   
//*PARM=(DELTAL,LINECMP)   -this will show you what the 
difference are
//NEWDDDD  DISP=SHR,DSN=SYS1.PARMLIB  
//OLDDDDD  DISP=SHR,DSN=SYS1.PARMLIB.NEW  
//*  
//OUTDDDD  SYSOUT=*  
//SYSINDD  DUMMY 
//*

Thanks  

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Burrell, Todd
Sent: Wednesday, July 06, 2022 10:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sys1.parmlib compare

ATTENTION: This e-mail came from an external source. Do not open attachments or 
click on links from unknown or unexpected emails.


You will probably have to generate member lists for both PDS's and then you can 
use REXX to generate the compare JCL member by member.  There may be a quicker 
way with something like PDSTOOLS, but this is how I would attempt it.

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Wednesday, July 6, 2022 10:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sys1.parmlib compare

≫ I am trying to compare members of sys1.parmlib from two different Operating 
systems (using SuperCE), Any other simple ways to do this, Like mass compare of 
members?

Run SuperC in Batch

//SUPERC  EXEC PGM=ISRSUPC,PARM=(DELTAL,ALLMEMS,FILECMP,'','')
//NEWDD   DD DISP=SHR,DSN=Your.PDS1
//OLDDD   DD DISP=SHR,DSN=Your.PDS2
//OUTDD   DD SYSOUT=*
//SYSIN   DD DUMMY


Thanks,
Kolusu


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN We comply with 
applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available:

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, Français, Tagalog, русский, 
Italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


--
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: sys1.parmlib compare

[Burrell, Todd]

You will probably have to generate member lists for both PDS's and then you can 
use REXX to generate the compare JCL member by member.  There may be a quicker 
way with something like PDSTOOLS, but this is how I would attempt it.  

Thanks

Todd Burrell | Sr. IT Systems Engineer | Mainframe

todd.burr...@bcbsfl.com
M 404.723.2017



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Wednesday, July 6, 2022 10:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: sys1.parmlib compare

≫ I am trying to compare members of sys1.parmlib from two different Operating 
systems (using SuperCE), Any other simple ways to do this, Like mass compare of 
members?

Run SuperC in Batch

//SUPERC  EXEC PGM=ISRSUPC,PARM=(DELTAL,ALLMEMS,FILECMP,'','')
//NEWDD   DD DISP=SHR,DSN=Your.PDS1
//OLDDD   DD DISP=SHR,DSN=Your.PDS2
//OUTDD   DD SYSOUT=*
//SYSIN   DD DUMMY


Thanks,
Kolusu


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
We comply with applicable Federal civil rights laws and do not discriminate.

You may access the Non-Discrimination and Accessibility Notice here 
.

Language Assistance Available: 

Español, Kreyol Ayisien, Tiếng Việt, Português, 中文, Français, Tagalog, русский, 
Italiano, Deutsche, 한국어, Polskie, Gujarati, ไทย, العربية, 日本語, فارسی 


Florida Blue is a trade name of Blue Cross and Blue Shield of Florida, Inc.  
Blue Cross and Blue Shield of Florida, Inc., and its subsidiary and affiliate 
companies are not responsible for errors or omissions in this e-mail message. 
Any personal comments made in this e-mail do not reflect the views of Blue 
Cross and Blue Shield of Florida, Inc.  The information contained in this 
document may be confidential and intended solely for the use of the individual 
or entity to whom it is addressed.  This document may contain material that is 
privileged or protected from disclosure under applicable law.  If you are not 
the intended recipient or the individual responsible for delivering to the 
intended recipient, please (1) be advised that any use, dissemination, 
forwarding, or copying of this document IS STRICTLY PROHIBITED; and (2) notify 
sender immediately by telephone and destroy the document. THANK YOU.


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

Re: GIMAPI and ZONEINDEX

[ITschak Mugzach]

We was able to query on anything in global zone ( this is a global zone
only dataset). The strange issue is that if we specify GLOBAL as subentry
we get SREL, OPTION and some other items including first entry of the
zoneindex. Why does GIMAPI returns all this data if subentry is global?

GIMAPI does not verify the value of subentry and you can specify any value.
It only verify the entry and the zone ( in zoneindex…).

ITschk

בתאריך יום ד׳, 6 ביולי 2022 ב-17:37 מאת Kurt J. Quackenbush <
ku...@us.ibm.com>:

> > QIFGIMQZ is an assembler program that is called by LINKMVS. If I supply
> wrong value, for example ZONEINDEC instead of ZONEINDEX, I get an error
> telling that the entrytype is wrong. It seems that GIMAPI is aware of the
> ENTRY and SUBENTRY  values I pass to it.
>
> Did you write this assembler program?  Do you know for sure it is not
> doing something unique for your GLOBALZONE ZONEINDEX query request?
>
> > What is the difference between DDDEF and XONEINDEX? if it is coded
> correctly and recognized by GIMAPI?
>
> > Again, this z/os 2.3, I'll try it on z/os 2.5 but I believe this is not
> the problem.
>
> I agree, I do not think your release of z/OS is the issue.  Are you sure
> the data set you specify on the CSI parameter contains an actual global
> zone with a ZONEINDEX subentry?  As opposed to a CSI data set that contains
> only target or dlib zones.  Can you run the SMP/E LIST GLOBALZONE command
> when the SMPCSI DD statement points to the same exact data set name and do
> you get the expected results?
>
> 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
>
-- 
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *

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

Re: GIMAPI and ZONEINDEX

[Kurt J. Quackenbush]

> QIFGIMQZ is an assembler program that is called by LINKMVS. If I supply wrong 
> value, for example ZONEINDEC instead of ZONEINDEX, I get an error telling 
> that the entrytype is wrong. It seems that GIMAPI is aware of the ENTRY and 
> SUBENTRY  values I pass to it.

Did you write this assembler program?  Do you know for sure it is not doing 
something unique for your GLOBALZONE ZONEINDEX query request?

> What is the difference between DDDEF and XONEINDEX? if it is coded correctly 
> and recognized by GIMAPI?

> Again, this z/os 2.3, I'll try it on z/os 2.5 but I believe this is not the 
> problem.

I agree, I do not think your release of z/OS is the issue.  Are you sure the 
data set you specify on the CSI parameter contains an actual global zone with a 
ZONEINDEX subentry?  As opposed to a CSI data set that contains only target or 
dlib zones.  Can you run the SMP/E LIST GLOBALZONE command when the SMPCSI DD 
statement points to the same exact data set name and do you get the expected 
results?

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: sys1.parmlib compare

[Sri h Kolusu]

≫ I am trying to compare members of sys1.parmlib from two different Operating 
systems (using SuperCE), Any other simple ways to do this, Like mass compare of 
members?

Run SuperC in Batch

//SUPERC  EXEC PGM=ISRSUPC,PARM=(DELTAL,ALLMEMS,FILECMP,'','')
//NEWDD   DD DISP=SHR,DSN=Your.PDS1
//OLDDD   DD DISP=SHR,DSN=Your.PDS2
//OUTDD   DD SYSOUT=*
//SYSIN   DD DUMMY


Thanks,
Kolusu


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

Re: How do I issue a command with a blank in it?

[Paul Gilmartin]

On Wed, 6 Jul 2022 11:47:17 +0100, Colin Paice wrote:

>I've issued a command from SDSF with a blank it ,but it is not working
>properly.  ...
>
>The doc says
>
Which doc?  SDSF?  System Commands?  Other (specify)?

>*parameters: Program parameters passed to the started program. This might
>be a list in parentheses or a string in single quotation marks.  ...
>
What happens if you issue the command with MGCR?

What happens for "//STEP  EXEC  PGM=PYT,PARM='COLINs Data'"?

Submit an SR.

-- 
gil

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

Re: SMF Record types to capture

[Bonnie Ordonez]

The SMF type/subtype combinatorics is not quite that high. While the SMF record 
header extended record type field, as well as the subtype field,are each 2 
bytes, SMF accepts record types 0-2047 to be recorded, and accepts 32767 
subtypes off of a given  record type. 

Bonnie Ordonez

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

Re: Buttons, we got buttons...

[Seymour J Metz]

When was MF/1 crossed with NFG?


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Bob 
Bridges [robhbrid...@gmail.com]
Sent: Monday, July 4, 2022 7:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Buttons, we got buttons...

LOL, I clearly remember some buttons on a cubicle wall, buttons a coworker had 
taken home from a sci-fi or possibly software convention (I don't remember).  
The first one I saw said "This universe is full of magical things patiently 
waiting for us to grow smarter".  Another said "Good, fast, cheap: Pick two".

That was in fall 1996; it was the beginning of my tagline file, which you've 
all been suffering from.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* ...critics of democracy, including friendly critics, have always pointed out 
that the Achilles' heel of democracy is its tendency to turn the ballot box 
into an instrument of plunder, as voters learn to vote for those who promise 
them other people's money.  -Joseph Sobran */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Gabe Goldberg
Sent: Monday, July 4, 2022 15:33

Bill Bitner (just retired from IBM Endicott after 36 years 11 months) has a 
SHARE/VM/etc. button collection.

At recent VM Workshop celebrating VM's 50th anniversary, I promised to share 
mine, send him any he'd like to add to his trove.

So here are lots of buttons spanning decades!

Spread out on basement floor.

https://secure-web.cisco.com/1bZ1SUd9takSKEgV3DvzE69_yhA3ZJxW6E31R_9ijTRJWy4vmtA3FSeLweEIxh1GzOU8c8nM9fxNRjGBRR2POgJ6uHWLcM5L48OdQVHxC5l6Se-DchzS7GxDodbzDwgT9aAO0WyVPunnxNaga3RlpxITJvyyvY65H2hsS4gTgz0ALkyMgf1uHsYKgOdIP0gA5KM48bHPb4lvQ3W1NwapIbnuOsdQHThCDnFy4Bc3axaP3NSG6Tc4bVKwkJhpkNJ1-X9VfAF9IxR3xv11zwchCI0OfuMmVHRpDBS-JBwNnxVE11QtvU0BGA6PGz4h9TiqjGMOX5xyu1IV81QrNCQuBzyhZJw_DgF-GiRE8EXBS7sWdTg1rFnFQ7m8GGO-KPwXCuis8IFmi6XZ-Y9Va4PUbOBq_Rth_oVGH8S-BZ3eF81P04c05vfYXV5QBxhuKToP-/https%3A%2F%2Fshare.icloud.com%2Fphotos%2F09b-e_A0o9IhBXd6qQ_puAyng

Bunch of photos and a panning video.

I told him to pick what he wants before my wife makes me pick them up!

--
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

How do I issue a command with a blank in it?

[Colin Paice]

I've issued a command from SDSF with a blank it ,but it is not working
properly.
I issue
/s PYT,,,'COLINs Data',p=CONSNEW

and get on the system console
IBMUSER  0290  S PYT,,,'COLINs Data',P=CONSNEW


   - p=CONSNEW is being ignored
   - I am trapping the command using QEDIT, and getting "COLINs."  .
   hex(length 0007 7DC3D6D3 C9D5A21F  COLINs.


It works fine with 'COLINS_DATA'

The doc says

*parameters: Program parameters passed to the started program. This might
be a list in parentheses or a string in single quotation marks. The
documentation for the started program should state which of the following
techniques the program supports:*

Parenthesis do not work... I get

S PYT,,,(COLINS DATA)
IEE307I STARTDELIMITER ERROR


what am I missing?

Colin

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

Re: Some questions on SYSCALL

[Seymour J Metz]

When I select a language for a job, one of the things that I look at is the 
ecosystem. I prefer ooRexx to Perl, but I find myself using 
Perl for some tasks because CPAN is an awesome resource. Python may not be the 
best language for the task at hand, but it pays to check what packages are 
available.


From: IBM Mainframe Discussion List  on behalf of 
Bernd Oppolzer 
Sent: Wednesday, June 29, 2022 5:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Some questions on SYSCALL

The only reason why your Python code is shorter is because you use
the builtin os.walk method to walk through the directory recursively.
A similar method could have been used in my REXX example, too,
but I wanted a command to be issued in every subdirectory
when walking through the tree,
so I had to do the recursive directory walk myself, using the recursive
call
to the tree procedure. This is what makes my coding longer,
but this is not due to the REXX language. Be fair.

To call this verbose is simply wrong, and you are missing the point
completely;
please show me how your Python solution looks, if you also walk the
directory tree
by yourself and issue a command given as a parameter at every subdirectory
and not only print the name.

but I don't really want to argue on this ... this seems like a waste ot
time.

I use the tools I have at hand ... and I didn't have Python in 1998 on
my OS/2 boxes.
This has nothing to do with personal favor; I use the tools which make
the most
sense for me, given my knowledge or my personal skills (which can of course
change or improve over time).

Earlier in a similar thread I told you or other posters how easy it is
to append
small pieces of information every 15 minutes to a file using IBM's C
and still having a large blocksize etc. ... and how I would support
the simultaneous update and the reporting. The thread degraded into a
discussion about started tasks and how to implement the operator commands
to control the STCs using REXX or other languages ... again: what a
waste of time.
For appending information to a file every 15 minutes, I would create a
batch job
which is started every 15 minutes, controlled by UC4 or cron or whatever
you have
... and which terminates after some milliseconds. No need for a started
task,
which is idle most of the time.

I miss sometimes a certain cost sensitivity with the discussions here in
IBM-MAIN,
but this should be part of our profession.

Kind regards

Bernd



Am 29.06.2022 um 23:24 schrieb David Crayford:
> On 30/06/2022 4:22 am, Bernd Oppolzer wrote:
>>>
>> This is an old OS/2 REXX program (from the 1990s, IIRC),
>> used to traverse a directory tree recursively and issue a command in
>> every subdirectory found:
>>
>>
>> /* rexx */
>>
>> arg command
>>
>> call RxFuncAdd "SysLoadFuncs", "REXXUTIL", "SysLoadFuncs"
>> call SysLoadFuncs
>>
>> dir = directory()
>> if right(dir,1) = "\" then
>>dir = left(dir, length(dir) - 1)
>>
>> call tree dir, command
>>
>> x = directory(dir)
>>
>> exit
>>
>>
>> tree: procedure
>>
>>arg dir, command
>>
>>say "*** Verzeichnis in Bearbeitung: "dir" ***"
>>
>>x = directory(dir)
>>
>>command
>>
>>rc = SysFileTree("*.*", verz, "D")
>>do i = 1 to verz.0
>>   dir = word(verz.i, 5)
>>   call tree dir, command
>>end
>>
>>return
>>
>>
>> you may notice the recursive call of the procedure "tree".
>>
>> I don't see any justification for your REXX bashing;
>> it's just another flavor of scripting language, which allows to do
>> great things,
>> once you manage to use it.
>
> Sorry Brend, but I don't consider that snippet to be great! It's a
> perfect example of flabby, verbose REXX code. The only justification
> for using REXX is that you personally favor the language. Python is
> far more succinct.
>
> |for| |root, dirs, files ||in| |os.walk(path_of_the_directory):|
> |||for| |i ||in| |files:|
> |||print||(os.path.join(root, i))|
>
>
> --
> 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