Re: Caution: "Hacked" email caused the distribution of a potentially harmful attachment

2020-09-23 Thread Wayne Bickerdike
My "spoof" email was apparently genuine. The person who sent it has no idea
how much he got wrong with the request.



On Thu, Sep 24, 2020 at 12:44 PM Seymour J Metz  wrote:

> That's not reliable either, and there are many different ways of being
> flawed, some more serious than others. The model that you proposed is
> deeply flawed for anybody that doesn't have a closed set of correspondents
> using an identical security model.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of CM Poncelet 
> Sent: Wednesday, September 23, 2020 9:10 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a
> potentially harmful attachment
>
> All software filters are fundamentally flawed, because they presume to
> recognize and 'understand' what is or not SPAM - which is logically
> impossible. The only reliable filter is the hardware one, which assumes
> by default that every received email is SPAM *unless* a message filter
> rule says it is legitimate. That is how ACF2 enforced security - by
> denying any access to a resource unless an ACF rule permitted it.
>
>
>
> On 22/09/2020 23:14, Seymour J Metz wrote:
> > The commercial filters are mostly broken in all sorts of fascinating
> ways. If it's an option your best choice is to find a provider competent to
> select or write decent filters.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> >
> > 
> > From: IBM Mainframe Discussion List  on
> behalf of Charles Mills 
> > Sent: Tuesday, September 22, 2020 5:25 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Caution: "Hacked" email caused the distribution of a
> potentially harmful attachment
> >
> > The commercial e-mail malware filters watch for e-mail where the "from"
> address and the headers do not match.
> >
> > They did not used to. The *SPAM* filters watched for the mis-match, but
> not the malware filters. The notorious RSA hack began with a spear-phishing
> e-mail with an attachment of an Excel spreadsheet containing a zero-day
> exploit. RSA's SPAM filter caught it! However, two enterprising employees
> dragged the e-mail out of their SPAM folder and opened it and the attached
> spreadsheet.
> >
> > Ever since then the malware filter publishers have been watching for
> this mismatch and treating it as potential malware rather than merely
> potential SPAM.
> >
> > Charles
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> On Behalf Of CM Poncelet
> > Sent: Tuesday, September 22, 2020 2:05 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Caution: "Hacked" email caused the distribution of a
> potentially harmful attachment
> >
> > Hence, check your trash/deleted folder and then create message filters
> > for any legitimate emails it contains, then run your message filters
> > against your trash/deleted folder to move the legitimate emails out of
> > there and into your "Inbox" folder or whatever other appropriate folders
> > - and these legitimate emails will then no longer be trapped as
> > spam/scam emails. What these 'not spam/scam' message filters should
> > contain and check for is up to 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
> > .
> >
>
> --
> 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
>


-- 
Wayne V. Bickerdike

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


Re: IEFDDSRV  DD service

2020-09-23 Thread Jim Mulder
 BTFOOM.Here is some stuff,  but not complete, at least
for UCBTYBT4:

 BROWSESYS1.MACLIB(IEFUCBOB)Line 000864 
 Command ===>  Scrol
UCBDVCLS DS0B  Same as UCBTBYT3 
UCBTBYT3 DSB   Class bits 
UCB3TAPE EQU   X'80'   Tape 
UCB3COMM EQU   X'40'   Communications 
UCB3CTC  EQU   X'41'   Channel-to-channel adapter 
UCB3DACC EQU   X'20'   Direct access 
UCB3DISP EQU   X'10'   Display 
UCB3UREC EQU   X'08'   Unit record 
UCB3CHAR EQU   X'04'   Character reader 
UCBRSV10 EQU   X'02'   Reserved 
UCBRSV11 EQU   X'01'   Reserved 

 BROWSESYS1.MODGEN(IECDUCBC)Line 000165 Col
 Command ===>  Scroll =
*//
*/*  UCBTBYT4 mapping*/
*//
UCBPCTC  EQU   X'00'   Parallel CTC@01A
UCBSCTC  EQU   X'01'   Serial CTC  @01A
UCBBCTC  EQU   X'02'   Basic Mode ESCON CTC@02A
UCBRS6K  EQU   X'03'   RS6000 acting like a CTC@D1A
UCB3172  EQU   X'04'   3172 acting like a CTC  @D1A
UCBOSA   EQU   X'05'   OSA device  @03A
UCBOSAD  EQU   X'06'   OSA diagnostic device   @03A
UCBIQD   EQU   X'07'   Internal Queued Direct 
*  Communications Device   @L2A
UCBOSN   EQU   X'08'   OSA NCP (OSN) device@07A
UCBOSX   EQU   X'09'   OSX (OSA zBX Data Network)  @08A
UCBOSM   EQU   X'0A'   OSM (OSA zBX Management 
*  Network)@08A
UCBOSAF  EQU   X'0F'   OSA reserved device types B-F   @08C
UCBFCTC  EQU   X'20'   FICON CTC   @06A
UCBFBRC  EQU   X'21'   Fabric discovery device @L6A 

 BROWSESYS1.MODGEN(IECDUCBE)Line 84 Col
 Command ===>  Scroll =
*UCBTBYT4 Flag Byte 
UCB3791L  EQU   X'F1' 3791 Local control unit 
UCB42AD1  EQU   X'11' 2702 Control unit with type 1 
* adapter 


 BROWSESYS1.MODGEN(IECDUCBT)Line 000511 Col 
 Command ===>  Scroll ==
*UCBTBYT4 (UCBUNTYP) values 
* 
UCB3400  EQU   X'03'   3400 magnetic tape 
UCB3423  EQU   X'82'   3423 magnetic tape  @H4A 
UCB3480  EQU   X'80'   3480 magnetic tape 
UCB3490  EQU   X'81'   3490 magnetic tape  @H3A 
UCB3591  EQU   X'83'   3590 magnetic tape  @H5A 

 BROWSESYS1.MODGEN(IECDUCBU)Line 000453 Col
 Command ===>  Scroll =
* UCBUNTYP (UCBTBYT4) Flag Byte 
***  EQU   X'08'  1403 Printer 
UCB3211  EQU   X'09'  3211 Printer 
UCB3800  EQU   X'0E'  3800 Printing Subsystem 
UCBAFP1  EQU   X'0F'  Printer support 
UCB3263  EQU   X'11'  3263 Printer 
UCB4245  EQU   X'11'  4245 Printer 
UCB4248  EQU   X'13'  4248 Printer 
UCB3895  EQU   X'19'  3895 device 
UCBDIR   EQU   X'3A'  ESCON or FICON Director @L1A 
UCBDSM   EQU   X'42'  Mass Storage Control (MSC) (3851) 
* (no longer supported) 
UCB3838  EQU   X'4C'  3838 Array Processor 
UCBFBA   EQU   X'60'  Fixed Block Architecture (FBA)  @FBA 
 

IECLMSGC
CON5 BIT(8)CONSTANT('0101'B),/* constant '05'x  */
CONF BIT(8)CONSTANT(''B),/* constant '0F'x  */
IF UCBTBYT4='F1'X THEN/* 3791 ? 
 IF (UCBTBYT4)=CON5 THEN/* 370x ? 

IECLMSGU
IF (OVERRUN=ON)&(UCBTBYT4='04'X|UCBTBYT4='05'X) THEN /* 
   over run and d/t2501   @ZA94924 
   and d/t2520?   @ZA94924*/
IF (UNITTP=ON)&((UCBTBYT4='01'X)|(UCBTBYT4='02'X)) 
   THEN   /* unit record check and 2540 card 
 read punch?*/
 
   /* If it is a 3540 disket divice and the volume serial number 
  is valid, picks volume serial number from UCB.*/
IF (UCBTBYT4='44'X)&(UCBVLSER¬=NOVOLSER) THEN 

IECVEXCP
UCB3525  EQU   X'0C'   3525 DEVICE TYPE DESCRIPTION
CLI   UCBTBYT4,UCB3525IS THIS A 3525

IECVIOPM
IF ((UCBTBYT3 = UCBCOMM) &   /* Communcations device class   @41C*/
(UCBTBYT4 <= HEX94)  &   /* Old TP device type  

Re: IEFDDSRV — DD service

2020-09-23 Thread Seymour J Metz
IEFUCBOB has some equates for UCBTYPE, but doesn't give classes for pseudo UCBs 
or device types for real UCBs. What, if anything, gives a complete list of 
values for UCBDVCLS and UCBUNTYP (UCBTBYT3 and UCBTBYT4)? Thanks.


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



From: IBM Mainframe Discussion List  on behalf of Jim 
Mulder 
Sent: Wednesday, September 23, 2020 10:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IEFDDSRV — DD service

  If you want to complain that the PI field name UCBDUMMY
is generated only if you specify SSMD=YES, which is
designated for IOS use only, that seems like a valid
complaint.  Also, ADM is another  valid type of
dummy UCB, but that is not in the list in the comment
on UCBDUMMY.


 BROWSESYS1.MACLIB(IEFUCBOB)

 MACRO
 IEFUCBOB =YES,=NO,=NO,=


*/*02* PI:   FIELDS UCBDUMMY @PGA*/
*/* UCBALOC UCBCHAN UCBCHGS UCBDADI UCBDVCLS @LFA*/
*/* UCBPRES UCBPUB UCBRESV UCBSYSR UCBTBYT1  @LFA*/
*/* UCBTBYT2 UCBTBYT3 UCBTBYT4 UCBTYP UCBUNTYP   @LFA*/
*/* UCBONLI UCBUNLD UCBASID UCBAUTOS @PAC*/
*/* UCBID UCBMTPXP UCBNOCON UCBNRY   @LFA*/
*/* UCBVRDEV UCBSTND UCBCLEXT UCBREW @LFA*/


*/*  SSMD is used to control the UCB mapping. The*/
*/*  valid operands and their meanings are:  */
*/*  */
*/* NO   - Generates the standard UCB mapping. This is the   */
*/*default.  */
*/*  */
*/* YES  - Generates the UCB mapping that is used internally */
*/*by IOS. This mapping is for IOS use only. */
*/*  */


*/*  $PG=ME26777  HBB77A0  150228  PDSW: Update ext classification   */
*/*  for UCBDUMMY to PI  @PGA*/

 AIF   ('' NE 'YES').UCB005   @L7A
UCBDUMMY DSCL3 Dummy UCBs use this field to@M5C
*  identify the type of dummy UCB. @M5A
*  VIO, SMS and JES are valid  @M5A
*  types of dummy UCBs @M5A
 AGO   .UCB006 @L7A
.UCB005  ANOP  @L7A
UCBNAME  DSCL3 Device number (EBCDIC)
.UCB006  ANOP  @L7A




Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp.
Poughkeepsie NY

"IBM Mainframe Discussion List"  wrote on
09/23/2020 03:56:10 PM:

> From: "Mark Jacobs" <0224d287a4b1-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/23/2020 10:32 PM
> Subject: IEFDDSRV — DD service
> Sent by: "IBM Mainframe Discussion List" 
>
> I'm reading the documentation and it's telling me this;
>
> In some cases, this service may not return a device UCB, but instead
> may return a zero UCB address or the address of a dummy UCB. This
> may occur for DDs that represent DD DUMMY requests, VIO data sets,
> SYSOUT data sets, in-stream data sets, and some SMS-managed data
> sets. A dummy UCB can be identified using the UCBDUMMY field in the
> UCB. A dummy UCB may not have all of the UCB segments that a device
> UCB may have and not all services that are used for processing
> device UCBs may support dummy UCBs.
>
> I don't see a UCBDUMMY field in mapping macro IEFUCBOB.
>
> Mark Jacobs



--
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: Caution: "Hacked" email caused the distribution of a potentially harmful attachment

2020-09-23 Thread Seymour J Metz
That's not reliable either, and there are many different ways of being flawed, 
some more serious than others. The model that you proposed is deeply flawed for 
anybody that doesn't have a closed set of correspondents using an identical 
security model.


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



From: IBM Mainframe Discussion List  on behalf of CM 
Poncelet 
Sent: Wednesday, September 23, 2020 9:10 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Caution: "Hacked" email caused the distribution of a potentially 
harmful attachment

All software filters are fundamentally flawed, because they presume to
recognize and 'understand' what is or not SPAM - which is logically
impossible. The only reliable filter is the hardware one, which assumes
by default that every received email is SPAM *unless* a message filter
rule says it is legitimate. That is how ACF2 enforced security - by
denying any access to a resource unless an ACF rule permitted it.



On 22/09/2020 23:14, Seymour J Metz wrote:
> The commercial filters are mostly broken in all sorts of fascinating ways. If 
> it's an option your best choice is to find a provider competent to select or 
> write decent filters.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Charles Mills 
> Sent: Tuesday, September 22, 2020 5:25 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a potentially 
> harmful attachment
>
> The commercial e-mail malware filters watch for e-mail where the "from" 
> address and the headers do not match.
>
> They did not used to. The *SPAM* filters watched for the mis-match, but not 
> the malware filters. The notorious RSA hack began with a spear-phishing 
> e-mail with an attachment of an Excel spreadsheet containing a zero-day 
> exploit. RSA's SPAM filter caught it! However, two enterprising employees 
> dragged the e-mail out of their SPAM folder and opened it and the attached 
> spreadsheet.
>
> Ever since then the malware filter publishers have been watching for this 
> mismatch and treating it as potential malware rather than merely potential 
> SPAM.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of CM Poncelet
> Sent: Tuesday, September 22, 2020 2:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a potentially 
> harmful attachment
>
> Hence, check your trash/deleted folder and then create message filters
> for any legitimate emails it contains, then run your message filters
> against your trash/deleted folder to move the legitimate emails out of
> there and into your "Inbox" folder or whatever other appropriate folders
> - and these legitimate emails will then no longer be trapped as
> spam/scam emails. What these 'not spam/scam' message filters should
> contain and check for is up to 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
> .
>

--
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: IEFDDSRV — DD service

2020-09-23 Thread Jim Mulder
  If you want to complain that the PI field name UCBDUMMY
is generated only if you specify SSMD=YES, which is 
designated for IOS use only, that seems like a valid
complaint.  Also, ADM is another  valid type of 
dummy UCB, but that is not in the list in the comment
on UCBDUMMY.


 BROWSESYS1.MACLIB(IEFUCBOB) 

 MACRO 
 IEFUCBOB =YES,=NO,=NO,= 


*/*02* PI:   FIELDS UCBDUMMY @PGA*/
*/* UCBALOC UCBCHAN UCBCHGS UCBDADI UCBDVCLS @LFA*/
*/* UCBPRES UCBPUB UCBRESV UCBSYSR UCBTBYT1  @LFA*/
*/* UCBTBYT2 UCBTBYT3 UCBTBYT4 UCBTYP UCBUNTYP   @LFA*/
*/* UCBONLI UCBUNLD UCBASID UCBAUTOS @PAC*/
*/* UCBID UCBMTPXP UCBNOCON UCBNRY   @LFA*/
*/* UCBVRDEV UCBSTND UCBCLEXT UCBREW @LFA*/


*/*  SSMD is used to control the UCB mapping. The*/
*/*  valid operands and their meanings are:  */
*/*  */
*/* NO   - Generates the standard UCB mapping. This is the   */
*/*default.  */
*/*  */
*/* YES  - Generates the UCB mapping that is used internally */
*/*by IOS. This mapping is for IOS use only. */
*/*  */


*/*  $PG=ME26777  HBB77A0  150228  PDSW: Update ext classification   */
*/*  for UCBDUMMY to PI  @PGA*/

 AIF   ('' NE 'YES').UCB005   @L7A
UCBDUMMY DSCL3 Dummy UCBs use this field to@M5C
*  identify the type of dummy UCB. @M5A
*  VIO, SMS and JES are valid  @M5A
*  types of dummy UCBs @M5A
 AGO   .UCB006 @L7A
.UCB005  ANOP  @L7A
UCBNAME  DSCL3 Device number (EBCDIC) 
.UCB006  ANOP  @L7A




Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
Poughkeepsie NY

"IBM Mainframe Discussion List"  wrote on 
09/23/2020 03:56:10 PM:

> From: "Mark Jacobs" <0224d287a4b1-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/23/2020 10:32 PM
> Subject: IEFDDSRV — DD service
> Sent by: "IBM Mainframe Discussion List" 
> 
> I'm reading the documentation and it's telling me this;
> 
> In some cases, this service may not return a device UCB, but instead
> may return a zero UCB address or the address of a dummy UCB. This 
> may occur for DDs that represent DD DUMMY requests, VIO data sets, 
> SYSOUT data sets, in-stream data sets, and some SMS-managed data 
> sets. A dummy UCB can be identified using the UCBDUMMY field in the 
> UCB. A dummy UCB may not have all of the UCB segments that a device 
> UCB may have and not all services that are used for processing 
> device UCBs may support dummy UCBs.
> 
> I don't see a UCBDUMMY field in mapping macro IEFUCBOB.
> 
> Mark Jacobs



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


Re: Caution: "Hacked" email caused the distribution of a potentially harmful attachment

2020-09-23 Thread CM Poncelet
All software filters are fundamentally flawed, because they presume to
recognize and 'understand' what is or not SPAM - which is logically
impossible. The only reliable filter is the hardware one, which assumes
by default that every received email is SPAM *unless* a message filter
rule says it is legitimate. That is how ACF2 enforced security - by
denying any access to a resource unless an ACF rule permitted it.
 


On 22/09/2020 23:14, Seymour J Metz wrote:
> The commercial filters are mostly broken in all sorts of fascinating ways. If 
> it's an option your best choice is to find a provider competent to select or 
> write decent filters.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Charles Mills 
> Sent: Tuesday, September 22, 2020 5:25 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a potentially 
> harmful attachment
>
> The commercial e-mail malware filters watch for e-mail where the "from" 
> address and the headers do not match.
>
> They did not used to. The *SPAM* filters watched for the mis-match, but not 
> the malware filters. The notorious RSA hack began with a spear-phishing 
> e-mail with an attachment of an Excel spreadsheet containing a zero-day 
> exploit. RSA's SPAM filter caught it! However, two enterprising employees 
> dragged the e-mail out of their SPAM folder and opened it and the attached 
> spreadsheet.
>
> Ever since then the malware filter publishers have been watching for this 
> mismatch and treating it as potential malware rather than merely potential 
> SPAM.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of CM Poncelet
> Sent: Tuesday, September 22, 2020 2:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a potentially 
> harmful attachment
>
> Hence, check your trash/deleted folder and then create message filters
> for any legitimate emails it contains, then run your message filters
> against your trash/deleted folder to move the legitimate emails out of
> there and into your "Inbox" folder or whatever other appropriate folders
> - and these legitimate emails will then no longer be trapped as
> spam/scam emails. What these 'not spam/scam' message filters should
> contain and check for is up to 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
> .
>

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


Re: IEFDDSRV ― DD service

2020-09-23 Thread Seymour J Metz
There's one mention of UBDUMMY as GUPI, but it doesn't define it as a bit mask, 
field or value.


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



From: IBM Mainframe Discussion List  on behalf of 
Mark Jacobs <0224d287a4b1-dmarc-requ...@listserv.ua.edu>
Sent: Wednesday, September 23, 2020 6:07 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IEFDDSRV ― DD service

Thanks. I wonder why that service specifically mentions UCBDUMMY, that doesn't 
seem to exist. I searched IBMLINK for it, no hits either.

Mark Jacobs

Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://secure-web.cisco.com/1n82Qc4PVBQOw_4rNA4psTDtPDRlQBJxsweP5xjBOJX-Viw1hqa-NK8e0CGcKsH4KczbEcDtgJ-pq1Z8d4do3y0qtUR4PZLkgvho4Pm6PbnhnPSRYFT07cRa5ZPw2Z_8e_sdaF-7I2XJzPw5VmBGiYpd6co4N0SALsMxoU0AtFXpycpbIl0syaUq-UPNGc_A3RJhXmYSC77xHlyDl-RKwT2JClwDUuq2F9Sa6QA6Phnzvm-Nv72iMkY9OnycuilVIUZY8j3C4jWHQUa5IMVcli51V8RkWYuq-H53Q6eu4FGT79ArEIVLmVJSNjTiU-pjnThJOLPQTzmmERoBYvXxHtn2Kl3Ql2QMv0xDNSke39fpvspMZ3j1je9rZ6PkEx7yvg4MiJPMJmFbbURBkQyiMKufciqceq_6Y3Bc4x2fvPklCZPvxceETTzdTLlEtF-UX/https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.com

�\�\�\�\�\�\�\ Original Message �\�\�\�\�\�\�\
On Wednesday, September 23, 2020 5:47 PM, Seymour J Metz  wrote:

> I believe that you have to examine UCBDVCLS and UCBUNTYP (UCBTBYT3 and 
> UCBTBYT4), and I vaguely recall that there is a mapping macro for them.
>
>
> 
>
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU on behalf of 
> Mark Jacobs 0224d287a4b1-dmarc-requ...@listserv.ua.edu
>
> Sent: Wednesday, September 23, 2020 3:56 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: IEFDDSRV ― DD service
>
> I'm reading the documentation and it's telling me this;
>
> In some cases, this service may not return a device UCB, but instead may 
> return a zero UCB address or the address of a dummy UCB. This may occur for 
> DDs that represent DD DUMMY requests, VIO data sets, SYSOUT data sets, 
> in-stream data sets, and some SMS-managed data sets. A dummy UCB can be 
> identified using the UCBDUMMY field in the UCB. A dummy UCB may not have all 
> of the UCB segments that a device UCB may have and not all services that are 
> used for processing device UCBs may support dummy UCBs.
>
> I don't see a UCBDUMMY field in mapping macro IEFUCBOB.
>
> Mark Jacobs
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key - 
> https://secure-web.cisco.com/1LWMSSaDWUlpY9gIzqXBpqUeduXaHVw7wSL1fxkzoPEp6ost7Tz4HLtoTrkq3WsGNB69Ba-cB7JZRryVy6EFfT2xx5gvcQfgJmfYlq5LEDbCSTyTliEHg0EFLcax8x4fF6dO22S_p5J2J-n1d-Hi-NR6nKSGOhyBN4h1R2f3spletxjRUzvmhnlnuiN5ubY5v7enJ4NsYPYNHZcZOkebLtvKTIXXJ8ucI5HEvvx_9vh-KHbanQtCgORB2QQDYAFH9LUuWgRYQZQo1CrhK10uAybzFwUICusdQsBkSBdgTk-FwRV4TiIpGVFyBloU_U5WDsnRixnWTI9auZ0Pbwy0Pm1XyJNyXuTEJ4GsH_phBOEXUFTppYUf0J1nA6WP2kqy5U7vzWTrbw5adToJjmRKK7qb8e_a-ElI1i2qFt8a0qV2026r2FftMz6bYFmnM6h32/https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.com
>
> 
>
> 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,
> 

Re: IEFDDSRV — DD service

2020-09-23 Thread Mark Jacobs
Thanks. I wonder why that service specifically mentions UCBDUMMY, that doesn't 
seem to exist. I searched IBMLINK for it, no hits either.

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 Wednesday, September 23, 2020 5:47 PM, Seymour J Metz  wrote:

> I believe that you have to examine UCBDVCLS and UCBUNTYP (UCBTBYT3 and 
> UCBTBYT4), and I vaguely recall that there is a mapping macro for them.
>
>
> 
>
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU on behalf of 
> Mark Jacobs 0224d287a4b1-dmarc-requ...@listserv.ua.edu
>
> Sent: Wednesday, September 23, 2020 3:56 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: IEFDDSRV — DD service
>
> I'm reading the documentation and it's telling me this;
>
> In some cases, this service may not return a device UCB, but instead may 
> return a zero UCB address or the address of a dummy UCB. This may occur for 
> DDs that represent DD DUMMY requests, VIO data sets, SYSOUT data sets, 
> in-stream data sets, and some SMS-managed data sets. A dummy UCB can be 
> identified using the UCBDUMMY field in the UCB. A dummy UCB may not have all 
> of the UCB segments that a device UCB may have and not all services that are 
> used for processing device UCBs may support dummy UCBs.
>
> I don't see a UCBDUMMY field in mapping macro IEFUCBOB.
>
> Mark Jacobs
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key - 
> https://secure-web.cisco.com/1LWMSSaDWUlpY9gIzqXBpqUeduXaHVw7wSL1fxkzoPEp6ost7Tz4HLtoTrkq3WsGNB69Ba-cB7JZRryVy6EFfT2xx5gvcQfgJmfYlq5LEDbCSTyTliEHg0EFLcax8x4fF6dO22S_p5J2J-n1d-Hi-NR6nKSGOhyBN4h1R2f3spletxjRUzvmhnlnuiN5ubY5v7enJ4NsYPYNHZcZOkebLtvKTIXXJ8ucI5HEvvx_9vh-KHbanQtCgORB2QQDYAFH9LUuWgRYQZQo1CrhK10uAybzFwUICusdQsBkSBdgTk-FwRV4TiIpGVFyBloU_U5WDsnRixnWTI9auZ0Pbwy0Pm1XyJNyXuTEJ4GsH_phBOEXUFTppYUf0J1nA6WP2kqy5U7vzWTrbw5adToJjmRKK7qb8e_a-ElI1i2qFt8a0qV2026r2FftMz6bYFmnM6h32/https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.com
>
> 
>
> 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: IEFDDSRV — DD service

2020-09-23 Thread Seymour J Metz
I believe that you have to examine UCBDVCLS and UCBUNTYP (UCBTBYT3 and 
UCBTBYT4), and I vaguely recall that there is a mapping macro for them. 


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



From: IBM Mainframe Discussion List  on behalf of 
Mark Jacobs <0224d287a4b1-dmarc-requ...@listserv.ua.edu>
Sent: Wednesday, September 23, 2020 3:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IEFDDSRV — DD service

I'm reading the documentation and it's telling me this;

In some cases, this service may not return a device UCB, but instead may return 
a zero UCB address or the address of a dummy UCB. This may occur for DDs that 
represent DD DUMMY requests, VIO data sets, SYSOUT data sets, in-stream data 
sets, and some SMS-managed data sets. A dummy UCB can be identified using the 
UCBDUMMY field in the UCB. A dummy UCB may not have all of the UCB segments 
that a device UCB may have and not all services that are used for processing 
device UCBs may support dummy UCBs.

I don't see a UCBDUMMY field in mapping macro IEFUCBOB.

Mark Jacobs

Sent from 
[ProtonMail](https://secure-web.cisco.com/13bZRcYOz66_uaoS9FrZGIDFa-lw0uQqEHZFvXAxEX8Waw-gWYNQgc0Ix8uisZot60C5ZjO6NsMwhbe0HIEStAT0BOYaC2nubwbmFdALTO4pTGm0UT13vnFmxqNGhtf78KmOVI7gkTEa0WECEMkFMAZAIBssr7zeVB8lpsFuaIDhWkNTeQiR1xnDtGgpFC6W7i7HWXTk4LiZRpf3WSZu5IM0JEB5vU0dgRPLGCJxCNpFBl8XH4zS20mGgC-FEk8YeIKFOcoSaOXkUtX5pL-7pDnOmIf5I2nf56gCRjL8Fbrhzp4WfBS8p0fb_ofJ4rMAPc3BgTbBRTDUdX1H77ED7N7XuCo6MNIUoK4Q25xQPdmOrQ7OLcfP39YXTBGNjblwJ8N_QkQ0s0611j3oaCHt8M2qsvmz54RXeVjAyYp38tEg9_mbFYdx1F4u79UjgWDPh/https%3A%2F%2Fprotonmail.com),
 Swiss-based encrypted email.

GPG Public Key - 
https://secure-web.cisco.com/1LWMSSaDWUlpY9gIzqXBpqUeduXaHVw7wSL1fxkzoPEp6ost7Tz4HLtoTrkq3WsGNB69Ba-cB7JZRryVy6EFfT2xx5gvcQfgJmfYlq5LEDbCSTyTliEHg0EFLcax8x4fF6dO22S_p5J2J-n1d-Hi-NR6nKSGOhyBN4h1R2f3spletxjRUzvmhnlnuiN5ubY5v7enJ4NsYPYNHZcZOkebLtvKTIXXJ8ucI5HEvvx_9vh-KHbanQtCgORB2QQDYAFH9LUuWgRYQZQo1CrhK10uAybzFwUICusdQsBkSBdgTk-FwRV4TiIpGVFyBloU_U5WDsnRixnWTI9auZ0Pbwy0Pm1XyJNyXuTEJ4GsH_phBOEXUFTppYUf0J1nA6WP2kqy5U7vzWTrbw5adToJjmRKK7qb8e_a-ElI1i2qFt8a0qV2026r2FftMz6bYFmnM6h32/https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.com

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


IEFDDSRV — DD service

2020-09-23 Thread Mark Jacobs
I'm reading the documentation and it's telling me this;

In some cases, this service may not return a device UCB, but instead may return 
a zero UCB address or the address of a dummy UCB. This may occur for DDs that 
represent DD DUMMY requests, VIO data sets, SYSOUT data sets, in-stream data 
sets, and some SMS-managed data sets. A dummy UCB can be identified using the 
UCBDUMMY field in the UCB. A dummy UCB may not have all of the UCB segments 
that a device UCB may have and not all services that are used for processing 
device UCBs may support dummy UCBs.

I don't see a UCBDUMMY field in mapping macro IEFUCBOB.

Mark Jacobs

Sent from [ProtonMail](https://protonmail.com), Swiss-based encrypted email.

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

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


Re: Batchpipes (was: SORT question: ...)

2020-09-23 Thread Martin Packer
The pipe name is a data set name.

The scheduling problem is real: How to ensure two jobs run at the same 
time. I would propose common predecessors and common successors. Some of 
these might be dummy operations.

Actually, sorts are nice cases as they often read data that has been 
freshly created or create data that is just about to be read sequentially.

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   23/09/2020 20:04
Subject:[EXTERNAL] Batchpipes (was: SORT question: ...)
Sent by:IBM Mainframe Discussion List 



On Wed, 23 Sep 2020 19:23:33 +0100, Martin Packer wrote:

>No, that would have to be another job, also specifying eg SUBSYS=PIPE. 
And
>scheduled to run alongside the sort.
>
Eek!  How do they find each other?  And perhaps more important, what
if several programmers unknown to each other concurrently submit
job using SUBSYS=PIPE; how do they avoid mistaken identity?
Must a scheduler sort it out?

I've had corresponding problems with sockets and dynamically assigned
ports: someone needs to note the port number and communicate it to
the other.

>>-Original Message-
>>From: IBM Martin Packer
>>Sent: Wednesday, September 23, 2020 4:31 AM
>>...
>>Something also from the mists of time, by no coincidence, is this:
>>
>
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm


-- gil

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Batchpipes (was: SORT question: ...)

2020-09-23 Thread Paul Gilmartin
On Wed, 23 Sep 2020 19:23:33 +0100, Martin Packer wrote:

>No, that would have to be another job, also specifying eg SUBSYS=PIPE. And
>scheduled to run alongside the sort.
>
Eek!  How do they find each other?  And perhaps more important, what
if several programmers unknown to each other concurrently submit
job using SUBSYS=PIPE; how do they avoid mistaken identity?
Must a scheduler sort it out?

I've had corresponding problems with sockets and dynamically assigned
ports: someone needs to note the port number and communicate it to
the other.

>>-Original Message-
>>From: IBM Martin Packer
>>Sent: Wednesday, September 23, 2020 4:31 AM
>>...
>>Something also from the mists of time, by no coincidence, is this:
>>
>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm

-- gil

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


Re: Where to find TSO defaults?

2020-09-23 Thread Gibney, Dave
The actual active TSUCLASS via $D may differ

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Lizette Koehler
> Sent: Wednesday, September 23, 2020 10:48 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Where to find TSO defaults?
> 
> I would start in ISPF Option 6 (tso Shell) and enter PARMLIB
> 
> Look for dataset and member that holds the IKJTSOxx member.
> 
> Go slowly through the output.  Lots of defaults there
> 
> 
> 
> Next review the JES2 Deck for the TSUCLASS and see what is set for its
> output details
> 
> 
> 
> Lastly I would enter LU tsoid NORACF TSO OMVSto get the final details.
> 
> 
> These three functions should get you an idea of defaults.
> 
> Note:  Things can be different.  I have the authority to change my settings, 
> so
> I have some that are not the defaults.
> 
> 
> Lizette
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Juergen Kehr
> Sent: Wednesday, September 23, 2020 2:55 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Where to find TSO defaults?
> 
> Hello, perhaps a fairly stupid question:
> 
> In the description of the RACF TSO segment for several settings TSO defaults
> are referenced.
> 
> HOLDCLASS(hold-class)
> Specifies the user's default hold class. ...
> If you … do not specify a value for HOLDCLASS, RACF uses a default value
> consistent with current TSO defaults.
> JOBCLASS(job-class)
> Specifies the user's default job class. ...
> If you … do not specify a value for JOBCLASS, RACF uses a default value
> consistent with current TSO defaults.
> MAXSIZE(maximum-region-size)
> Specifies the maximum region size the user can request at logon. ...
> If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> uses a default value consistent with current TSO defaults.
> MSGCLASS(message-class)
> Specifies the user's default message class. The specified value must be 1
> alphanumeric character, excluding national characters.
> If … do not specify a value for MSGCLASS, RACF uses a default value
> consistent with current TSO defaults.
> SYS(sysout-class)
> Specifies the user's default SYSOUT class. ...
> If … do not specify a value for SYS, RACF uses a default value consistent with
> current TSO defaults
> 
> My question now is, where are these defaults specified and how to change
> them?
> 
> Kind regards.
> Juergen
> 
> --
> 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: Determining program name/number of paramaters from called COBOL program

2020-09-23 Thread Windt, W.K.F. van der (Fred)
The call sequence is described in the LE Programming Reference:



CEETBCK

Call this CWI interface as follows:

L R15,CEECAALEOV-CEECAA(,R12)   Address of CAA in R12

L R15,304(,R15)

BALR  R14,R15


Get Outlook for iOS

From: IBM Mainframe Discussion List  on behalf of 
Chris Cantrell 
Sent: Wednesday, September 23, 2020 8:31:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Determining program name/number of paramaters from called COBOL 
program

Thanks Fred!

I was trying this and I can't seem to find CEETBCK in any of our libraries. I 
looked at all of the .SECC* libraries and no luck. Do you happen to know what 
library it should be in?

Thanks again!

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

-
ATTENTION:
The information in this e-mail is confidential and only meant for the intended 
recipient. If you are not the intended recipient, don't use or disclose it in 
any way. Please let the sender know and delete the message immediately.
-

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


Re: Determining program name/number of paramaters from called COBOL program

2020-09-23 Thread Lizette Koehler
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ceev100/ceetbck.htm

Lizette

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Chris Cantrell
Sent: Wednesday, September 23, 2020 11:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Determining program name/number of paramaters from called COBOL 
program

Thanks Fred!

I was trying this and I can't seem to find CEETBCK in any of our libraries. I 
looked at all of the .SECC* libraries and no luck. Do you happen to know what 
library it should be in?

Thanks again!

--
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: Determining program name/number of paramaters from called COBOL program

2020-09-23 Thread Chris Cantrell
Thanks Fred!

I was trying this and I can't seem to find CEETBCK in any of our libraries. I 
looked at all of the .SECC* libraries and no luck. Do you happen to know what 
library it should be in?

Thanks again!

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


Re: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Martin Packer
No, that would have to be another job, also specifying eg SUBSYS=PIPE. And 
scheduled to run alongside the sort.

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   23/09/2020 17:18
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



On Wed, 23 Sep 2020 16:01:08 +0100, Martin Packer wrote:

>Right. That example used BatchPipes/MVS pipes - but it's not essential to
>the use of OUTFIL SPLIT. The reason it used pipes was to enable cloning 
to
>balance a pipe.
> 
OK.  I looked at your example (z/OS 2.1; not too misty).  But what 
mystifies
me is where to code the Pipeline specification.  Suppose I want to, for
example to direct OUT1 (or an added OUT3) to a stage such as
DIGEST MD5.  Could I just code:
   ...,SUBSYS='PIPE,DIGEST MD5',...
??? if not, how?  And can I further direct that digest to SYSOUT?

>-Original Message-
>From: IBM Martin Packer
>Sent: Wednesday, September 23, 2020 4:31 AM
>...
>Something also from the mists of time, by no coincidence, is this:
>
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm


-- gil

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Re: Where to find TSO defaults?

2020-09-23 Thread Lizette Koehler
So MAXSIZE is controlled by RACF TSO Segment 

TSO Segment is controlled by SAF like  RACF 

JOB class will be in the JES2 Deck for TSUCLASS

Lizette

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Juergen Kehr
Sent: Wednesday, September 23, 2020 10:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where to find TSO defaults?

Hi,
thanks for all the answers up to now. 
But still some additional questions are open:

1. If I can change the default MAXSIZE via ACCOUNT command, where is this 
valued stored, to be persistant over IPLs?
2. I know that specific values are stored in the user's TSO segment in the ESM 
(RACF) database, but my question is about the defaults, if there is no specific 
setting. 
3. How do the JES2 init parameters for TSU relate to these TSO segment parms? 
What are the relations for MAXSIZE and JOBCLASS? 

Seems that my question wasn't that simple.

Kind regards.
Juergen   

--
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: Where to find TSO defaults?

2020-09-23 Thread Juergen Kehr
Hi,
thanks for all the answers up to now. 
But still some additional questions are open:

1. If I can change the default MAXSIZE via ACCOUNT command, where is this 
valued stored, to be persistant over IPLs?
2. I know that specific values are stored in the user's TSO segment in the ESM 
(RACF) database, but my question is about the defaults, if there is no specific 
setting. 
3. How do the JES2 init parameters for TSU relate to these TSO segment parms? 
What are the relations for MAXSIZE and JOBCLASS? 

Seems that my question wasn't that simple.

Kind regards.
Juergen

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


Re: Where to find TSO defaults?

2020-09-23 Thread Lizette Koehler
I would start in ISPF Option 6 (tso Shell) and enter PARMLIB

Look for dataset and member that holds the IKJTSOxx member.

Go slowly through the output.  Lots of defaults there



Next review the JES2 Deck for the TSUCLASS and see what is set for its output 
details



Lastly I would enter LU tsoid NORACF TSO OMVSto get the final details.


These three functions should get you an idea of defaults.

Note:  Things can be different.  I have the authority to change my settings, so 
I have some that are not the defaults.


Lizette

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Juergen Kehr
Sent: Wednesday, September 23, 2020 2:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Where to find TSO defaults?

Hello, perhaps a fairly stupid question:

In the description of the RACF TSO segment for several settings TSO defaults 
are referenced.

HOLDCLASS(hold-class)
Specifies the user's default hold class. ...
If you … do not specify a value for HOLDCLASS, RACF uses a default value 
consistent with current TSO defaults.
JOBCLASS(job-class)
Specifies the user's default job class. ...
If you … do not specify a value for JOBCLASS, RACF uses a default value 
consistent with current TSO defaults.
MAXSIZE(maximum-region-size)
Specifies the maximum region size the user can request at logon. ...
If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF uses a 
default value consistent with current TSO defaults.
MSGCLASS(message-class)
Specifies the user's default message class. The specified value must be 1 
alphanumeric character, excluding national characters.
If … do not specify a value for MSGCLASS, RACF uses a default value consistent 
with current TSO defaults.
SYS(sysout-class)
Specifies the user's default SYSOUT class. ...
If … do not specify a value for SYS, RACF uses a default value consistent with 
current TSO defaults

My question now is, where are these defaults specified and how to change them?

Kind regards.
Juergen

--
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: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Paul Gilmartin
On Wed, 23 Sep 2020 16:01:08 +0100, Martin Packer wrote:

>Right. That example used BatchPipes/MVS pipes - but it's not essential to
>the use of OUTFIL SPLIT. The reason it used pipes was to enable cloning to
>balance a pipe.
> 
OK.  I looked at your example (z/OS 2.1; not too misty).  But what mystifies
me is where to code the Pipeline specification.  Suppose I want to, for
example to direct OUT1 (or an added OUT3) to a stage such as
DIGEST MD5.  Could I just code:
   ...,SUBSYS='PIPE,DIGEST MD5',...
??? if not, how?  And can I further direct that digest to SYSOUT?

>-Original Message-
>From: IBM Martin Packer
>Sent: Wednesday, September 23, 2020 4:31 AM
>...
>Something also from the mists of time, by no coincidence, is this:
>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm

-- gil

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


Re: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Martin Packer
Right. That example used BatchPipes/MVS pipes - but it's not essential to 
the use of OUTFIL SPLIT. The reason it used pipes was to enable cloning to 
balance a pipe.

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   "Farley, Peter x23353" 
<031df298a9da-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   23/09/2020 14:54
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



That might indeed be interesting if I knew what SUBSYS=PIPE was.  Is that 
the z/OS BatchPipes product?  If so I do not have that available here.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf 
Of Martin Packer
Sent: Wednesday, September 23, 2020 4:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORT question: How to both remove records from a file AND 
write removed records to a 2nd output?

EXTERNAL EMAIL

OUTFIL SPLIT.

Something also from the mists of time, by no coincidence, is this: 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm
 


TBH, I probably wrote that and Frank made it worth reading. :-)

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://mainframeperformancetopics.com 


Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle 


Youtube channel: 
https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA 




From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/09/2020 20:31
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



On Tue, 22 Sep 2020 20:08:12 +0100, Martin Packer wrote:
>
>SAVE has, to my mind, been most invaluable. Prior to this you had to 
>figure out the boolean complement of the INCLUDE= clause. With more 
>than one INCLUDE= clause in a sort it became hairier, requiring De 
>Morgan's Law*. :-)  SAVE made this a lot simpler and less error prone.
> 
Yet adding a NOT operator to the grammar (no one has mentioned that there 
is one) would relieve programmers of the chore of rewriting complex 
Boolean expressions with De Morgan's Law.

>"Card Dealer" not so much.
> 
I don't know "Card Dealer".  Does that amount to having multiple OUTFILs 
using different tags?

Thanks,
gil

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Re: SMPE ALIAS for a TEXT/PANEL Usermod

2020-09-23 Thread Kenneth J. Kripke
My apologies for not responding sooner.  

Thank you for pointing me to the ALIAS() SMPE statement.  

 

From: k.kri...@comcast.net  
Sent: Monday, September 21, 2020 3:47 PM
To: 'ibm-m...@bama.ua.edu' 
Subject: SMPE ALIAS for a TEXT/PANEL Usermod

 

How can I specify an alias to be associated with a usermod entry in SMPE
when replacing a text, source entry ? 

The USERMOD is a full replacement of the distributed panel, but, I want to
make sure that the alias entry also gets carried forward correctly.

Kenneth J. Kripke

k.kripke#comcast.net 

 


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


Re: Determining program name/number of paramaters from called COBOL program

2020-09-23 Thread Windt, W.K.F. van der (Fred)
CEETBCK can help you to achive this. It is described in the LE Vendor 
Interfaces manual. But you need to write a little assembler program to use 
CEETBCK.

Groetz,

Fred!

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Chris Cantrell
Sent: dinsdag 22 september 2020 21:24
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Determining program name/number of paramaters from called COBOL program

Hello,

I am hoping someone out there can help me with this 'opportunity'.

In a Z/OS enterprise COBOL environment, I want to be able to retrieve the 
calling program name and the number of parms passed to the called program from 
the called program. In other words, program A is executed in my batch job and 
it calls program B passing 5 parms in the using statement. I want program B to 
be able to retrieve the program name for program A as well as the number of 
parms that were passed to it.

I think if I could get to the program stack I could probably figure it out from 
there.

Any assistance that any of you could provide would be greatly appreciated.

Thanks!

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
-
ATTENTION:
The information in this e-mail is confidential and only meant for the intended 
recipient. If you are not the intended recipient, don't use or disclose it in 
any way. Please let the sender know and delete the message immediately.
-

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


Re: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Farley, Peter x23353
That might indeed be interesting if I knew what SUBSYS=PIPE was.  Is that the 
z/OS BatchPipes product?  If so I do not have that available here.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Martin Packer
Sent: Wednesday, September 23, 2020 4:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORT question: How to both remove records from a file AND write 
removed records to a 2nd output?

EXTERNAL EMAIL

OUTFIL SPLIT.

Something also from the mists of time, by no coincidence, is this: 
https://urldefense.com/v3/__https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!djsBTdtRWhlMDjqIDWZ3N2tii2HhPjYswgwHMqZah3Ae3uJs0JFjTuTVRzoFQonkEIOCWw$
 

TBH, I probably wrote that and Frank made it worth reading. :-)

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: 
https://urldefense.com/v3/__https://mainframeperformancetopics.com__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!djsBTdtRWhlMDjqIDWZ3N2tii2HhPjYswgwHMqZah3Ae3uJs0JFjTuTVRzoFQokXweXXaQ$
 

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://urldefense.com/v3/__https://anchor.fm/marna-walle__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!djsBTdtRWhlMDjqIDWZ3N2tii2HhPjYswgwHMqZah3Ae3uJs0JFjTuTVRzoFQokxmRitYQ$
 

Youtube channel: 
https://urldefense.com/v3/__https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!djsBTdtRWhlMDjqIDWZ3N2tii2HhPjYswgwHMqZah3Ae3uJs0JFjTuTVRzoFQonXW_nH9A$
 



From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/09/2020 20:31
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



On Tue, 22 Sep 2020 20:08:12 +0100, Martin Packer wrote:
>
>SAVE has, to my mind, been most invaluable. Prior to this you had to 
>figure out the boolean complement of the INCLUDE= clause. With more 
>than one INCLUDE= clause in a sort it became hairier, requiring De 
>Morgan's Law*. :-)  SAVE made this a lot simpler and less error prone.
> 
Yet adding a NOT operator to the grammar (no one has mentioned that there is 
one) would relieve programmers of the chore of rewriting complex Boolean 
expressions with De Morgan's Law.

>"Card Dealer" not so much.
> 
I don't know "Card Dealer".  Does that amount to having multiple OUTFILs using 
different tags?

Thanks,
gil

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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

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: Where to find TSO defaults?

2020-09-23 Thread Michael Babcock
TSUCLASS of JES2 PARMs?

On Wed, Sep 23, 2020 at 4:55 AM Juergen Kehr 
wrote:

> Hello, perhaps a fairly stupid question:
>
>
>
> In the description of the RACF TSO segment for several settings TSO
> defaults are referenced.
>
>
>
> HOLDCLASS(hold-class)
>
> Specifies the user's default hold class. ...
>
> If you … do not specify a value for HOLDCLASS, RACF uses a default value
> consistent with current TSO defaults.
>
> JOBCLASS(job-class)
>
> Specifies the user's default job class. ...
>
> If you … do not specify a value for JOBCLASS, RACF uses a default value
> consistent with current TSO defaults.
>
> MAXSIZE(maximum-region-size)
>
> Specifies the maximum region size the user can request at logon. ...
>
> If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> uses a default value consistent with current TSO defaults.
>
> MSGCLASS(message-class)
>
> Specifies the user's default message class. The specified value must be 1
> alphanumeric character, excluding national characters.
>
> If … do not specify a value for MSGCLASS, RACF uses a default value
> consistent with current TSO defaults.
>
> SYS(sysout-class)
>
> Specifies the user's default SYSOUT class. ...
>
> If … do not specify a value for SYS, RACF uses a default value consistent
> with current TSO defaults
>
>
>
> My question now is, where are these defaults specified and how to change
> them?
>
>
>
> Kind regards.
>
> Juergen
>
>
>
> --
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
>
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

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


Re: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread Seymour J Metz
Actually, 12:00 AM and 12:00 PM are mambiguous, NIST says not to use them and 
different sources define them differently.


--
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: Wednesday, September 23, 2020 8:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BOF on COBOL and the systems programmer at SHARE

On Wed, 23 Sep 2020 12:12:09 +, Billy Ashton wrote:

>And in that "special" US format, I am surprised at how many people think
>12:00 AM is noon instead of midnight...I can see how that is much
>clearer!
>
Actually, noon is 12:00M.


(John M.:)
>>>. . .
>>>  I was forced to change it to the "US standard" of mm/dd/yy hh:ms:ss xM 
>>> (x==A or P) because nobody understood that format and it was too difficult 
>>> for them to understand. This was IT internal only.
>
Should we try dating our checks in ISO 8601?  
https://secure-web.cisco.com/1Hy-5NaQlpjRt9YM1i7qhVF_JctcW8Tz3xKuU-RCWLRQiXgnOtn9rDbeNkvHbTsI6ucRqFPoqrtUzOTOFofIuhMHoc582XeyDZT3YVcd2nUbdChX3OLBlMy8TeTdtMAIuPC3LyGlX042Zw28FGFkl84VIL1SZ48VKAgsLEs37bM0taAUghmOJtQ1QtXoDlRT3-xQQsvsKR-5VTTuh4XImTltgN0VmqaERSR9QwALFC9kJFxVrRXz0kP01-e0CyoSN323dSep0Ob_VvAwd-7oMPpiqIJsUVZJf3FPNwRtHXpr8UOd7RZBSLJLIRXHg5kG09Sdh3iCj4uUiKNR_Y2cCzcFT_ZLSO-seyO6VU_SNcB7YiHQPA1Q6Mf8Ne1nIT8yLxtSA_WTjcsHcMRaB2i_wvZgLbAT8rX7baSBgvEnXbp0XoXjbVHeQf_eSPHaE0bvTEWf4Opntad82HxptqpO38w/https%3A%2F%2Fxkcd.com%2F1179%2F

Once, in the week before the DST boundary, I received an invitation
to a meeting the week after.  It specified both local and GMT.  They
disagreed by one hour.  I submitted a trouble ticket.

WAD: Generated by a Microsoft utility; not amenable to change.

And the format was something like: "05:30PM GMT".  Leading zero
+ AM/PM notation + GMT?  I needed to read it several times.

What notation does your operator's console display?

I keep my computer, phone, and wristwatch displaying 24-hour.
But I can't train myself not to mentally convert to PM.  Nor
to think in SI.

Joke; in a builders' supply store:

"I'd like to buy about fifty feet of plastic pipe."

"We deal in metric units now."

(after some mental arithmetic)  "OK, then, fifteen meters."

"Do you want 1/2" or 3/4"?"

-- 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: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread Paul Gilmartin
On Wed, 23 Sep 2020 12:12:09 +, Billy Ashton wrote:

>And in that "special" US format, I am surprised at how many people think 
>12:00 AM is noon instead of midnight...I can see how that is much 
>clearer!
> 
Actually, noon is 12:00M.


(John M.:)
>>>. . .
>>>  I was forced to change it to the "US standard" of mm/dd/yy hh:ms:ss xM 
>>> (x==A or P) because nobody understood that format and it was too difficult 
>>> for them to understand. This was IT internal only.
>
Should we try dating our checks in ISO 8601?  https://xkcd.com/1179/

Once, in the week before the DST boundary, I received an invitation
to a meeting the week after.  It specified both local and GMT.  They
disagreed by one hour.  I submitted a trouble ticket.

WAD: Generated by a Microsoft utility; not amenable to change.

And the format was something like: "05:30PM GMT".  Leading zero
+ AM/PM notation + GMT?  I needed to read it several times.

What notation does your operator's console display?

I keep my computer, phone, and wristwatch displaying 24-hour.
But I can't train myself not to mentally convert to PM.  Nor
to think in SI.

Joke; in a builders' supply store:

"I'd like to buy about fifty feet of plastic pipe."

"We deal in metric units now."

(after some mental arithmetic)  "OK, then, fifteen meters."

"Do you want 1/2" or 3/4"?"

-- gil

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


Re: Determining program name/number of paramaters from called COBOL program

2020-09-23 Thread Chris Cantrell
LE

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


Re: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread Seymour J Metz
The problems are that nobody writes 12:00 midnight or 12:00 noon. which are 
unambiguous, and that different style guides give different definitions. NIST 
recommends not using either 12:00 AM or 12:00 PM, but rather using something 
unambiguous.


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



From: IBM Mainframe Discussion List  on behalf of 
Billy Ashton 
Sent: Wednesday, September 23, 2020 8:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BOF on COBOL and the systems programmer at SHARE

And in that "special" US format, I am surprised at how many people think
12:00 AM is noon instead of midnight...I can see how that is much
clearer!

B
>>. . .
>>  I was forced to change it to the "US standard" of mm/dd/yy hh:ms:ss xM 
>> (x==A or P) because nobody understood that format and it was too difficult 
>> for them to understand. This was IT internal only.

--
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-23 Thread Paul Gilmartin
On Wed, 23 Sep 2020 11:58:02 +0200, R.S. wrote:

>This is clou (the point). Many users, a lot o JCL jobs, people are
>unaware of the JCL, they can only change volser...
>Excuse me, but it looks like kindergarten with no teachers on board. For
>45 years.
>It is not technical issue, this is strong organizational problem. And
>this should be fixed. Yes, people could be unhappy.
>BTW: even in this kindergarten it is feasible to identify all the job
>libraries and change JCL code.
> 
+1

>W dniu 23.09.2020 o 10:42, Brian Westerman pisze:
>> Unfortunately, after about 45 years of doing it "this way", the users have a 
>> lot of their own JCL, it would not be economical or feasible to train or 
>> expect thousands of them to change or even know how to change their JCL.  
>> Many of them (most) don't even know what they are editing, they just replace 
>> a VOLSER with the one from the listing they have and submit the job.  In a 
>> nice little environment where you can control these things, you are probably 
>> correct, but that is not the case in this instance.
>> 
"thousands"!?

But if you make your imagined change to unique catalogued DSNs
those users must be educated to change their process to replace not
only VOLSER but also/instead DSN and UNIT.  Worse, some may
be relying on handwritten logs in which they record only VOLSER,
not DSN.

Is there any possible dependency on serialization by EXC ENQ on
hlq.FICHE.TAPE?

What's the likelihood of a collision of generated DSNs during the next 45
years?  How would you resolve it?  How would you test that solution?

The Amish have driven horses and carriages for longer than 45 years
They see nothing that needs to be fixed on that account.

-- gil

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


Re: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread Billy Ashton
And in that "special" US format, I am surprised at how many people think 
12:00 AM is noon instead of midnight...I can see how that is much 
clearer!


B

. . .
 I was forced to change it to the "US standard" of mm/dd/yy hh:ms:ss xM (x==A 
or P) because nobody understood that format and it was too difficult for them to 
understand. This was IT internal only.


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


Re: Where to find TSO defaults?

2020-09-23 Thread Seymour J Metz
The OP was asking about the defaults.


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



From: IBM Mainframe Discussion List  on behalf of 
ITschak Mugzach 
Sent: Wednesday, September 23, 2020 7:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where to find TSO defaults?

TSO information is kept is the user's TSO segment OF the ESM (TACF, TSS,
etc.) in use.

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM comming son  *




On Wed, Sep 23, 2020 at 2:26 PM Attila Fogarasi  wrote:

> This is documented in the TSO/E System Programming Command Reference, under
> the ACCOUNT command.  The default for MAXSIZE is now NOLIM (unlimited),
> which of course is not unlimited but governed by other address space size
> controls.  The job & sysout related parameters can also be defaulted in the
> JES2 or JES3 initialization parms, if not specified in the ACCOUNT
> command.
>
> On Wed, Sep 23, 2020 at 7:55 PM Juergen Kehr 
> wrote:
>
> > Hello, perhaps a fairly stupid question:
> >
> > In the description of the RACF TSO segment for several settings TSO
> > defaults are referenced.
> >
> > HOLDCLASS(hold-class)
> > Specifies the user's default hold class. ...
> > If you … do not specify a value for HOLDCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > JOBCLASS(job-class)
> > Specifies the user's default job class. ...
> > If you … do not specify a value for JOBCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > MAXSIZE(maximum-region-size)
> > Specifies the maximum region size the user can request at logon. ...
> > If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> > uses a default value consistent with current TSO defaults.
> > MSGCLASS(message-class)
> > Specifies the user's default message class. The specified value must be 1
> > alphanumeric character, excluding national characters.
> > If … do not specify a value for MSGCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > SYS(sysout-class)
> > Specifies the user's default SYSOUT class. ...
> > If … do not specify a value for SYS, RACF uses a default value consistent
> > with current TSO defaults
> >
> > My question now is, where are these defaults specified and how to change
> > them?
> >
> > Kind regards.
> > Juergen
> >
> > --
> > 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: Where to find TSO defaults?

2020-09-23 Thread ITschak Mugzach
TSO information is kept is the user's TSO segment OF the ESM (TACF, TSS,
etc.) in use.

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM comming son  *




On Wed, Sep 23, 2020 at 2:26 PM Attila Fogarasi  wrote:

> This is documented in the TSO/E System Programming Command Reference, under
> the ACCOUNT command.  The default for MAXSIZE is now NOLIM (unlimited),
> which of course is not unlimited but governed by other address space size
> controls.  The job & sysout related parameters can also be defaulted in the
> JES2 or JES3 initialization parms, if not specified in the ACCOUNT
> command.
>
> On Wed, Sep 23, 2020 at 7:55 PM Juergen Kehr 
> wrote:
>
> > Hello, perhaps a fairly stupid question:
> >
> > In the description of the RACF TSO segment for several settings TSO
> > defaults are referenced.
> >
> > HOLDCLASS(hold-class)
> > Specifies the user's default hold class. ...
> > If you … do not specify a value for HOLDCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > JOBCLASS(job-class)
> > Specifies the user's default job class. ...
> > If you … do not specify a value for JOBCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > MAXSIZE(maximum-region-size)
> > Specifies the maximum region size the user can request at logon. ...
> > If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> > uses a default value consistent with current TSO defaults.
> > MSGCLASS(message-class)
> > Specifies the user's default message class. The specified value must be 1
> > alphanumeric character, excluding national characters.
> > If … do not specify a value for MSGCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > SYS(sysout-class)
> > Specifies the user's default SYSOUT class. ...
> > If … do not specify a value for SYS, RACF uses a default value consistent
> > with current TSO defaults
> >
> > My question now is, where are these defaults specified and how to change
> > them?
> >
> > Kind regards.
> > Juergen
> >
> > --
> > 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: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread Seymour J Metz
GMT is not the same as UTC.

I would have preferred a separator space, but what is hard to read in 
-mm-ddThh:mm:ssZ, other than the use of UTC rather than local?


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



From: IBM Mainframe Discussion List  on behalf of 
John McKown 
Sent: Wednesday, September 23, 2020 7:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: BOF on COBOL and the systems programmer at SHARE

On Tue, Sep 22, 2020 at 11:21 AM Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Tue, 22 Sep 2020 12:36:10 -0300, Clark Morris wrote:
>
> >I am giving a BOF on COBOL and the systems programmer on Thursday,
> >September 24 in the last session period - 16:15 Eastern time zone,
> >15:15 Central time zone, 14:15, Mountain time zone, 13:15 Pacific
> >time, 17:15 Atlantic time zone in Canada and 17:45 in Newfoundland.
> >
> Couldn't you simply say GMT?  What time in Arizona?  Hawaii?
> The Navajo Nation?  ...
>

Why not GMT (now UTC)? You'd be amazed how many IT people don't know what
that means and can't grasp it. I once wrote a report program which put out
the date in the format:  -mm-ddThh:mm:ssZ (ISO 8601) and I got screamed
at. When I asked, I said it was the Universal time, in military format (24
hour clock). I was forced to change it to the "US standard" of mm/dd/yy
hh:ms:ss xM (x==A or P) because nobody understood that format and it was
too difficult for them to understand. This was IT internal only.



>
> -- 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: Where to find TSO defaults?

2020-09-23 Thread Itschak Mugzach
TSO information is kept is the user's TSO segment OF the ESM (TACF, TSS,
etc.) in use.

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 Wed, Sep 23, 2020 at 2:26 PM Attila Fogarasi  wrote:

> This is documented in the TSO/E System Programming Command Reference, under
> the ACCOUNT command.  The default for MAXSIZE is now NOLIM (unlimited),
> which of course is not unlimited but governed by other address space size
> controls.  The job & sysout related parameters can also be defaulted in the
> JES2 or JES3 initialization parms, if not specified in the ACCOUNT
> command.
>
> On Wed, Sep 23, 2020 at 7:55 PM Juergen Kehr 
> wrote:
>
> > Hello, perhaps a fairly stupid question:
> >
> > In the description of the RACF TSO segment for several settings TSO
> > defaults are referenced.
> >
> > HOLDCLASS(hold-class)
> > Specifies the user's default hold class. ...
> > If you … do not specify a value for HOLDCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > JOBCLASS(job-class)
> > Specifies the user's default job class. ...
> > If you … do not specify a value for JOBCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > MAXSIZE(maximum-region-size)
> > Specifies the maximum region size the user can request at logon. ...
> > If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> > uses a default value consistent with current TSO defaults.
> > MSGCLASS(message-class)
> > Specifies the user's default message class. The specified value must be 1
> > alphanumeric character, excluding national characters.
> > If … do not specify a value for MSGCLASS, RACF uses a default value
> > consistent with current TSO defaults.
> > SYS(sysout-class)
> > Specifies the user's default SYSOUT class. ...
> > If … do not specify a value for SYS, RACF uses a default value consistent
> > with current TSO defaults
> >
> > My question now is, where are these defaults specified and how to change
> > them?
> >
> > Kind regards.
> > Juergen
> >
> > --
> > 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: Where to find TSO defaults?

2020-09-23 Thread Attila Fogarasi
This is documented in the TSO/E System Programming Command Reference, under
the ACCOUNT command.  The default for MAXSIZE is now NOLIM (unlimited),
which of course is not unlimited but governed by other address space size
controls.  The job & sysout related parameters can also be defaulted in the
JES2 or JES3 initialization parms, if not specified in the ACCOUNT
command.

On Wed, Sep 23, 2020 at 7:55 PM Juergen Kehr 
wrote:

> Hello, perhaps a fairly stupid question:
>
> In the description of the RACF TSO segment for several settings TSO
> defaults are referenced.
>
> HOLDCLASS(hold-class)
> Specifies the user's default hold class. ...
> If you … do not specify a value for HOLDCLASS, RACF uses a default value
> consistent with current TSO defaults.
> JOBCLASS(job-class)
> Specifies the user's default job class. ...
> If you … do not specify a value for JOBCLASS, RACF uses a default value
> consistent with current TSO defaults.
> MAXSIZE(maximum-region-size)
> Specifies the maximum region size the user can request at logon. ...
> If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF
> uses a default value consistent with current TSO defaults.
> MSGCLASS(message-class)
> Specifies the user's default message class. The specified value must be 1
> alphanumeric character, excluding national characters.
> If … do not specify a value for MSGCLASS, RACF uses a default value
> consistent with current TSO defaults.
> SYS(sysout-class)
> Specifies the user's default SYSOUT class. ...
> If … do not specify a value for SYS, RACF uses a default value consistent
> with current TSO defaults
>
> My question now is, where are these defaults specified and how to change
> them?
>
> Kind regards.
> Juergen
>
> --
> 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: BOF on COBOL and the systems programmer at SHARE

2020-09-23 Thread John McKown
On Tue, Sep 22, 2020 at 11:21 AM Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Tue, 22 Sep 2020 12:36:10 -0300, Clark Morris wrote:
>
> >I am giving a BOF on COBOL and the systems programmer on Thursday,
> >September 24 in the last session period - 16:15 Eastern time zone,
> >15:15 Central time zone, 14:15, Mountain time zone, 13:15 Pacific
> >time, 17:15 Atlantic time zone in Canada and 17:45 in Newfoundland.
> >
> Couldn't you simply say GMT?  What time in Arizona?  Hawaii?
> The Navajo Nation?  ...
>

Why not GMT (now UTC)? You'd be amazed how many IT people don't know what
that means and can't grasp it. I once wrote a report program which put out
the date in the format:  -mm-ddThh:mm:ssZ (ISO 8601) and I got screamed
at. When I asked, I said it was the Universal time, in military format (24
hour clock). I was forced to change it to the "US standard" of mm/dd/yy
hh:ms:ss xM (x==A or P) because nobody understood that format and it was
too difficult for them to understand. This was IT internal only.



>
> -- 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: Where to find TSO defaults?

2020-09-23 Thread Juergen Kehr
Hi,

SYS1.UADS couldn't be a source of these defaults, because it's empty.
TSOKEY00 does not contain any parameters related to this settings.

Kind regards.
Juergen

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


360 Question - Bantam

2020-09-23 Thread Neale Ferguson
Many years ago our S/360 source maintenance was done by an IBM program called 
BANTAM written by Barbara J Burian who later wrote texts on 370 Assembler 
programming. I am trying to find out if BANTAM was an acronym or just a name 
she chose as it’s sometimes written as Bantam. This particular program ran 
under DOS or TOS.

Neale

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


Re: Where to find TSO defaults?

2020-09-23 Thread R.S.

W dniu 23.09.2020 o 11:54, Juergen Kehr pisze:

Hello, perhaps a fairly stupid question:

In the description of the RACF TSO segment for several settings TSO defaults 
are referenced.

HOLDCLASS(hold-class)
Specifies the user's default hold class. ...
If you … do not specify a value for HOLDCLASS, RACF uses a default value 
consistent with current TSO defaults.
JOBCLASS(job-class)
Specifies the user's default job class. ...
If you … do not specify a value for JOBCLASS, RACF uses a default value 
consistent with current TSO defaults.
MAXSIZE(maximum-region-size)
Specifies the maximum region size the user can request at logon. ...
If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF uses a 
default value consistent with current TSO defaults.
MSGCLASS(message-class)
Specifies the user's default message class. The specified value must be 1 
alphanumeric character, excluding national characters.
If … do not specify a value for MSGCLASS, RACF uses a default value consistent 
with current TSO defaults.
SYS(sysout-class)
Specifies the user's default SYSOUT class. ...
If … do not specify a value for SYS, RACF uses a default value consistent with 
current TSO defaults

My question now is, where are these defaults specified and how to change them?


My guess:
1. TSO user defined in RACF may have TSO segment defined in UADS. 
However TSO segment in RACF should disable UADS definitions.
2. I think the parameters like MAXSIZE, etc are not defined in IKJTSOxx 
or TSOKEY members.
3. I think, the defaults for parameters like MAXSIZE are "well known" 
and hardcoded, that means, you cannot set your own default value. 
However other parameters like JOBCLASS may come from JES2.


--
Radoslaw Skorupka
Lodz, Poland





==

Jeśli nie jesteś adresatem tej wiadomości:

- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś 
na dysku).
Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) 
tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać 
karze.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
01.01.2020 r. wynosi 169.401.468 złotych.

If you are not the addressee of this message:

- let us know by replying to this e-mail (thank you!),
- delete this message permanently (including all the copies which you have 
printed out or saved).
This message may contain legally protected information, which may be used 
exclusively by the addressee.Please be reminded that anyone who disseminates 
(copies, distributes) this message or takes any similar action, violates the 
law and may be penalised.

mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital 
City of Warsaw, 12th Commercial Division of the National Court Register, KRS 
025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 
169.401.468 as at 1 January 2020.

--
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-23 Thread R.S.
This is clou (the point). Many users, a lot o JCL jobs, people are 
unaware of the JCL, they can only change volser...
Excuse me, but it looks like kindergarten with no teachers on board. For 
45 years.
It is not technical issue, this is strong organizational problem. And 
this should be fixed. Yes, people could be unhappy.
BTW: even in this kindergarten it is feasible to identify all the job 
libraries and change JCL code.


--
Radoslaw Skorupka
Lodz, Poland






W dniu 23.09.2020 o 10:42, Brian Westerman pisze:

Unfortunately, after about 45 years of doing it "this way", the users have a 
lot of their own JCL, it would not be economical or feasible to train or expect thousands 
of them to change or even know how to change their JCL.  Many of them (most) don't even 
know what they are editing, they just replace a VOLSER with the one from the listing they 
have and submit the job.  In a nice little environment where you can control these 
things, you are probably correct, but that is not the case in this instance.

Brian

On Tue, 22 Sep 2020 12:55:05 +0200, R.S.  wrote:


My €0.02:
This is typical problem when the goal is NOT defined.
Existing approach seems ridiculous, but it exists. It works.
So, since it works, why to change it? What is the reason? What goal is
to achieve?
More ridiculous are the terms. JCL cannot be changed. WHY???
However JES2 exit6 which changes JCL "in the flight" is allowed. Why???
Datasets are important, but the chances it will be ever read are small.
Uncataloged datasets are a problem, however there is no big problem with
duplicate names and volser which is known after the dataset is created.

My opinion:
First, recognize the situation and define the problem, then define the goal.
Never use tapes, especially for small datasets. Including virtual tapes.
Small datasets can be written to DASD, zEDC can be used to compress it.
And DFSMS MC can be used to migrate it to tape. Yes, tapes are still
good for backup and ML2.
Large number of datasets is not a problem, that's what are user catalogs
for.
Good naming convention will help with ACS routines and ICF aliases.
It can be GDG or just HLQ.YEAR.SOME.NAME.Ddate, or so. I would not go to
PDSE members. Member are good candidate for really big number of really
small files. Note, the smallest chunk of DASD is one track. The smallest
chunk of PDSE is 4kB, and for PDS is just the size of file, it can be
one byte. However migrated dataset occupies zero tracks.
All the revolution require ...just simple changes in JCL and few changes
in DFSMS realm. I can do that for peanuts ;-)

--
Radoslaw Skorupka
Lodz, Poland






==

Jeśli nie jesteś adresatem tej wiadomości:

- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś 
na dysku).
Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) 
tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać 
karze.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
01.01.2020 r. wynosi 169.401.468 złotych.

If you are not the addressee of this message:

- let us know by replying to this e-mail (thank you!),
- delete this message permanently (including all the copies which you have 
printed out or saved).
This message may contain legally protected information, which may be used 
exclusively by the addressee.Please be reminded that anyone who disseminates 
(copies, distributes) this message or takes any similar action, violates the 
law and may be penalised.

mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital 
City of Warsaw, 12th Commercial Division of the National Court Register, KRS 
025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 
169.401.468 as at 1 January 2020.

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


Where to find TSO defaults?

2020-09-23 Thread Juergen Kehr
Hello, perhaps a fairly stupid question:

In the description of the RACF TSO segment for several settings TSO defaults 
are referenced.

HOLDCLASS(hold-class)
Specifies the user's default hold class. ...
If you … do not specify a value for HOLDCLASS, RACF uses a default value 
consistent with current TSO defaults.
JOBCLASS(job-class)
Specifies the user's default job class. ...
If you … do not specify a value for JOBCLASS, RACF uses a default value 
consistent with current TSO defaults.
MAXSIZE(maximum-region-size)
Specifies the maximum region size the user can request at logon. ...
If you … do not specify a value for MAXSIZE, or specify MAXSIZE(0), RACF uses a 
default value consistent with current TSO defaults.
MSGCLASS(message-class)
Specifies the user's default message class. The specified value must be 1 
alphanumeric character, excluding national characters.
If … do not specify a value for MSGCLASS, RACF uses a default value consistent 
with current TSO defaults.
SYS(sysout-class)
Specifies the user's default SYSOUT class. ...
If … do not specify a value for SYS, RACF uses a default value consistent with 
current TSO defaults

My question now is, where are these defaults specified and how to change them?

Kind regards.
Juergen

--
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-23 Thread Brian Westerman
I have a TMS listing that I wrote a rexx prog to process and it generated 
IEBGENER jobs that copied from the non-cataloged tape to a new disk dataset 
(which contained the original creation date/time in the DSN),  That dataset was 
later migrated via HSM.

Brian

On Mon, 21 Sep 2020 22:49:00 -0400, David Mingee  wrote:

>The following idea/method will probably not work, but what the hell.
>Consider listing the needed tape files with a TMS report to disk.
>1. create a PDSE to load these files into.
>2. change create fiche jcl to create a new member e.g. (d092120)
>3 create job to load old tape files as member names.  This could be a second 
>PDSE, if helpful.
>4. change jobs to read pdse member (d051719) for example.
>Alternate method, after finding all these old tapes from TMS report, load each 
>tape to disk as PS/EF with compress.  They would get migrated after
>X days of no use.
>
>-Original Message-
>From: IBM Mainframe Discussion List  On Behalf Of 
>Brian Westerman
>Sent: Monday, September 21, 2020 5:48 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: rename a dataset in acs routine?
>
>Jes Exit 6 seems to be the best place to do this.  There is only a max of one 
>dataset per job and it's never re-read in that same job (or any other) and we 
>already know what the dataset(s) are called, so it's pretty simple to scan for 
>the DSN= text object and if the supplied DSN matches one of the ones we want, 
>we just replace it with the symbolic.  Actually at that point in time I could 
>just insert the actual date and time.  The test version does just that.  Of 
>course as soon as I started writing the exit, several people came in to ask 
>for more "features".  The only thing I forgot was a way to bypass the exit in 
>the event that I wanted to actually process one of the tapes manually (by 
>volser), but I now have that worked out as well, I just don't have time to 
>test it properly at this time.  I also think it's possible to limit the 
>processing to ONLY the jobs that we know will contain the fiche tapes, so I'm 
>waiting on a programmer to tell me if that's true.
>
>Brian
>
> On Mon, 21 Sep 2020 13:11:56 +, Seymour J Metz  wrote:
>
>>What's the down side?
>
>
>--
>Shmuel (Seymour J.) Metz
>http://mason.gmu.edu/~smetz3
>
>
>
>From: IBM Mainframe Discussion List  on behalf of 
>Lizette Koehler 
>Sent: Sunday, September 20, 2020 11:06 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: rename a dataset in acs routine?
>
>I apologize if this has been discussed
>
>The SYSTEM Symbols can be made available to JES2 batch jobs   The shop needs
>to determine if they want that to happen
>
>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1
>.ieab600/jclsymstr.htm
>
>The three types of symbols that can be used for JES2 in-stream substitution 
>are JCL Symbols, JES Symbols and System Symbols:
>
>On a JES2 JOBCLASS definition, the field SYSSYM needs to be ALLOW rather than 
>DISALLOW
>
>
>
>If there Is scheduling software available, it is possible it might provide 
>symbolic substitution at Submission time (I know CA Workload Manager ESP can 
>do that)
>
>Otherwise, you might want to have something like s REXX be executed (or 
>language of your choice) to generate the JCL then submit into the Internal 
>Reader
>
>ACS routines cannot do this type of function.
>
>Best of luck
>
>Lizette
>
>-Original Message-
>From: IBM Mainframe Discussion List  On Behalf Of 
>Seymour J Metz
>Sent: Sunday, September 20, 2020 5:47 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: rename a dataset in acs routine?
>
>ITYM IEFUJV; IEFUJI doesn't have the right interfaces. I'd probably use an 
>internal text exit.
>
>
>--
>Shmuel (Seymour J.) Metz
>http://mason.gmu.edu/~smetz3
>
>
>
>From: IBM Mainframe Discussion List  on behalf of 
>Brian Westerman 
>Sent: Saturday, September 19, 2020 12:14 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: rename a dataset in acs routine?
>
>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 

Re: rename a dataset in acs routine?

2020-09-23 Thread Brian Westerman
They used to be physically sent out, then FTP'ed, then not sent at all, but 
still created for a way to fall back in case of a data loss.  Mostly, they are 
trash, but we are stuck with them, so we would like to force them to go to DASD 
(as cataloged datasets) and then archived so we can manage them for 3 years and 
drop them.

Brian

On Mon, 21 Sep 2020 17:42:52 -0500, Paul Gilmartin  wrote:

>On Sun, 20 Sep 2020 00:06:01 -0500, Brian Westerman wrote:
>
>>They are mifrofiche tapes, and they are not sent out for processing any more. 
>> They exist only on the off chance that "someday" they might be needed to 
>>recreate something.  When they are needed, they use the DSN=,VOL= to use them.
>> 
>I read your more recent ply, but I'm curious about the history.
>
>"Sent out" seems to imply they're physical tapes to go in a courier pouch.
>I had imagined virtual.  And RETPD must be comfortably beyond the
>"someday they might be needed."
>
>Does/did the process depend on the DSN's being precisely
>hlq.FICHE.TAPE, perhaps to trigger an exit or operator
>action?
>
>I don't see that cataloguing unique DSNs would help much -- it leaves
>the chore of associating DSN rather than VOL=SER with a particular
>job to be retrieved.  It would enable a DSLIST of all such tapes.
>
>-- 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-23 Thread Brian Westerman
Unfortunately, after about 45 years of doing it "this way", the users have a 
lot of their own JCL, it would not be economical or feasible to train or expect 
thousands of them to change or even know how to change their JCL.  Many of them 
(most) don't even know what they are editing, they just replace a VOLSER with 
the one from the listing they have and submit the job.  In a nice little 
environment where you can control these things, you are probably correct, but 
that is not the case in this instance.

Brian

On Tue, 22 Sep 2020 12:55:05 +0200, R.S.  wrote:

>My €0.02:
>This is typical problem when the goal is NOT defined.
>Existing approach seems ridiculous, but it exists. It works.
>So, since it works, why to change it? What is the reason? What goal is
>to achieve?
>More ridiculous are the terms. JCL cannot be changed. WHY???
>However JES2 exit6 which changes JCL "in the flight" is allowed. Why???
>Datasets are important, but the chances it will be ever read are small.
>Uncataloged datasets are a problem, however there is no big problem with
>duplicate names and volser which is known after the dataset is created.
>
>My opinion:
>First, recognize the situation and define the problem, then define the goal.
>Never use tapes, especially for small datasets. Including virtual tapes.
>Small datasets can be written to DASD, zEDC can be used to compress it.
>And DFSMS MC can be used to migrate it to tape. Yes, tapes are still
>good for backup and ML2.
>Large number of datasets is not a problem, that's what are user catalogs
>for.
>Good naming convention will help with ACS routines and ICF aliases.
>It can be GDG or just HLQ.YEAR.SOME.NAME.Ddate, or so. I would not go to
>PDSE members. Member are good candidate for really big number of really
>small files. Note, the smallest chunk of DASD is one track. The smallest
>chunk of PDSE is 4kB, and for PDS is just the size of file, it can be
>one byte. However migrated dataset occupies zero tracks.
>All the revolution require ...just simple changes in JCL and few changes
>in DFSMS realm. I can do that for peanuts ;-)
>
>--
>Radoslaw Skorupka
>Lodz, Poland
>
>
>
>
>
>==
>
>Jeśli nie jesteś adresatem tej wiadomości:
>
>- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
>- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub 
>zapisałeś na dysku).
>Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
>tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, 
>rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza prawo i 
>może podlegać karze.
>
>mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
>Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
>Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
>NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
>01.01.2020 r. wynosi 169.401.468 złotych.
>
>If you are not the addressee of this message:
>
>- let us know by replying to this e-mail (thank you!),
>- delete this message permanently (including all the copies which you have 
>printed out or saved).
>This message may contain legally protected information, which may be used 
>exclusively by the addressee.Please be reminded that anyone who disseminates 
>(copies, distributes) this message or takes any similar action, violates the 
>law and may be penalised.
>
>mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
>Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the 
>Capital City of Warsaw, 12th Commercial Division of the National Court 
>Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital 
>amounting to PLN 169.401.468 as at 1 January 2020.
>
>--
>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: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Martin Packer
Sometimes "in a parallel universe" can mean "in this universe"... :-)

It would be poacher turned, ahem, poacher... :-)

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Sri h Kolusu 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/09/2020 20:34
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



> On the "tagging" that Sri Hari mentioned:
>
> 1) You needn't tag unless you want to - and there will be some occasions
> where you don't want to.

Matrin,

Fully agreed.  I just wanted to show case with IFTHEN it is much easier to
split into multiple files with different conditions.

> Just some thoughts from someone who's loved playing with what DFSORT can
> do but has never actually been a DFSORT developer.


You are always welcome to join DFSORT.


Thanks,
Kolusu


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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Re: SORT question: How to both remove records from a file AND write removed records to a 2nd output?

2020-09-23 Thread Martin Packer
OUTFIL SPLIT.

Something also from the mists of time, by no coincidence, is this: 
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icea100/ice2ca_Example_11._Sort_with_Pipes_and_OUTFIL_SPLIT.htm

TBH, I probably wrote that and Frank made it worth reading. :-)

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   22/09/2020 20:31
Subject:[EXTERNAL] Re: SORT question: How to both remove records 
from a file AND write removed records to a 2nd output?
Sent by:IBM Mainframe Discussion List 



On Tue, 22 Sep 2020 20:08:12 +0100, Martin Packer wrote:
>
>SAVE has, to my mind, been most invaluable. Prior to this you had to
>figure out the boolean complement of the INCLUDE= clause. With more than
>one INCLUDE= clause in a sort it became hairier, requiring De Morgan's
>Law*. :-)  SAVE made this a lot simpler and less error prone.
> 
Yet adding a NOT operator to the grammar (no one has mentioned that
there is one) would relieve programmers of the chore of rewriting complex
Boolean expressions with De Morgan's Law.

>"Card Dealer" not so much.
> 
I don't know "Card Dealer".  Does that amount to having multiple OUTFILs
using different tags?

Thanks,
gil

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




Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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


Re: Caution: "Hacked" email caused the distribution of a potentially harmful attachment

2020-09-23 Thread Wayne Bickerdike
This one is a doozy, came today:

Hello All

If any member receives a suspicious email from Cab Sec V2 Lee-Ann Anselmo
(as per image below) can you please do the following.

Please save the email as an attachment.  If using Outlook you need to
double click on the email to open it up and then right click go to Save As
and then save it to wherever you save your files.

Please then email the attachment to Scott Harrison at

Nice trick..

On Wed, Sep 23, 2020 at 8:14 AM Seymour J Metz  wrote:

> The commercial filters are mostly broken in all sorts of fascinating ways.
> If it's an option your best choice is to find a provider competent to
> select or write decent filters.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Charles Mills 
> Sent: Tuesday, September 22, 2020 5:25 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a
> potentially harmful attachment
>
> The commercial e-mail malware filters watch for e-mail where the "from"
> address and the headers do not match.
>
> They did not used to. The *SPAM* filters watched for the mis-match, but
> not the malware filters. The notorious RSA hack began with a spear-phishing
> e-mail with an attachment of an Excel spreadsheet containing a zero-day
> exploit. RSA's SPAM filter caught it! However, two enterprising employees
> dragged the e-mail out of their SPAM folder and opened it and the attached
> spreadsheet.
>
> Ever since then the malware filter publishers have been watching for this
> mismatch and treating it as potential malware rather than merely potential
> SPAM.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of CM Poncelet
> Sent: Tuesday, September 22, 2020 2:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Caution: "Hacked" email caused the distribution of a
> potentially harmful attachment
>
> Hence, check your trash/deleted folder and then create message filters
> for any legitimate emails it contains, then run your message filters
> against your trash/deleted folder to move the legitimate emails out of
> there and into your "Inbox" folder or whatever other appropriate folders
> - and these legitimate emails will then no longer be trapped as
> spam/scam emails. What these 'not spam/scam' message filters should
> contain and check for is up to 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
>


-- 
Wayne V. Bickerdike

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