from:"Michael Oujesky"

Re: IBM Sterling Connect:Direct for z/OS Version 6, Release 2

2024-05-22 Thread Michael Oujesky

What are you trying to accomplish by not de-compressing the file on 
the receiving system?


Michael

At 09:12 AM 5/22/2024, Sasso, Len wrote:
Good morning! The Connect Direct set of cards below will compress 
the file during transfer to the destination and then extract the 
file at the destination. SIGNON 
CASE=YESSUBMIT 
PROC=COPYDISK  =COMPRESS 
-  SNODE=SFGTST  SNODEID=(ABCDE,123stu456) -   =ABC.FILE 
-   ='/mailbox/TEST.FILE' 
SIGNOFFIs it possible to 
"tell" Connect Direct, not to extract the file at the destination? 
If so, how? Thank You and Please Be Safe. Len Sasso Systems 
Administrator Senior CSRA, A General Dynamics Information Technology 
Company 327 Columbia TPKE Rensselaer, NY 12144 TEAM: Together 
Everyone Achieves More

--
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: SDSF:DA snapshot

2024-05-21 Thread Michael Oujesky

What are you trying to accomplish?  (for example, RMF III)already has 
this capability.)


Michael

At 11:43 PM 5/21/2024, Peter wrote:


Hello

Good evening

Is it possible to take an hourly snapshot of SDSF:DA panel to a GDG ?
Has anyone tried and would like to share the method to achieve this?

Peter

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


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

Re: Refresh RMFGAT collection settings

2024-05-18 Thread Michael Oujesky


Correct syntax:
F RMF,F III,MEMBER(04)
Michael

At 09:15 PM 5/15/2024, Michael Oujesky wrote:


Off the top of my head:

F RMF,F III,M=04

At 08:27 PM 5/15/2024, Mark Jacobs wrote:
Content-Transfer-Encoding: base64If I make changes to ERBRMF04 is 
there any way to refresh what's being collected without restarting RMFGAT?


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


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

Re: ./ ADD - which utility?

2024-05-17 Thread Michael Oujesky

I really miss WSA and it's ability to take a text 
PDS and transfer all the members to Windows 
creating individual members in the target 
directory and doing the EBCDIC to ASCII translation for each member in the PDS.


Michael

At 05:34 PM 4/13/2024, Wayne Bickerdike wrote:

I have some REXX code that extracts all members of a PDS and writes it to a
sequential file. Each member extracted is prefixed with the ./ADD card with
the original member name. Handy for moving a PDS to another system.
IEBUPDTE was the utility of choice when all we had was a card punch and
card reader. (1975).

On Sun, Apr 14, 2024 at 8:08â¯AM Mike Schwab <
05962a42dc49-dmarc-requ...@listserv.ua.edu> wrote:

> No relation to the ditty bops band.
> https://www.youtube.com/watch?v=iu7289s7l64
>
> On Sat, Apr 13, 2024 at 4:56â¯PM Rupert Reynolds 
> wrote:
> >
> > Affectionately known in UK as I-E-B-up-ditty :-)
> >
> > On Sat, 13 Apr 2024, 15:39 ITschak Mugzach, <
> > 05a7ced721d8-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > IEBUPDTE. JCL can be found in google
> > >
> > > ITschak Mugzach
> > > *|** IronSphere Platform* *|* *Information Security Continuous
> Monitoring
> > > for z/OS, x/Linux & IBM I **| z/VM coming soon  *
> > >
> > >
> > >
> > >
> > > On Sat, Apr 13, 2024 at 5:30â¯PM   <
> > > 0619bfe39560-dmarc-requ...@listserv.ua.edu> wrote:
> > >
> > > > Which utility do you use for control statement/input:
> > > > ./ ADD
> > > >
> > > > A jcl for that would be nice too.
> > > >
> > > > ...Embarassed by my lack of memory after 8 years out of this
> > > > envirinment...
> > > >
> > > >
> --
> > > > 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
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
Wayne V. Bickerdike

--
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: Refresh RMFGAT collection settings

2024-05-16 Thread Michael Oujesky

Yes.  Duration of your interval times the number 
of entries in the samples index structure in the DSIG3 data area.

The DSIG3 is the first 32756 bytes in the file 
and is not internally compressed.  A DSIG3 can 
contain a maximum of 1110 sample sets, so 1110 
times your interval is the limit.  Note that if 
the data store is too small to hold all that 
data, your total duration of sample sets will be curtailed.

Michael

At 12:15 PM 5/16/2024, Peter wrote:

Is there a rule on how many days of a data a single VSAM can hold ?

Any references that can be handy to define ?

Peter

On Thu, May 16, 2024, 6:18â¯AM Michael Oujesky 
wrote:

> Off the top of my head:
>
>  F RMF,F III,M=04
>
> At 08:27 PM 5/15/2024, Mark Jacobs wrote:
> >Content-Transfer-Encoding: base64If I make 
changes to ERBRMF04 is> >there any way to 
refresh what's being collected without 
restarting RMFGA >> >Mark Jacobs> >> >Sent from 
[ProtonMail](https://protonmail.com), 
Swiss-based encrypted> email.> >> >GPG Public 
Key -> >> 
https://api.protonmail.ch/pks/lookup?op=get=markjacobs@protonm\¢`>  
 >> >--- 
---> >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: Refresh RMFGAT collection settings

2024-05-15 Thread Michael Oujesky


Off the top of my head:

F RMF,F III,M=04

At 08:27 PM 5/15/2024, Mark Jacobs wrote:
Content-Transfer-Encoding: base64If I make changes to ERBRMF04 is 
there any way to refresh what's being collected without restarting RMFGAT?


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


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

Re: IEFBR14 -- DSCB set? [WAS: Consultation on the Potential Risks of Deleting Specific Datasets]

2024-05-08 Thread Michael Oujesky

If I remember correctly, extended-format PS 
datasets get an EOF written at allocation.


Michael


At 12:00 PM 5/8/2024, Seymour J Metz wrote:
Content-Transfer-Encoding: base64Could you be 
thinking of the option to write an EOF when allocating a new PS?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/\ÛY]µèµõçH5æu5êu¬5àµê5®5ä5uç5åõõæB× 
ÖµÖ£×¦Ö·× ×Ö´×©Ö°××¨Ö¸×ÖµÖ× ×Ö¹Ö¥× ×Ö°×©Ö·××§ÖµÖ¼Ö×¨



From: IBM Mainframe Discussion List 
 on behalf of Steve 
Thompson 
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IEFBR14 -- DSCB set? [WAS: Consultation 
on the Potential Risks of Deleting Specific Datasets]


I remember some releases ago of z/OS that the system will
effectively do an OPEN if a DSN is created using IEFBR14. But now
I can't seem to find where that is documented. So far I can't
find it in the z/OS 2.2 or 3.1 JCL User's guide.

I think that if the allocation specified the DCB info (LRECL,
RECFM, and blksize) that this would be put into the VTOC when
IEFBR14 was used to do the allocation.

So in a case like this, would the last ref date be "empty"?

Steve Thompson

--
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: Mainframe performance tool replacement

2024-05-07 Thread Michael Oujesky

Food for thought, while MICS is tied to running on z/OS, SAS runs on 
multiple platforms.  So you might consider a MICS to MXG conversion 
and shifting to a Windows/Unix platform for the core processing and 
subsequent data analysis and reporting.


Michael

At 08:20 AM 5/7/2024, raji wrote:


Hello All,

Good Day!

We have been running with SAS and MICS software to analysis system
performance and to produce reports on daily basis.

There is a situation to come out of using SAS due to many reasons.

We would like to know the alternate product for this SAS and MICS.

Any suggestions please.

Regards,
Raji M

--
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: How to turn off an OPERLOG filter before getting into SDSF LOG

2024-04-19 Thread Michael Oujesky

Create a backup copy of your profile without the filter, then overlay 
your current profile with the backup before entering SDSF?


Michael

At 12:40 PM 4/18/2024, Collinson, Shannon wrote:
I keep hosing myself up by setting an operlog filter to find very 
specific needles-in-the-haystack and forgetting to do "filter off" 
before I get out of the log.  Then, a day or so later, I try to get 
back to SDSF log and hang forever while it tries to find those 
needles again (in what, for us, is about 1.5 months of 
multiple-lpars' log streams).  Is there a way that I can turn off 
the filter before getting back into operlog?  The "filter off", if I 
issue it on a different SDSF panel, is of course only turning off 
that dialog's filter (not the operlog filter unless I've waited out 
the hang in SDSF log).  Thought there might be something on the 
"log" command, but it looks like I could just switch to syslog and 
back to operlog with that--and it appears to save my filter info for 
operlog across the switches (so I'm hung on the "log o" again).  If 
it's a really horrible hang, I delete my ISPF.ISPPROF(ISFPROF) 
member and let it rebuild from scratch, because I'm not sure where 
this stuff is set, but man, that seems like a nuclear option.  Is 
there a trick I'm missing?  Or a more specific thing I could do 
instead of deleting ISFPROF?


Thanks for any hints!

Shannon Collinson
Senior Principal Infrastructure Engineer/Advisor
Mainframe Engineering - zOS and Innovation / Truist
Stone Mountain, GA 30087
Office: 404-827-6070 / Mobile: 404-642-1280
shannon.collin...@truist.com




The information transmitted is intended solely for the individual or 
entity to which it is addressed and may contain confidential and/or 
privileged material. Any review, retransmission, dissemination or 
other use of or taking action in reliance upon this information by 
persons or entities other than the intended recipient is prohibited. 
If you have received this email in error please contact the sender 
and delete the material from any computer.


--
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: Anyone exploiting ZEDC?

2024-04-17 Thread Michael Oujesky

Unless the file is already compressed.  For those they just get 
passed to ML2 or BACKUP as-is.


Michael

At 04:04 PM 4/17/2024, Glenn Wilcock wrote:

DFSMShsm is an excellent use case for zEDC and is our number one 
best practice for HSM.  When enabled, DSS zEDC compresses all blocks 
of data passed to HSM during Migration and Backup.  Because HSM is 
processing fewer data blocks, both cpu and elapsed time are 
reduced.  When going to ML1, the amount of storage is also 
significantly reduced.


Glenn Wilcock, DFSMS Chief Product Owner

--
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: Anyone exploiting ZEDC?

2024-04-17 Thread Michael Oujesky

SORTWKxx are typically temporary and not SMS 
compression eligible (requires catalog entry to 
hold the SMS compression attributes).


Michael

At 02:31 PM 4/16/2024, Jousma, David wrote:


Michael,

Yes, thanks.  It is just the sortwk datsets that are the issue.

Dave Jousma
Vice President | Director, Technology Engineering




From: IBM Mainframe Discussion List 
 on behalf of Michael 
Oujesky 

Date: Tuesday, April 16, 2024 at 3:24â¯PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Anyone exploiting ZEDC?
Food for thought. zEDC is block oriented rather 
than record oriented (i.âe. reads/writes full 
track blocks on DASD and BLKSIZE become logical 
(i.âe. the size of the buffer used to exchange 
data with the application)), so any processing that expects



Food for thought.  zEDC is block oriented rather than record oriented

(i.e. reads/writes full track blocks on DASD and BLKSIZE become

logical (i.e. the size of the buffer used to exchange data with the

application)), so any processing that expects to make use of BLKSIZE

to perform physical I/O (random, update, etc) will fail.



Thus DFSORT will have issues for SORTWK datasets, but not

SORTIN/SORTOUT datasets.



Michael



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


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


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

Re: Anyone exploiting ZEDC?

2024-04-17 Thread Michael Oujesky

Just a thought, but anyone processing internally compressed CICS or 
DB2 data on a non-z/OS platform (Windows/Unix) might see substantial 
CPU usage from RLE decompression.

Michael
At 07:02 AM 4/17/2024, Scott Chapman wrote:

My recommendation has always been to leave Db2/CICS's RLE 
compression of SMF data enabled even with zEDC compression of the data.

1) Less data will be sent to the zEDC compression engine, which will 
then process faster. I believe at one point I had an IBM chart that 
showed this.
2) The data might (likely) compress better because intervening 
repeated values are removed before it goes through the zEDC 
compression. (As Andrew shows below.) It might be dependent on the 
data, but it makes some sense when you realize that LZ77 relies on 
compressing in 32K blocks and by removing the duplicate zeros you 
potentially get more interesting repeated data into that 32K block.
3) When the data is read back from the zEDC-compressed store to be 
sent someplace for processing it will be smaller if the RLE 
compression was enabled. Depending on what you're doing with the 
data, that might be significant.
4) The RLE compression is extremely lightweight in terms of CPU. I 
do not expect it to be noticeable: it's going to disappear in the 
normal variation in CPU time seen for running the same work on any 
shared system. The only CICS/Db2s that I would expect could have a 
measurable increase in CPU would be those that are completely idle 
and doing nothing but writing interval SMF records to say they 
haven't processed any data.

Scott Chapman

On Wed, 17 Apr 2024 16:36:34 +1000, Andrew Rowley 
 wrote:

>On 17/04/2024 12:09 pm, Michael Oujesky wrote:
>> Yes and zEDC poorly compresses internally RLE compressed records.
>
>I was surprised how well zEDC compressed the already compressed records.
>Using my data:
>
>zEDC alone : 52000 tracks
>
>CICS compression + zEDC : 22000 tracks
>
>zEDC seems to be biased towards speed rather than compression ratio, so
>maybe the RLE compression helps by packing more repeated bytes into
>whatever compression window zEDC uses?
>
>> Plus CSRCESRV uses GP engine cycles
>
>That's true - CPU is probably more expensive than storage, so this could
>be just an interesting side-track. On the other hand, I think zEDC has
>to decompress and recompress the data for SMF dump etc. so CICS
>compression might save some overhead for SMF housekeeping type
>operations, reducing the amount of data going through zEDC?
>
>--
>Andrew Rowley
>Black Hill Software
>
>--
>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: Anyone exploiting ZEDC?

2024-04-17 Thread Michael Oujesky


Just a thought, but 30's compress quite well also.

Michael

At 07:18 AM 4/17/2024, rpinion865 wrote:


Also, you will need this for SMF compression.

ISRBROBA  PINIONR.BAS.PARMLIB(SMFPRM00) - 01.12Line 00 Col 00
Command ===>  Scroll ===>
 Top of Data 
INTVAL(30)  /* SMF GLOBAL RECORDING INTERVAL*/
ACTIVE  /* ACTIVE SMF RECORDING */
RECORDING(LOGSTREAM)
LSNAME(IFASMF.,TYPE(110),COMPRESS)
LSNAME(IFASMF.,TYPE(100:102),COMPRESS)
LSNAME(IFASMF.,TYPE(70,89),COMPRESS)
LSNAME(IFASMF.,TYPE(0:99,103:109,111:2047),
   COMPRESS)




Sent with Proton Mail secure email.

On Wednesday, April 17th, 2024 at 8:08 AM, 
Jousma, David <01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:


> Thank-you very much for this! I suspect this 
is the route we will have to take. To answer 
your other question, yes, ZEDC is a chargeable 
feature (although very inexpensive) and is turned on in IFAPRD00.

>
> Dave Jousma
> Vice President | Director, Technology Engineering
>
>
>
> From: IBM Mainframe Discussion List 
IBM-MAIN@LISTSERV.UA.EDU on behalf of 
rpinion865 042a019916dd-dmarc-requ...@listserv.ua.edu

>
> Date: Tuesday, April 16, 2024 at 3:41â¯PM
> To: IBM-MAIN@LISTSERV.UA.EDU IBM-MAIN@LISTSERV.UA.EDU
>
> Subject: Re: Anyone exploiting ZEDC?
> FWIW, here is a snippet of the SMS ACS DC 
code that we were using for zEDC. /* DEFINE 
extra data sets to receive zEDC compression / 
// 
FILTLIST COMP_DSN INCLUDE(CCM.âCCM.âFDR.â*,

>
>
> FWIW, here is a snippet of the SMS ACS DC code that we were using for zEDC.
>
>
>
> / DEFINE extra data sets to receive zEDC compression /
>
>
>
> //
>
>
>
>
>
>
>
> FILTLIST COMP_DSN INCLUDE(CCM.CCM.FDR.,
>
> RMS.PROD.MSA.BKUP.,
>
> LOGR.IFASMF.,
>
> DB2%.ARCHLOG%.)
>
>
>
> - - - - - - - - - - - - - - - - - - 46 Line(s) not Displ
>
>
>
> /* RULES FOR DISK zEDC HW data compression /
>
>
>
> /*/
>
>
>
> WHEN ( = _DSN) SET ='COMP'
>
> WHEN ( = 'GDS' &&  > 270MB)
>
>
> SET ='COMP'
>
> WHEN ( = 'ADRDSSU' &&  > 55MB)
>
>
> SET ='COMP'
>
>
>
>
>
>
>
>
>
> This e-mail transmission contains information 
that is confidential and may be privileged. It 
is intended only for the addressee(s) named 
above. If you receive this e-mail in error, 
please do not read, copy or disseminate it in 
any manner. If you are not the intended 
recipient, any disclosure, copying, 
distribution or use of the contents of this 
information is prohibited. Please reply to the 
message immediately by informing the sender 
that the message was misdirected. After 
replying, please erase it from your computer 
system. Your assistance in correcting this error is appreciated.

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

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


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

Re: Anyone exploiting ZEDC?

2024-04-16 Thread Michael Oujesky


Yes and zEDC poorly compresses internally RLE compressed records.

Plus CSRCESRV uses GP engine cycles, whereas zEDC offloads the 
processing and reduces CICS and DB2 address space CPU time, By the 
time LOGGER writes the data to  the logstream, it is already 
compressed and is smaller than the compressed internally compressed. 
Ditto for the IFASMFDL logstream unload processing when the output 
files are SMS compressed with zEDC,


Michael

At 06:19 PM 4/16/2024, Andrew Rowley wrote:

Content-Transfer-Encoding: 8bit

On 17/04/2024 7:52 am, Michael Oujesky wrote:


My  current recommendation is to remove internal compression from 
CICS CMF (110/112) and DB2 (100-102) records, Zedc compress the SMF 
logstreams, then compress the logstream offloads via SMS zEDC compression.


Have you compared compressed size of zEDC with/without the CICS 
compression? I have limited samples, but it looks like zEDC might 
compress data better if it has been already been compressed by CICS. 
Of course, there is the CPU time to consider.


I think I/O can also be much faster for zEDC compressed data.

--
Andrew Rowley
Black Hill Software

--
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: Anyone exploiting ZEDC?

2024-04-16 Thread Michael Oujesky


Have you considered using zEDC on your SMF logstreams?

My  current recommendation is to remove internal compression from 
CICS CMF (110/112) and DB2 (100-102) records, Zedc compress the SMF 
logstreams, then compress the logstream offloads via SMS zEDC 
compression.  Note that DFHSM archives compressed data as-is, so that 
ought to reduce storage needs in ML2.


Michael

At 11:16 AM 4/16/2024, Jousma, David wrote:
Is anyone exploiting ZEDC data compression accelerator in your 
environments?   We recently licensed the enablement and are working 
through the issues in our DEV environment.


We initially enabled Extended Format/COMPACT ZP, for all DSORG PS 
datasets, but are quickly finding that DFSORT, SAS, ISPF recovery 
datasets all have issues.   We've turned back off for now.


There is no central location in any IBM doc(including recent 
REDBOOKS) that discusses where we can and cannot leverage ZEDC.   As 
it stands now, we had to back out, and looking at taking a new 
approach in our ACS routines checking for DSORG=PS, and then if not 
temp-dataset, or tape assign a DC with the right options.


What I am wondering is if anyone is further along that can share how 
they rolled out?   I really don't want to have to make the 
applications teams have to "opt-in" by coding a DC in their JCL or 
other dataset allocations.


Dave Jousma
Vice President | Director, Technology Engineering





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


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


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

Re: Anyone exploiting ZEDC?

2024-04-16 Thread Michael Oujesky

Actually to z/OS IAM datasets look like physical 
sequential.  They look to the application like VSAM.


At 02:02 PM 4/16/2024, Jousma, David wrote:

Thanks for that.  We do have IAM here, well 
open a ticket with BMC asking about support.   I 
was just doubting since it presents to the OS as a VSAM dataset.


We were hoping to make ZEDC inclusive as in 
everyone gets it to reap the space reduction, 
and job performance improvements and that the OS 
would decide for us if a particular dataset that 
has the DATACLAS assigned to it would just ignore, but that wont be the case.


I have the ability to code ZEDC_preferred or 
ZEDC-Required.   Required will actually fail the 
allocation, which I dont want to either, but I 
also dont want to use non-accelerated compression either.


So, now as you pointed out, well have to 
approach ZEDC as âexclusive and only opt-in 
file types that are supported like GDGs for 
sure.   We may roll the dice on all PS, 
exempting temp datasets and ISPF work datasets, 
and more as we stumble upon other incompatibilities.


With knowing the technical details, I think IBM 
missed the boat here.   ZEDC ought to be a 
drop-in replacement for compression, period.  I 
can specify COMPACTION YES for VSAM files but ZEDC wont touch them.   Why?


Dave Jousma
Vice President | Director, Technology Engineering





From: IBM Mainframe Discussion List 
 on behalf of 
rpinion865 <042a019916dd-dmarc-requ...@listserv.ua.edu>

Date: Tuesday, April 16, 2024 at 2:25â¯PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Anyone exploiting ZEDC?
At my previous life, we were using BMC's IAM 
VSAM interface. I think IAM could use zEDC. But 
I was told by then IDP support, that IAM's 
internal compression was Moe (as in Moe Howard) 
better than even zEDC. Regarding coding for PS datasets



At my previous life, we were using BMC's IAM 
VSAM interface.  I think IAM could use zEDC. But 
I was told by then IDP support, that IAM's 
internal compression was Moe (as in Moe Howard) better than even zEDC.




Regarding coding for PS datasets opened in/out, 
I think DAF will show how a PS dataset is being 
opened.  We chose to use zEDC compression for 
new,catlg,delete GDGs because we were very 
confident that no one was going to process that combination as in/out.


And does not the IBM zBNA tool highlight good 
candidates?  We did not want to clutter up our 
SMS ACS DC routines with too many actions to put 
certain PS datasets into zEDC compression.  But 
in the end, we did put certain large PS, not 
opened in/out, datasets in the ACS DC routine.










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


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


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

Re: Anyone exploiting ZEDC?

2024-04-16 Thread Michael Oujesky

Not surprising.  IAM replaces VSAM, including 
physical I/O to the file(s), along with better buffering and lookaside.


VSAM can have internally compressed records (like 
RMF III data stores do), but the application is 
responsible to processing the by the application data into a usable form.


In the past, I worked with an application that 
included their own access method that employed 
internally compressed records that included 
uncompressed records upwards of 3MB in size 
(similar in size to some of the reassembled long 
RMF records).  This access method used KSDS VSAM 
and allowed sequential or keyed access to concatenated  VSAM files.


Michael


At 02:26 PM 4/16/2024, rpinion865 wrote:

orm usable by the application
Curious, do you use IAM for Hogan 
applications?  My previous life did, and the 
applications group was very satisfied with the 
IAM performance vs. native VSAM.  However, we 
had to impress on them, that periodic reorgs 
were more necessary for IAM, than under 
VSAM.  And, we found out that ADRDSSU 
dump/restore of VSAM was what was being used to 
perform VSAM reorgs, as opposed to IDCAMS REPRO, DELETE,

DEFINE, REPRO.  Guess what, ADRDSSU sees an IAM dataset as extended format PS!




Sent with Proton Mail secure email.

On Tuesday, April 16th, 2024 at 3:02 PM, Jousma, 
David <01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:


> Thanks for that. We do have IAM here, well 
open a ticket with BMC asking about support. I 
was just doubting since it presents to the OS as a VSAM dataset.

>
> We were hoping to make ZEDC inclusive as in 
everyone gets it to reap the space reduction, 
and job performance improvements and that the 
OS would decide for us if a particular dataset 
that has the DATACLAS assigned to it would just 
ignore, but that wont be the case.

>
> I have the ability to code ZEDC_preferred or 
ZEDC-Required. Required will actually fail the 
allocation, which I dont want to either, but I 
also dont want to use non-accelerated compression either.

>
> So, now as you pointed out, well have to 
approach ZEDC as exclusive and only opt-in 
file types that are supported like GDGs for 
sure. We may roll the dice on all PS, exempting 
temp datasets and ISPF work datasets, and more 
as we stumble upon other incompatibilities.

>
> With knowing the technical details, I think 
IBM missed the boat here. ZEDC ought to be a 
drop-in replacement for compression, period. I 
can specify COMPACTION YES for VSAM files but ZEDC wont touch them. Why?

>
> Dave Jousma
> Vice President | Director, Technology Engineering
>
>
>
>
>
> From: IBM Mainframe Discussion List 
IBM-MAIN@LISTSERV.UA.EDU on behalf of 
rpinion865 042a019916dd-dmarc-requ...@listserv.ua.edu

>
> Date: Tuesday, April 16, 2024 at 2:25â¯PM
> To: IBM-MAIN@LISTSERV.UA.EDU IBM-MAIN@LISTSERV.UA.EDU
>
> Subject: Re: Anyone exploiting ZEDC?
> At my previous life, we were using BMC's IAM 
VSAM interface. I think IAM could use zEDC. But 
I was told by then IDP support, that IAM's 
internal compression was Moe (as in Moe Howard) 
better than even zEDC. Regarding coding for PS datasets

>
>
> At my previous life, we were using BMC's IAM 
VSAM interface. I think IAM could use zEDC. But 
I was told by then IDP support, that IAM's 
internal compression was Moe (as in Moe Howard) better than even zEDC.

>
>
>
> Regarding coding for PS datasets opened 
in/out, I think DAF will show how a PS dataset 
is being opened. We chose to use zEDC 
compression for new,catlg,delete GDGs because 
we were very confident that no one was going to 
process that combination as in/out.

>
> And does not the IBM zBNA tool highlight good 
candidates? We did not want to clutter up our 
SMS ACS DC routines with too many actions to 
put certain PS datasets into zEDC compression. 
But in the end, we did put certain large PS, 
not opened in/out, datasets in the ACS DC routine.

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

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

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

Re: Anyone exploiting ZEDC?

2024-04-16 Thread Michael Oujesky

Food for thought.  zEDC is block oriented rather than record oriented 
(i.e. reads/writes full track blocks on DASD and BLKSIZE become 
logical (i.e. the size of the buffer used to exchange data with the 
application)), so any processing that expects to make use of BLKSIZE 
to perform physical I/O (random, update, etc) will fail.


Thus DFSORT will have issues for SORTWK datasets, but not 
SORTIN/SORTOUT datasets.


Michael

At 01:19 PM 4/16/2024, Sri Hari Kolusu wrote:
>> We initially enabled Extended Format/COMPACT ZP, for all DSORG 
PS datasets, but are quickly finding that DFSORT, SAS, ISPF 
recovery datasets all have issues.


Dave,

Can you elaborate more on the issue that you have with DFSORT as 
ZEDC is supported by DFSORT.  You can send an offline mail to avoid 
the clutter here.


Thanks,
Kolusus
DFSORT Development
IBM Corporation

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


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

Re: FTP translate table defaults

2024-04-04 Thread Michael Oujesky


See EZY2640I in your FTP log.  Ours:
EZY2640I Using 'TCPIP.FTP.DATA' for local site configuration parameters.
You will want to investigate the SBDATACONN setting.

We encountered translation issues using the default translation table 
(TCPIP.STANDARD.TCPXLBIN) that gave a mu in the translated text for a 
vertical line (used in formatting comments in code).  We ended up 
using CONVXLAT to provide a better table for EBCDIC to ASCII 
translation,  Our JCL:

/SYSTSPRT DD SYSOUT=*
/SYSPRINT DD SYSOUT=*
/SYSINDD DUMMY
/SYSTSIN DD *
onvxlat 'TCPIP.SEZATCPX(EUS)' +
'TCPIP.eus.tcpxlbin'
*
And in the FTP processing statements include:
LOCSITE SBDataconn=TCPIP.eus.tcpxlbin
to override the FTP default table.

Hope that helps.

Michael

At 03:36 PM 4/4/2024, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 7bit

Scenario:
ftp client (Windows or Linux) is connecting to z/OS based FTP server.
The user has TSO segment and obviously OMVS one. => 
userid.DATASETS.EXIST and /u/userid/home/exists
I can change translation table, I can use RC file to issue some 
commands including SBDATACONN.
However I wanted to use default translation table. I have read 
several manuals and I'm still lost.
I have found several (many!) different "translation table 
hierarchies", varying depending on various factors. But still don't 
know how the hierarchy works. Is it first catch rule or rather last entry wins?
That's important because I want to use different tables for 
different users and cannot change server's settings (which are not 
specified AFAIK).


Any clue?



--

Radoslaw Skorupka
Lodz, Poland

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


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

Re: Slow FTP's

2024-03-28 Thread Michael Oujesky


Just a thought, but is Connect Direct available?

Michael

At 12:26 PM 3/28/2024, Jousma, David wrote:

Ding ding ding..Gil gets the prize!   Off-list 
send me your favorite adult beverage and where 
to send it, and Ill have it delivered to your door!


Coding EBCDIC, and STRU R was the magic potion.


EZA2509I 16169 megabytes transferred - 10 second 
interval rate 150928.44 KB/sec - Overall transfer rate 130424.81 KB/sec
EZA2509I 17603 megabytes transferred - 10 second 
interval rate 150308.75 KB/sec - Overall transfer rate 131845.13 KB/sec
EZA2509I 19080 megabytes transferred - 10 second 
interval rate 154934.56 KB/sec - Overall transfer rate 133384.38 KB/sec
EZA2509I 20516 megabytes transferred - 10 second 
interval rate 150550.75 KB/sec - Overall transfer rate 134457.31 KB/sec
EZA2509I 21989 megabytes transferred - 10 second 
interval rate 154457.94 KB/sec - Overall transfer rate 135633.81 KB/sec

250 Transfer completed successfully.

DSS running at the remote end

  REST INDD(TAPE)  ODY(RST02A) ADMIN
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'REST '
ADR109I (R/I)-RI01 (01), 2024.088 13:22:47 
INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED

ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
ADR006I (001)-STEND(01), 2024.088 13:22:47 EXECUTION BEGINS
ADR780I (001)-TDFP (01), THE INPUT DUMP DATA SET 
BEING PROCESSED IS IN FULL VOLUME FORMAT AND WAS 
CREATED BY Z/OS DFSMSDSS VERSION



Dave Jousma
Vice President | Director, Technology Engineering





From: IBM Mainframe Discussion List 
 on behalf of Jousma, 
David <01a0403c5dc1-dmarc-requ...@listserv.ua.edu>

Date: Thursday, March 28, 2024 at 1:17â¯PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Slow FTP's
Will give that a shot Gil. Running now, at the 
fast speed. Well if if ADRDSSU at the remote 
end can read the file Dave Jousma Vice President 
| Director, Technology Engineering From: IBM 
Mainframe Discussion List 



Will give that a shot Gil.  Running now, at the 
fast speed.   Well if if ADRDSSU at the remote end can read the file




Dave Jousma

Vice President | Director, Technology Engineering









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


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


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

Re: Learning one's tools

2024-03-15 Thread Michael Oujesky


Wonder how he made senior. Politics and not skills or expertise.

At 03:19 PM 3/15/2024, Farley, Peter wrote:
Content-Transfer-Encoding: base64+1 from me on 
continuing to learn the tools of our 
profession.  I use STRING and UNSTRING where 
they make sense, and I am still learning new 
things about their use every now and 
then.  Life-long learning is the only path to happiness and success.


I got the same ridiculous pushback from a senior 
manager one time on the use of sophisticated 
SORT verbs like JOIN because . . . no one but 
you will know how to fix it when it breaks . . . 
let someone do it in COBOL instead . . ..


Peter

From: IBM Mainframe Discussion List 

Sent: Friday, March 15, 2024 12:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Learning one's tools


To rant on a related subject, I once worked at a 
company that instituted code reviews; a new 
program would be gone over by a half-dozen 
coworkers to be sure it adhered to local 
standards.  This sort of thing is always painful 
to the coder, and nevertheless (I admit 
reluctantly) can have considerable value if done 
right.  One problem I had with it, though, is 
that the standards we created for ourselves 
admitted that there are times when exceptions 
should be made for special cases, and yet when 
those cases arose no exceptions were ever 
allowed; the team invariably flinched, leaned 
back in their seats and said "no, that's not according to our standards".




One particular example always rankled:  Whenever 
someone felt the need to use a STRING or 
UNSTRING command (I should have said we were 
COBOL developers), the team always struck it 
down on the grounds that STRING and UNSTRING are 
unusual commands and some COBOL coders would be 
unfamiliar with it.  My contention here is that 
that's absolutely true, and it's the job of the 
COBOL coder to ~learn~ the STRING and UNSTRING 
statements, as tools of his profession.  I never 
persuaded anyone to that view, though.




---



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


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

Re: Learning one's tools

2024-03-15 Thread Michael Oujesky


A chain is only as strong as it's weakest link.

Michael

At 11:37 AM 3/15/2024, Bob Bridges wrote:

To rant on a related subject, I once worked at a company that 
instituted code reviews; a new program would be gone over by a 
half-dozen coworkers to be sure it adhered to local standards.  This 
sort of thing is always painful to the coder, and nevertheless (I 
admit reluctantly) can have considerable value if done right.  One 
problem I had with it, though, is that the standards we created for 
ourselves admitted that there are times when exceptions should be 
made for special cases, and yet when those cases arose no exceptions 
were ever allowed; the team invariably flinched, leaned back in 
their seats and said "no, that's not according to our standards".


One particular example always rankled:  Whenever someone felt the 
need to use a STRING or UNSTRING command (I should have said we were 
COBOL developers), the team always struck it down on the grounds 
that STRING and UNSTRING are unusual commands and some COBOL coders 
would be unfamiliar with it.  My contention here is that that's 
absolutely true, and it's the job of the COBOL coder to ~learn~ the 
STRING and UNSTRING statements, as tools of his profession.  I never 
persuaded anyone to that view, though.


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

/* Democracy is where you can say what you think even if you don't think. */

-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Rupert Reynolds

Sent: Thursday, March 14, 2024 22:22

There's nothing wrong with 'signal', of course, except that a lot of 
people reading the code won't be expecting it :-)


--
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: IGGCSI00 Catalog Search interface

2024-03-14 Thread Michael Oujesky


Have you looked at DCOLLECT data?

Michael

At 08:19 AM 3/14/2024, Don Johnson wrote:


Good morning!

I am working with the IGGCSI00 module, and have looked at the field 
descriptions and think I am missing something.


Does anyone know the CSI field name and format where I can discover 
if a file is a BASIC or LARGE DSNtype?


Thanks!
Don

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


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

Re: Can DFSORT assign custom Return Code values?

2024-03-04 Thread Michael Oujesky

Presuming these are three different z/OS instances. why not just use 
system symbols to make the determination of what environment is being used?


Michael

At 10:12 AM 3/4/2024, Sri Hari Kolusu wrote:
Content-Transfer-Encoding: base64>> I was to be able to assign one 
of three different Return Code values (any value) that I can let 
check to determine if I am running in Development, Pre-Prod or 
Production, and then execute steps related to the specific environment.

Not something I absolutely need since I could write a tiny program for this.

Cameron,

DFSORT has limited ability to set a return code but not the way you 
want. However, I think we can solve your issue quite easily by 
validating the symbol and only generating the steps that needs to 
run for that Symbolic. Remember DFSORT has the ability of reading 
the system symbols and determine the LPAR it is running.


Please send an offline email with your complete requirement and I 
will show you a way to do it.


Thanks,
Kolusu
DFSORT Development
IBM Corporation

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


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

Re: [Very much off-topic] Re: AI is the real deal.

2024-02-24 Thread Michael Oujesky

Not just the power grid, but all electronics and 
presuming the flare(s) don't match other great ones:
<https://journals.uair.arizona.edu/index.php/radiocarbon/article/viewFile/3464/pdf>LaViolette.fm 
(arizona.edu)

Michael

At 01:50 AM 2/23/2024, Mike Schwab wrote:


Yep.  Magnetic fields moving over power lines generating massive
amounts of current.
https://www.sciencetimes.com/articles/44957/20230721/quebec-blackout-1989-lessons-geomagnetic-storm-shocked-entire-nation.htm

On Thu, Feb 22, 2024 at 9:08â¯PM Michael 
Oujesky  wrote:

>
> And all it will take is one solar flare like 
the one in 1859 (Carrington event) to take the 
world back to pre-electricity days

>
> 
https://www.bu.edu/articles/2012/detecting-the-perfect-solar-storm/#:~:text=If%20a%20massive%20storm%20like,U.S.%20National%20Academy%20of%20Sciences.

>
> Michael
>
> On Thu, Feb 22, 2024, at 8:06 PM,Seymour J Metz wrote:
> > Dedicated fax machines, combo printer/scanner/fax or wokstations with
> > fax modems?
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> > ×¢Ö·× ×Ö´×©Ö°××¨Ö¸×Öµ× ×Ö·×
> > × ÖµÖ£×¦Ö·× ×Ö´×©Ö°××¨Ö¸×ÖµÖ× ×Ö¹Ö¥× ×Ö°×©Ö·××§ÖµÖ¼Ö×¨
> >
> > 
> > From: IBM Mainframe Discussion List  on
> > behalf of Gibney, Dave <03b5261cfd78-dmarc-requ...@listserv.ua.edu>
> > Sent: Thursday, February 22, 2024 7:29 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [Very much off-topic] Re: AI is the real deal.
> >
> > Fax machines are still heavily used un medical and legal areas
> >
> >> -Original Message-
> >> From: IBM Mainframe Discussion List  On
> >> Behalf Of zMan
> >> Sent: Thursday, February 22, 2024 4:06 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: [Very much off-topic] Re: AI is the real deal.
> >>
> >> [EXTERNAL EMAIL]
> >>
> >> The FAX machine's impact wasn't exactly tiny. Short-lived, yes.
> >>
> >> On Thu, Feb 22, 2024 at 7:04â¯PM Dave Beagle < 0525eaef6620-dmarc-
> >> requ...@listserv.ua.edu> wrote:
> >>
> >> > Picking on Krugman is typical of the right. But, thats not exactly
> >> > what he said. Heres the context.
> >> >
> >> >
> >> >
> >> 
https://secure-web.cisco.com/1CieSMPaZwvATHo3u6SeKwdTSLYWjrgzgHMj5G0cgeCU6OwRX-tYZ0dZywGFgIYxZ06npUpn5PdldAbPxondPyUXiudafJL2BDmpgDe6rIweSl28zsyyk2d3NIj-xPIx6hsP1J7Opb2qapLGK-iUSprkRmplH8sgKkH2Fa_GDPo3s5-6nMxBfty_xI1VeBOk3eZA2jCA0T-lEW75Uwsp9gT2BVKTGHZRysd2x6abN4KAFeZTovDz9zsB5F5HQrDt9snuZo7CYjPBb6oBbE3fHDt6B9Abfd4xRxhiXU5O_bnWnTmtJPekKqEj5EtxQBmN-0SFI7HoHDQAVGFH-ZEfBvmvGMg6Y97kUewFyxBcTIy8QDI833P3l0MKy3q3xE1_tkY9JoCGfDvLIb0ULhWAPS-s9z2pDcGcO2WS-9Q6JrVg/https%3A%2F%2Fnam12.safelinks.protection.outlook.com%2F%3Furl%3Dhttps%253A%252F%252Furld

> >> >
> >> efense.com%2Fv3%2F__https%3A%2F%2Fwww.businessinsider.com%2Fpau
> >> l-krugm
> >> > an-responds-to-internet-quote-2013-
> >> 12%3Famp__%3B!!JmPEgBY0HMszNaDT!pUV
> >> >
> >> U8USJPSqXuREx80y0bQ5MR7v2G271msUDJVyimwcA0x0oiPePyvVMbEFmX
> >> vp0KkVgyslQg
> >> >
> >> BkUcCIgOietLWEjpfoWVvXo%24=05%7C02%7CGIBNEY%40WSU.EDU%
> >> 7Ce292b02ec
> >> >
> >> ab547644c8d08dc34034e72%7Cb52be471f7f147b4a8790c799bb53db5%7
> >> C0%7C0%7C6
> >> >
> >> 38442436003405898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAw
> >> MDAiLCJQIjoi
> >> >
> >> V2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C0%7C%7C%7C=rkxa
> >> e42Xnjdr
> >> > ZsbYsztE%2FeQftM45pYXwoSisSXM3MvA%3D=0
> >> >
> >> >
> >> >
> >> >
> >> >
> >> > Sent from Yahoo Mail for iPhone
> >> >
> >> >
> >> > On Thursday, February 22, 2024, 5:12 PM, Bob Bridges <
> >> > 0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
> >> >
> >> > Speaking of old predictions:  /* By 2005 or so, it will be clear that
> >> > the Internet's impact on the economy has been no greater than the fax
> >> > machine's.  -Paul Krugman, Nobel-prize-winning economist in 1998 */
> >> >
> >> > ---
> >> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
> >> >
> >> > -Original Message-
> >> > From: IBM Mainframe Discussion List  On
> >> > Behalf Of Lennie Dymoke-Bradshaw
> >> > Sent: Thursday, February 22, 2024 16:58
> >> >
> >> > Sorry, the date has been truncated on the left.
>

Re: [Very much off-topic] Re: AI is the real deal.

2024-02-22 Thread Michael Oujesky

And all it will take is one solar flare like the one in 1859 (Carrington event) 
to take the world back to pre-electricity days

https://www.bu.edu/articles/2012/detecting-the-perfect-solar-storm/#:~:text=If%20a%20massive%20storm%20like,U.S.%20National%20Academy%20of%20Sciences.

Michael

On Thu, Feb 22, 2024, at 8:06 PM,Seymour J Metz wrote:
> Dedicated fax machines, combo printer/scanner/fax or wokstations with 
> fax modems?
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> 
> From: IBM Mainframe Discussion List  on 
> behalf of Gibney, Dave <03b5261cfd78-dmarc-requ...@listserv.ua.edu>
> Sent: Thursday, February 22, 2024 7:29 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [Very much off-topic] Re: AI is the real deal.
>
> Fax machines are still heavily used un medical and legal areas
>
>> -Original Message-
>> From: IBM Mainframe Discussion List  On
>> Behalf Of zMan
>> Sent: Thursday, February 22, 2024 4:06 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: [Very much off-topic] Re: AI is the real deal.
>>
>> [EXTERNAL EMAIL]
>>
>> The FAX machine's impact wasn't exactly tiny. Short-lived, yes.
>>
>> On Thu, Feb 22, 2024 at 7:04 PM Dave Beagle < 0525eaef6620-dmarc-
>> requ...@listserv.ua.edu> wrote:
>>
>> > Picking on Krugman is typical of the right. But, that’s not exactly
>> > what he said. Here’s the context.
>> >
>> >
>> >
>> https://secure-web.cisco.com/1CieSMPaZwvATHo3u6SeKwdTSLYWjrgzgHMj5G0cgeCU6OwRX-tYZ0dZywGFgIYxZ06npUpn5PdldAbPxondPyUXiudafJL2BDmpgDe6rIweSl28zsyyk2d3NIj-xPIx6hsP1J7Opb2qapLGK-iUSprkRmplH8sgKkH2Fa_GDPo3s5-6nMxBfty_xI1VeBOk3eZA2jCA0T-lEW75Uwsp9gT2BVKTGHZRysd2x6abN4KAFeZTovDz9zsB5F5HQrDt9snuZo7CYjPBb6oBbE3fHDt6B9Abfd4xRxhiXU5O_bnWnTmtJPekKqEj5EtxQBmN-0SFI7HoHDQAVGFH-ZEfBvmvGMg6Y97kUewFyxBcTIy8QDI833P3l0MKy3q3xE1_tkY9JoCGfDvLIb0ULhWAPS-s9z2pDcGcO2WS-9Q6JrVg/https%3A%2F%2Fnam12.safelinks.protection.outlook.com%2F%3Furl%3Dhttps%253A%252F%252Furld
>> >
>> efense.com%2Fv3%2F__https%3A%2F%2Fwww.businessinsider.com%2Fpau
>> l-krugm
>> > an-responds-to-internet-quote-2013-
>> 12%3Famp__%3B!!JmPEgBY0HMszNaDT!pUV
>> >
>> U8USJPSqXuREx80y0bQ5MR7v2G271msUDJVyimwcA0x0oiPePyvVMbEFmX
>> vp0KkVgyslQg
>> >
>> BkUcCIgOietLWEjpfoWVvXo%24=05%7C02%7CGIBNEY%40WSU.EDU%
>> 7Ce292b02ec
>> >
>> ab547644c8d08dc34034e72%7Cb52be471f7f147b4a8790c799bb53db5%7
>> C0%7C0%7C6
>> >
>> 38442436003405898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAw
>> MDAiLCJQIjoi
>> >
>> V2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C0%7C%7C%7C=rkxa
>> e42Xnjdr
>> > ZsbYsztE%2FeQftM45pYXwoSisSXM3MvA%3D=0
>> >
>> >
>> >
>> >
>> >
>> > Sent from Yahoo Mail for iPhone
>> >
>> >
>> > On Thursday, February 22, 2024, 5:12 PM, Bob Bridges <
>> > 0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
>> >
>> > Speaking of old predictions:  /* By 2005 or so, it will be clear that
>> > the Internet's impact on the economy has been no greater than the fax
>> > machine's.  -Paul Krugman, Nobel-prize-winning economist in 1998 */
>> >
>> > ---
>> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>> >
>> > -Original Message-
>> > From: IBM Mainframe Discussion List  On
>> > Behalf Of Lennie Dymoke-Bradshaw
>> > Sent: Thursday, February 22, 2024 16:58
>> >
>> > Sorry, the date has been truncated on the left.
>> > That should be 11994.
>> >
>> > -Original Message-
>> > From: IBM Mainframe Discussion List  On
>> > Behalf Of Allan Staller
>> > Sent: 22 February 2024 19:42
>> >
>> > The last mainframe will be turned off in 1994 - Gartner Group
>> >
>> > -Original Message-
>> > From: IBM Mainframe Discussion List  On
>> > Behalf Of Seymour J Metz
>> > Sent: Thursday, February 22, 2024 11:11 AM
>> >
>> > A 5-year prediction is generally safe, because in 5 years people will
>> > have forgotten the predictions. Who remembers the failed 5-year
>> > predictions for, e.g., controlled fusion, human level machine translation?
>> >
>> > I expect it to eventually happen, but as for when, Hypotheses non
>> > fingo <
>> >
>> https://secure-web.cisco.com/1CieSMPaZwvATHo3u6SeKwdTSLYWjrgzgHMj5G0cgeCU6OwRX-tYZ0dZywGFgIYxZ06npUpn5PdldAbPxondPyUXiudafJL2BDmpgDe6rIweSl28zsyyk2d3NIj-xPIx6hsP1J7Opb2qapLGK-iUSprkRmplH8sgKkH2Fa_GDPo3s5-6nMxBfty_xI1VeBOk3eZA2jCA0T-lEW75Uwsp9gT2BVKTGHZRysd2x6abN4KAFeZTovDz9zsB5F5HQrDt9snuZo7CYjPBb6oBbE3fHDt6B9Abfd4xRxhiXU5O_bnWnTmtJPekKqEj5EtxQBmN-0SFI7HoHDQAVGFH-ZEfBvmvGMg6Y97kUewFyxBcTIy8QDI833P3l0MKy3q3xE1_tkY9JoCGfDvLIb0ULhWAPS-s9z2pDcGcO2WS-9Q6JrVg/https%3A%2F%2Fnam12.safelinks.protection.outlook.com%2F%3Furl%3Dhttps%253A%252F%252Furld
>> efense.com%2Fv3%2F__https%3A%2F%2Fen.wikipedia.org%2Fwiki%2FHypo
>> theses_non_fingo__%3B!!JmPEgBY0HMszNaDT!pUVU8USJPSqXuREx80y0bQ
>> 5MR7v2G271msUDJVyimwcA0x0oiPePyvVMbEFmXvp0KkVgyslQgBkUcCIgOi
>> etLWEjpRKs5ifv%24=05%7C02%7CGIBNEY%40WSU.EDU%7Ce292b02
>> ecab547644c8d08dc34034e72%7Cb52be471f7f147b4a8790c799bb53db5
>>

Re: Something keeps releasing space on a large (annual) DS

2024-02-21 Thread Michael Oujesky

SMS compression/de-compression is done by the access method 
(presuming regular QSAM/BSAM) and is usually transparent to the 
application.  A long time ago, tailored compression had a bug that 
lost track of where the tailored dictionary was kept and 
caused  abends when trying to read the file.  HMIGRATE/recall of the 
dataset corrected the error.  I would expect y'all have zEDC 
available and that operates on a block level providing better 
compression than either generic or tailored compression options.


Michael

At 01:33 PM 2/21/2024, Bob Bridges wrote:
Ooh, now that's interesting!  The content of this file would lend 
itself well to compression - all alphanumeric with a few parens, 
colons and the like.  But what happens when someone needs to view 
it?  Does it compress automatically or is another step required?


It's not something I can bring up now, because everyone's busy with a z/OS
upgrade.  But next month...

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

/* For Sale: Parachute.  Only used once, never opened, small stain. */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Michael Oujesky
Sent: Wednesday, February 21, 2024 13:49

You might consider SMS compression to reduce the physical size of the file.
If you do, change the BLKSIZE to 32760 as SMS compression writes full tracks
and the BLKSIZE becomes logical (the size of the buffer used in passing date
to/from the application).

--- At 11:44 AM 2/21/2024, Bob Bridges wrote:
>I'm not a sysprog (just a security geek), but I can at least allocate
>datasets, and at the start of this year it fell to me to allocate a new
>dataset in which are logged all changes made in the security system.
>Past year's log are in the 12000-track range, so I started with a
>smaller allocation while I took the time to talk to our sysprog about
>space requirements.  It's populated from a daily production job, by the
>way.
>
>When I re-allocated it, on his advice I tried a multi-volume and
>extended allocation (PS-E).  Almost immediately the job started
>bombing, claiming that the first four volumes it tried didn't have the
>necessary space to add an extension.  The sysprog is puzzled - says it
>should have looked in volumes that DO have the space, not the ones that
>don't.
>
>Second attempt (I don't count the temporary smaller allocation) I kept
>PS-E but dropped the multi-volume requirement.  I've never done one of
>those anyway, and don't trust 'em.  The system promptly dropped the
>extra tracks I allocated, and a day or two later the job started
>bombing with a B37-04.
>
>Third attempt: Forget PS-E (I'm unfamiliar with that too) and just used
>SPACE=(TRK,(9000,1000)).  That seemed to work for a whole week, but I
>just noticed that something, somewhere, has released extra space AGAIN;
>3.4 tells me it's now 1960 tracks and 83%.  The job isn't bombing yet;
>some time later in the year I'm guessing it's going to.
>
>Pardon my frustration: WHAT THE HECK IS GOING ON?  Why does it keep
>releasing space although I never specified RLSE?  The sysprog doesn't
>know either - but he's an external contractor who just took over the
>system a few months ago and if it's something simple he may not be
>aware yet of ... I dunno, something in SMS maybe?
>
>Some wrinkles that may or may not be relevant:
>
>1) The dataset is written using a REXX exec that calculates the DSN by
>reference to the current year.  This relieves folks from having to
>update the JCL every year, but maybe something about the way the exec
>does the allocate is causing the problem?  I'm guessing not, because as
>far as I now this job has run correctly for years.  But just in case:
>
>   "ALLOC DDN(CHG$$OT) DSN('') MOD CATALOG REUSE",
>   "SPACE(300,30) CYLINDERS RECFM(V,B) LRECL(304) BLKSIZE(27998)"
>
>2) I don't know anything about SMS, but could something there be
>releasing space?
>
>3) What IS extended PS, anyway?  I'm told it allows more than 16
>extents, but a) how many more? And b) how else is it different?
>
>4) I allocated the dataset each time using not batch JCL but 3.2 ...
>expecting there's no difference.

--
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: Something keeps releasing space on a large (annual) DS

2024-02-21 Thread Michael Oujesky

You might consider SMS compression to reduce the physical size of the 
file.  If you do, change the BLKSIZE to 32760 as SMS compression 
writes full tracks and the BLKSIZE becomes logical (the size of the 
buffer used in passing date to/from the application).


Michael

At 11:44 AM 2/21/2024, Bob Bridges wrote:

I'm not a sysprog (just a security geek), but I can at least 
allocate datasets, and at the start of this year it fell to me to 
allocate a new dataset in which are logged all changes made in the 
security system.  Past year's log are in the 12000-track range, so I 
started with a smaller allocation while I took the time to talk to 
our sysprog about space requirements.  It's populated from a daily 
production job, by the way.


When I re-allocated it, on his advice I tried a multi-volume and 
extended allocation (PS-E).  Almost immediately the job started 
bombing, claiming that the first four volumes it tried didn't have 
the necessary space to add an extension.  The sysprog is puzzled - 
says it should have looked in volumes that DO have the space, not 
the ones that don't.


Second attempt (I don't count the temporary smaller allocation) I 
kept PS-E but dropped the multi-volume requirement.  I've never done 
one of those anyway, and don't trust 'em.  The system promptly 
dropped the extra tracks I allocated, and a day or two later the job 
started bombing with a B37-04.


Third attempt: Forget PS-E (I'm unfamiliar with that too) and just 
used SPACE=(TRK,(9000,1000)).  That seemed to work for a whole week, 
but I just noticed that something, somewhere, has released extra 
space AGAIN; 3.4 tells me it's now 1960 tracks and 83%.  The job 
isn't bombing yet; some time later in the year I'm guessing it's going to.


Pardon my frustration: WHAT THE HECK IS GOING ON?  Why does it keep 
releasing space although I never specified RLSE?  The sysprog 
doesn't know either - but he's an external contractor who just took 
over the system a few months ago and if it's something simple he may 
not be aware yet of ... I dunno, something in SMS maybe?


Some wrinkles that may or may not be relevant:

1) The dataset is written using a REXX exec that calculates the DSN 
by reference to the current year.  This relieves folks from having 
to update the JCL every year, but maybe something about the way the 
exec does the allocate is causing the problem?  I'm guessing not, 
because as far as I now this job has run correctly for years.  But 
just in case:


  "ALLOC DDN(CHG$$OT) DSN('') MOD CATALOG REUSE",
  "SPACE(300,30) CYLINDERS RECFM(V,B) LRECL(304) BLKSIZE(27998)"

2) I don't know anything about SMS, but could something there be 
releasing space?


3) What IS extended PS, anyway?  I'm told it allows more than 16 
extents, but a) how many more? And b) how else is it different?


4) I allocated the dataset each time using not batch JCL but 3.2 ... 
expecting there's no difference.


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

/* Law #6 of combat operations:  If it's stupid but it works, it 
isn't stupid. */


--
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: Insecure security - was SDSF PS Command column

2024-02-14 Thread Michael Oujesky



Won't work when there is electical tape across the camera lens.




Webcam when they open the binder to enter the password.

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

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


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

Re: Connect:Direct question

2024-02-06 Thread Michael Oujesky

Another tidbit on using the ADRDSSU exit - if the file(s) is/are 
compressed, they are transferred without de-compression and re-compression.


Michael

At 12:26 PM 2/1/2024, Michael Oujesky wrote:
Food for thought.  You might investigate using the ADRDSSU exit 
available to C:D.


Not only does it allow specifying target dataset(s) SMS classes, it 
even allows copying whole volumes or dsname-masked groups of files 
between z/OS systems.


Michael

At 07:50 AM 1/31/2024, Gadi Ben-Avi wrote:

Hi,
I am trying to transfer a file using Connect:Direct from one z/OS 
system to another.

I need to specify both STORCLAS and DATACLAS.
This is what I am writing:
CPYSEQ PROCESS-
SNODE=RTST
 COPY1 COPY-
   FROM (DSN=G120NTN.KVTNKSP.UNLOAD-
 DISP=SHR  -
 PNODE -
) -
   TO   (DSN=G120NTN.KVTNKSP.UNLOAD-
 DISP=(NEW,CATLG)  -
 SPACE=(CYL,(999,),RLSE)   -
 SYSOPTS="STORCLAS=RKF1 DATACLAS=EXT" -
 SNODE -
)

And I keep getting errors.

How to I specify more than one parameter in SYSOPTS. I've tried 
writing a comma between the parameters with the same results.


Thanks

Gadi





--
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: Replacement for LMAC program in ISPF 3.1

2024-02-03 Thread Michael Oujesky

Looks like ISPF jumped from version 7.5 on z/OS 
2.5 to 8.x in 3.1, so, presuming services 
requests are used in lieu of control block 
manipulation in the code, zapping BD7 from '7' to '8' just might work.


Michael

At 04:36 PM 2/2/2024, Michael Oujesky wrote:
Presuming those control block revisions were 
made with the specific intent to cause existing coding to fail.


Michael

At 05:14 AM 2/1/2024, Lionel B. Dyck wrote:

This would work great if IBM hadn't also 
changed some control block offsets â¹



Lionel B. Dyck <><
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: 
https://discord.gg/system-z-enthusiasts-880322471608344597


Worry more about your character than your 
reputation. Character is what you are, 
reputation merely what others think you are.   - - - John Wooden


-Original Message-
From: IBM Mainframe Discussion List 
 On Behalf Of Michael Oujesky

Sent: Wednesday, January 31, 2024 5:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Replacement for LMAC program in ISPF 3.1

In LMAC CSECT, offset BD4 is '5.8' and BD7 is '7.9'.  Code segment at
152 does the checking.

Michael

At 08:37 AM 1/30/2024, Lionel B. Dyck wrote:

>After looking into it the code is in a load module that appears to have
>been written in PL/X. There are no visible constants for either
>5.8 or 7.9 that could be zapped.
>
>CBTtape file 961 by Yves Colliard is an excellent replacement with many
>build in edit line commands. It isn't the same as LMAC as it isn't
>dynamic but it would be worth investigating.
>
>Lionel B. Dyck <><
>Github: https://github.com/lbdyck
>
>"Worry more about your character than your reputation. Character is
>what you are, reputation merely what others 
think you are."   - - - John Wooden

>
>-Original Message-
>From: IBM Mainframe Discussion List  On
>Behalf Of Schmitt, Michael
>Sent: Monday, January 29, 2024 1:19 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Replacement for LMAC program in ISPF 3.1
>
>ISPF has 3 variables that an application can interrogate for the
>version: ZOS90RL, ZISPFOS, and ZENVIR. The fact that the edit says the
>ISPF version must be between 5.8 and 7.9 makes me suspect it is using
>ZENVIR.
>
>What is in the ISPF ZENVIR variable on your z/OS 3.1 system? For
>example, on a z/OS 2.4 system it is 'ISPF 7.4MVS TSO'.
>
>
>I'm wondering if the high release is a real requirement. You might try
>zapping the program to change or bypass the edit, so that it can run,
>and see what happens.
>
>-Original Message-
>From: IBM Mainframe Discussion List  On
>Behalf Of Billy Ashton
>Sent: Monday, January 29, 2024 12:36 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Replacement for LMAC program in ISPF 3.1
>
>Hello, we just turned on z/OS 3.1, and its component ISPF 3.1 here.
>
>Now, I just saw when editing a member that my LMAC program (from Doug
>Nadel originally) no longer works, and gives me a message:
>LMAC005 You must be running an ISPF version greater than 5.8 and less
>than  7.9 to run LMAC.
>
>How should I deal with this? A quick look on the web indicated that I
>should use the utility function to define each line command to a macro.
>I currently have 85 macros in my single Rexx driver, and cannot imagine
>splitting this and going through that.
>
>Do I have any way to drive my single macro program like I had before
>with LMAC?
>
>Thank you and best regards,
>Billy Ashton
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


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


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


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

Re: Replacement for LMAC program in ISPF 3.1

2024-02-02 Thread Michael Oujesky

Since the original source code nor the PL/X 
compiler are available, rather a moot question.


Michael

At 06:20 PM 2/2/2024, Paul Gilmartin wrote:


On Fri, 2 Feb 2024 16:36:34 -0600, Michael Oujesky wrote:

>Presuming those control block revisions were made
>with the specific intent to cause existing coding to fail.
>
>Michael
>
>At 05:14 AM 2/1/2024, Lionel B. Dyck wrote:
>
>>This would work great if IBM hadn't also changed
>>some control block offsets â¹
>>
Didn't they make corresponding changes in the macros mapping
those data areas?  Did they hard-code those offsets?

Programming 101.

--
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: Replacement for LMAC program in ISPF 3.1

2024-02-02 Thread Michael Oujesky

Presuming those control block revisions were made 
with the specific intent to cause existing coding to fail.


Michael

At 05:14 AM 2/1/2024, Lionel B. Dyck wrote:

This would work great if IBM hadn't also changed 
some control block offsets â¹



Lionel B. Dyck <><
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: 
https://discord.gg/system-z-enthusiasts-880322471608344597


Worry more about your character than your 
reputation. Character is what you are, 
reputation merely what others think you are.   - - - John Wooden


-Original Message-
From: IBM Mainframe Discussion List 
 On Behalf Of Michael Oujesky

Sent: Wednesday, January 31, 2024 5:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Replacement for LMAC program in ISPF 3.1

In LMAC CSECT, offset BD4 is '5.8' and BD7 is '7.9'.  Code segment at
152 does the checking.

Michael

At 08:37 AM 1/30/2024, Lionel B. Dyck wrote:

>After looking into it the code is in a load module that appears to have
>been written in PL/X. There are no visible constants for either
>5.8 or 7.9 that could be zapped.
>
>CBTtape file 961 by Yves Colliard is an excellent replacement with many
>build in edit line commands. It isn't the same as LMAC as it isn't
>dynamic but it would be worth investigating.
>
>Lionel B. Dyck <><
>Github: https://github.com/lbdyck
>
>"Worry more about your character than your reputation. Character is
>what you are, reputation merely what others 
think you are."   - - - John Wooden

>
>-Original Message-
>From: IBM Mainframe Discussion List  On
>Behalf Of Schmitt, Michael
>Sent: Monday, January 29, 2024 1:19 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Replacement for LMAC program in ISPF 3.1
>
>ISPF has 3 variables that an application can interrogate for the
>version: ZOS90RL, ZISPFOS, and ZENVIR. The fact that the edit says the
>ISPF version must be between 5.8 and 7.9 makes me suspect it is using
>ZENVIR.
>
>What is in the ISPF ZENVIR variable on your z/OS 3.1 system? For
>example, on a z/OS 2.4 system it is 'ISPF 7.4MVS TSO'.
>
>
>I'm wondering if the high release is a real requirement. You might try
>zapping the program to change or bypass the edit, so that it can run,
>and see what happens.
>
>-Original Message-
>From: IBM Mainframe Discussion List  On
>Behalf Of Billy Ashton
>Sent: Monday, January 29, 2024 12:36 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Replacement for LMAC program in ISPF 3.1
>
>Hello, we just turned on z/OS 3.1, and its component ISPF 3.1 here.
>
>Now, I just saw when editing a member that my LMAC program (from Doug
>Nadel originally) no longer works, and gives me a message:
>LMAC005 You must be running an ISPF version greater than 5.8 and less
>than  7.9 to run LMAC.
>
>How should I deal with this? A quick look on the web indicated that I
>should use the utility function to define each line command to a macro.
>I currently have 85 macros in my single Rexx driver, and cannot imagine
>splitting this and going through that.
>
>Do I have any way to drive my single macro program like I had before
>with LMAC?
>
>Thank you and best regards,
>Billy Ashton
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>--
>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: EXTERNAL EMAIL: JES2 JOBDEF DUPL_JOB=NODELAY - Any gotchas?

2024-02-01 Thread Michael Oujesky

And poorly designed applications that dynamically 
request the same resources exclusively, but in a 
different order in various separate instances.


Michael

At 01:46 PM 2/1/2024, Seymour J Metz wrote:
Content-Transfer-Encoding: base64You only get 
that deadly embrace with dynamic allocation.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
×¢Ö·× ×Ö´×©Ö°××¨Ö¸×Öµ× ×Ö·×
× ÖµÖ£×¦Ö·× ×Ö´×©Ö°××¨Ö¸×ÖµÖ× ×Ö¹Ö¥× ×Ö°×©Ö·××§ÖµÖ¼Ö×¨


From: IBM Mainframe Discussion List 
 
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: EXTERNAL EMAIL: JES2 JOBDEF 
DUPL_JOB=NODELAY - Any 
gotchasYÙÙ\Ý\ÜÝYHÛH^H\ÜXÝ]H\Èif all these 
jobs are on Initiators (rather than delayed in 
the input queue) how much are they count to 
block each other with dataset contention etc. 
Theres a possibility for some to even get into 
deadly embraces where 2 jobs lock each other out 
and can never finish because each is holding 
resources that the other needs. Nowadays with 
scheduling packages and other advancements this 
is not common but in the past it was frequent. 
We run with Delay so jobs of the same name 
(normally doing the same thing) Queue .


Jerry Whitteridge
Sr Manager Managed Services
jerry.whitteri...@albertsons.com
480 578 7889

-Original Message-
From: IBM Mainframe Discussion List 
 On Behalf Of Charles Mills

Sent: Thursday, February 1, 2024 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL EMAIL: JES2 JOBDEF DUPL_JOB=NODELAY - Any gotchas?

I am not a sysprog but I occasionally play one 
in my spare time. I am thinking of changing a 
system that I control to DUPL_JOB=NODELAY. Any 
gotchas? Anything I need to consider before I do 
this? Do most/many of you run with NO_DELAY?


I am trying to solve a problem where I have jobs 
delayed because the names are duplicates. I can't easily change the jobnames.


I can't think of any issues. We don't have any 
significant automation. I can't think of 
anything where jobs are referenced by name rather than Job ID.


What should I be considering?

Thanks,
Charles

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

 Warning: All e-mail sent to this address will 
be received by the corporate e-mail system, and 
is subject to archival and review by someone 
other than the recipient. This e-mail may 
contain proprietary information and is intended 
only for the use of the intended recipient(s). 
If the reader of this message is not the 
intended recipient(s), you are notified that 
you have received this message in error and 
that any review, dissemination, distribution or 
copying of this message is strictly prohibited. 
If you have received this message in error, 
please notify the sender immediately.



--
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: Connect:Direct question

2024-02-01 Thread Michael Oujesky

Food for thought.  You might investigate using the ADRDSSU exit 
available to C:D.


Not only does it allow specifying target dataset(s) SMS classes, it 
even allows copying whole volumes or dsname-masked groups of files 
between z/OS systems.


Michael

At 07:50 AM 1/31/2024, Gadi Ben-Avi wrote:

Hi,
I am trying to transfer a file using Connect:Direct from one z/OS 
system to another.

I need to specify both STORCLAS and DATACLAS.
This is what I am writing:
CPYSEQ PROCESS-
SNODE=RTST
 COPY1 COPY-
   FROM (DSN=G120NTN.KVTNKSP.UNLOAD-
 DISP=SHR  -
 PNODE -
) -
   TO   (DSN=G120NTN.KVTNKSP.UNLOAD-
 DISP=(NEW,CATLG)  -
 SPACE=(CYL,(999,),RLSE)   -
 SYSOPTS="STORCLAS=RKF1 DATACLAS=EXT" -
 SNODE -
)

And I keep getting errors.

How to I specify more than one parameter in SYSOPTS. I've tried 
writing a comma between the parameters with the same results.


Thanks

Gadi





--
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: Replacement for LMAC program in ISPF 3.1

2024-01-31 Thread Michael Oujesky

In LMAC CSECT, offset BD4 is '5.8' and BD7 is '7.9'.  Code segment at 
152 does the checking.


Michael

At 08:37 AM 1/30/2024, Lionel B. Dyck wrote:

After looking into it the code is in a load module that appears to 
have been written in PL/X. There are no visible constants for either 
5.8 or 7.9 that could be zapped.


CBTtape file 961 by Yves Colliard is an excellent replacement with 
many build in edit line commands. It isn't the same as LMAC as it 
isn't dynamic but it would be worth investigating.


Lionel B. Dyck <><
Github: https://github.com/lbdyck

"Worry more about your character than your reputation. Character is 
what you are, reputation merely what others think you are."   - - - John Wooden


-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Schmitt, Michael

Sent: Monday, January 29, 2024 1:19 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Replacement for LMAC program in ISPF 3.1

ISPF has 3 variables that an application can interrogate for the 
version: ZOS90RL, ZISPFOS, and ZENVIR. The fact that the edit says 
the ISPF version must be between 5.8 and 7.9 makes me suspect it is 
using ZENVIR.


What is in the ISPF ZENVIR variable on your z/OS 3.1 system? For 
example, on a z/OS 2.4 system it is 'ISPF 7.4MVS TSO'.



I'm wondering if the high release is a real requirement. You might 
try zapping the program to change or bypass the edit, so that it can 
run, and see what happens.


-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Billy Ashton

Sent: Monday, January 29, 2024 12:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Replacement for LMAC program in ISPF 3.1

Hello, we just turned on z/OS 3.1, and its component ISPF 3.1 here.

Now, I just saw when editing a member that my LMAC program (from 
Doug Nadel originally) no longer works, and gives me a message:
LMAC005 You must be running an ISPF version greater than 5.8 and 
less than  7.9 to run LMAC.


How should I deal with this? A quick look on the web indicated that 
I should use the utility function to define each line command to a macro.
I currently have 85 macros in my single Rexx driver, and cannot 
imagine splitting this and going through that.


Do I have any way to drive my single macro program like I had before 
with LMAC?


Thank you and best regards,
Billy Ashton

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




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


--
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: Masking SMF data internally

2024-01-21 Thread Michael Oujesky


REVIEW (CBT134) can at least browse SMF VBS files.

Michael

At 12:43 AM 1/21/2024, Jake Anderson wrote:


I am not even able to browse

It says 'Invalid record length'. I tried setting the block size and LRECL
but by default it takes as

Record length': 32767
Block size : 32760

On Sun, Jan 21, 2024, 10:26 AM ITschak Mugzach  wrote:

> Are these files machine or human readable? As you can edit them, I believe
> they are human readable and no Hex data inside. If so, write a rexx to
> translate everything a-z to blanks and write back.
>
> 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  **|*
>
>
>
>
>
> ××ª××¨×× ××× ××³, 21 ××× ××³ 2024 ×-7:59 ×××ª Jake Anderson <
> justmainfra...@gmail.com>:
>
> > Hello
> >
> > We have a requirement of sharing our SMF data to vendor for a sizing
> > operation of our hardware connected to our mainframe
> >
> >
> > Our organization has a policy of masking the critical values before
> sharing
> > it. I see SMF datasets are are editable from ISPF.
> >
> > Is there a way or someone has undergone this exercise of masking the
> > confidential values inside SMF output Dataset?
> >
> > Please advise
> >
> > Jake
> >
> > --
> > 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: allowed characters in member name

2024-01-07 Thread Michael Oujesky


And for multi-level aliases also?

Michael

At 07:15 PM 1/6/2024, Steve Thompson wrote:

Content-Transfer-Encoding: 7bit

Would that be because of a Catalog issue? As in an Alias can't contain "-"?

Steve Thompson

On 1/6/2024 6:18 PM, Ed Jaffe wrote:

On 1/6/2024 2:14 PM, Radoslaw Skorupka wrote:
For dataset names the addition is "-". This character can be used 
in dataset names with no tricks like name in apostrophes, 
uncataloged ones, etc.


We tried using this for our PHX-BDT product. It worked great in the 
second qualifier (e.g., SYS2.PHX-BDT.SJBDMAC), but not in the first.


Since we prefer to deliver product data sets with the product name 
as the first qualifier, we settled on using PHXBDT instead...


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

IEAMDBLG tweak

2024-01-04 Thread Michael Oujesky

Just an FYI. but IEAMDBLG can be modified to exten the output record 
length from 132 to 255 and thereby remove split SYSLOG lines.


Michael

At 11:16 AM 1/4/2024, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 7bit

The following scenario:
z/OS 2.5, two-member parallel sysplex.

Sometimes I observe IXG251I and IXG284I
ISG251I informs the dataset is in use by another sysplex member
IXG284I says the dataset is PENDING DELETE.

It usually happens during log offload (archivization) using IEAMDBLG 
tool, however it is not predictable behavior.


The dataset is deleted later, so it is finally auto-resolved, 
however I think the above should never happen in normal circumstances.


Any clue?

--
Radoslaw Skorupka
Lodz, Poland

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


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

Re: SMF Interval

2023-12-29 Thread Michael Oujesky

Perhaps using RMF III VSAM data stores with a 60 second sampling 
interval would be a better a better approach.


Michael

At 03:46 AM 12/29/2023, Colin Paice wrote:


With MQ some customers would set the interval to one minute for a period to
get granular statistics and accounting to help with problem determination.
The MQ accounting would report maximum response time for the interval.  If
you have a "spiky" problem,  being able to identify the minute it occurred
in, was very useful, and being able to correlate to other events.
Note:   This can produce a lot of data!

On Fri, 29 Dec 2023 at 05:23, Ed Jaffe  wrote:

> What SMF interval do most folks use?
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
>
> 


> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system
> into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> 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: Hex (was: Stupid JCL question)

2023-12-24 Thread Michael Oujesky

At 03:21 PM 12/24/2023, Paul Gilmartin wrote:

On Sun, 24 Dec 2023 14:18:34 -0600, Michael Oujesky wrote:

>Just as an aside, the default EBCDIC to ASCIIi translation table in
>FTP has issues with some special characters.  We used CONVXLAT
>against TCPIP.SEZATCPX(EUS) to create one that works for the texts we
>have,  Then in the FTP control statements, used LOCSITE SBDataconn=
>to specify use of the created translation table for the transfer.
>

Nope, kept it in it's own dataset.

Did you need to create your own table?  Did you need to add it to LNKLST?

Nope, just used EUS from the standard TCPIP library without any 
tweaks.  Just pointed to it's own sequential file, but would probably 
install it via a USERMOD if were going to make it the default text 
translation table.

Do you have unusual code pages?

Nope, just using the original system default.

More easily, I have used SBDATACONN(IBM-1047,ISO8859-1)
<https://www.ibm.com/docs/en/zos/3.1.0?topic=protocol-sbdataconn-ftp-client-server-statement>

More absurdly, in 
<https://www.ibm.com/docs/en/zos/2.1.0?topic=only-customizing-translation-table>
When accessing z/OS UNIX files, you must specify the OEMVS311 
translation table ...

"must"?  IOW, IBM's default doesn't work.

--
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: Hex (was: Stupid JCL question)

2023-12-24 Thread Michael Oujesky

Just as an aside, the default EBCDIC to ASCIIi translation table in 
FTP has issues with some special characters.  We used CONVXLAT 
against TCPIP.SEZATCPX(EUS) to create one that works for the texts we 
have,  Then in the FTP control statements, used LOCSITE SBDataconn= 
to specify use of the created translation table for the transfer.

Michael

At 03:42 PM 12/22/2023, Paul Gilmartin wrote:

On Fri, 22 Dec 2023 16:23:31 -0500, Bob Bridges wrote:

>Just to be pedantic, aren't ~all~ characters hex characters?
>
I think the only hex characters are 0-9 and A-F.

> ... That is, they can be expressed in hex.  I suppose (but I'm 
not sure) that "non-hex character" is intended to mean a character 
that can be expressed directly, eg a space can be expressed as 
'40'x or as ' '.  Whereas a tab character in EBCDIC needs to show 
up as '05'x; there's no way to insert it into my data with the  character.

>
It's easy if you use the right editor.

--
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: Hex (was: Stupid JCL question)

2023-12-22 Thread Michael Oujesky


Why am I reminded of the Karate Kid?

Hex-on, hex-off?



At 03:42 PM 12/22/2023, Paul Gilmartin wrote:


On Fri, 22 Dec 2023 16:23:31 -0500, Bob Bridges wrote:

>Just to be pedantic, aren't ~all~ characters hex characters?
>
I think the only hex characters are 0-9 and A-F.

> ... That is, they can be expressed in hex.  I suppose (but I'm 
not sure) that "non-hex character" is intended to mean a character 
that can be expressed directly, eg a space can be expressed as 
'40'x or as ' '.  Whereas a tab character in EBCDIC needs to show 
up as '05'x; there's no way to insert it into my data with the  character.

>
It's easy if you use the right editor.

--
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: Stupid JCL question

2023-12-22 Thread Michael Oujesky

 "/*EOF" works for me and is easy to spot, whereas "// " is 
sometimes easy to miss.


Michael

At 10:04 AM 12/22/2023, Bob Bridges wrote:

I should know this - I've been using JCL for decades - but I find 
I'm uncertain about something I haven't done in a while.  I have a 
production job here that will eventually be rewritten, but for now 
I'm just going to tell it to execute only the first couple steps.  I 
had in mind inserting "//" before the part of the JCL that I want to 
skip.  Very simple.


But wait - does the JCL interpreter discard the rest of the job when 
it sees that empty '//', or does it interpret the rest as the start 
of a new job?  (Since there's no subsequent JOB statement I'm not 
terribly worried about it, but it's sloppy; maybe I should just use 
a COND parm on the JOB card.)  This info is probably in the JCL ref, 
but I don't immediately see it.


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

/* "Poor Diogenes; if you knew how to get on with people you 
wouldn't have to live like that." / "Poor Aristippos; if you knew 
how to live like this you wouldn't have to get on with people."  -a 
condensation of their respective schools of thought a few centuries BC */


--
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: Assembler optimization OPTION

2023-12-08 Thread Michael Oujesky

No option. Coding changes to position the volatile (modifiable) data 
areas from  from static (both code and constants) so that the cache 
pipelines are not compromised during execution.


Michael

At 01:29 PM 12/8/2023, Ituriel do Neto wrote:

Content-Transfer-Encoding: 7bit

Hello everyone,

Recently i have seen some discussions related to assembler 
performance to use the L1 cache of the processor better and not 
mixing instructions and data.


Can you enlighten me which assembler option can be used for this purpose?

Thanks in advance


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer

--
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: 60 US credit unions offline after cloud ransomware infection The Register

2023-12-06 Thread Michael Oujesky

AKA promiscuous operating systems (wanting to mate with anything and 
everything, any time, any where, any place)/


At 01:11 PM 12/3/2023, Dave Beagle wrote:

Content-Transfer-Encoding: 7bit

All of these ransom attacks are against non mainframe systems that 
are modern, code for cheaper.



Sent from Yahoo Mail for iPhone


On Sunday, December 3, 2023, 12:28 PM, Nash, Jonathan S. 
<01abdcef2f3c-dmarc-requ...@listserv.ua.edu> wrote:


Is it possible that this processing used to be done on
an IBM mainframe and was "modernized" ?

https://www.theregister.com/2023/12/02/ransomware_infection_credit_unions/

--
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: Assembler programmer wanted

2023-12-06 Thread Michael Oujesky


At 02:11 PM 12/6/2023, Radoslaw Skorupka wrote:
Yes and no. Even your very significant thing you designed can be 
sold. It can be expensive, but it is subject of trade.
Last, but not least: You can sell anything you created, like 
(fictitious case) Edison who sold his light bulb. But maybe the 
contract was signed a priori - you work for Edison firm, developing 
the source of light.



More like Tesla selling his patents to Westinghouse,

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

Re: Is True Skip-Sequential Processing Possible with RECFM=FB,DSORG=PS?

2023-11-11 Thread Michael Oujesky

Does seek() actually do a direct access?  Or read, but skip the 
records from the start of the file?


Michael

At 04:21 PM 11/11/2023, Paul Gilmartin wrote:

On 11/11/23 06:59:07, David S. wrote:

UNIX readily solves the problem with seek() and DSFS is supposed
to mimic a UNIX file with the content of a Classic data set.

Where's the User's Guide for DSFS?

Is the skip count fixed, or is it dynamic, varying up or down
with successive executions of your program?

--
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: Is True Skip-Sequential Processing Possible with RECFM=FB,DSORG=PS?

2023-11-11 Thread Michael Oujesky

I forgt to ask what the BLKSIZE is and why yhe need to skip reading 
just the first 99 records?


Michaet

At 09:34 AM 11/11/2023, Michael Oujesky wrote:

Just a thought as I have not done it, but use BDAM to access the file?

Michael

At 07:59 AM 11/11/2023, David S. wrote:


To help resolve a question posted to a LinkedIn group I manage:
www.linkedin.com/feed/update/urn:li:groupPost:910927-7128598004344786944
... I'd like to find out if there's any way to achieve *true*
Skip-Sequential processing with a Fixed Block Sequential File with a fairly
short record length (i.e. DCB=(DSORG=PS,RECFM=FB,LRECL=80)?
For example: Begin sequential processing at record number 100, *without*
having to read the first 99 records.
Note: We already know certain VSAM formats can do this, but the file in
question is a DSORG=PS *Sequential* file, *not* VSAM. This is a rock-solid
requirement and cannot be changed. We also already know how certain
utilities such as SORT and REXX can *mimic* skip-sequential functionality
by *discarding* unwanted records until the specified record number is
reached. This is a likewise rock-solid requirement. Sequential processing
*must* begin at specified starting point and there can be *no* reading of
any records prior to that point.
My gut feeling is it *cannot* be done - at least not with RECFM=FB.  It
*might* be possible with RECFM=F, but efficiency would then be so
compromised it would  probably outweigh any advantage from *true*
skip-sequential processing.

--
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: Is True Skip-Sequential Processing Possible with RECFM=FB,DSORG=PS?

2023-11-11 Thread Michael Oujesky


Just a thought as I have not done it, but use BDAM to access the file?

Michael

At 07:59 AM 11/11/2023, David S. wrote:


To help resolve a question posted to a LinkedIn group I manage:
www.linkedin.com/feed/update/urn:li:groupPost:910927-7128598004344786944
... I'd like to find out if there's any way to achieve *true*
Skip-Sequential processing with a Fixed Block Sequential File with a fairly
short record length (i.e. DCB=(DSORG=PS,RECFM=FB,LRECL=80)?
For example: Begin sequential processing at record number 100, *without*
having to read the first 99 records.
Note: We already know certain VSAM formats can do this, but the file in
question is a DSORG=PS *Sequential* file, *not* VSAM. This is a rock-solid
requirement and cannot be changed. We also already know how certain
utilities such as SORT and REXX can *mimic* skip-sequential functionality
by *discarding* unwanted records until the specified record number is
reached. This is a likewise rock-solid requirement. Sequential processing
*must* begin at specified starting point and there can be *no* reading of
any records prior to that point.
My gut feeling is it *cannot* be done - at least not with RECFM=FB.  It
*might* be possible with RECFM=F, but efficiency would then be so
compromised it would  probably outweigh any advantage from *true*
skip-sequential processing.

--
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: SMF record for number of program executions?

2023-11-09 Thread Michael Oujesky

While others have already responded about how to determine how many 
times a program has been fetched into storage, determining how many 
"times" it was used (executed) requires a tool like STROBE that 
provides statistics on how many samples were taken while in the programs code.


Michael

At 01:00 PM 11/9/2023, L H wrote:


Hello,

I need to count the number of times some programs are executed on z/OS.

Not job names or CICS Tranids, but the times Cobol object code executed.

Does anyone know if a SMF record exists to record this, or does anyone have
an Assembler program to read the SMF and produce the counts?  Or a Merrill
example?

Any assistance or reference to manuals, cbttape, etc., is appreciated.

Thanks, Linda

--
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: Kinda fun

2023-11-08 Thread Michael Oujesky

And the discussions about whether each person needed a 3270 terminal 
at  their desk or whether a room of shared terminals were 
sufficient.  Abd the running of all the coax through the ceiings.

Michael

At 10:30 AM 11/8/2023, Paul Gilmartin wrote:

On Wed, 8 Nov 2023 12:07:14 +, Seymour J Metz wrote:

>I found that it took less time to punch my own programs than to 
have the keypunch operators do it; as you noted, errors.

>
At times the bottleneck is the number of available keypunches and 
the dedicated

keypunch operators have higher throughput.

--
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: Kinda fun

2023-11-08 Thread Michael Oujesky

And the trip to the TAB sorter to reconstruct the deck.

Michael

At 09:37 AM 11/8/2023, Cameron Conacher wrote:

Anyone else recall.
Have the HASP operator read your JOB Deck,
Walking over to the printer to collect your output
Waiting for the output, and setting your card deck on the printer
The printer running out of paper and the hood rises up
Your card deck is spilled all over the floor

Thanks

.Cameron

From: IBM Mainframe Discussion List 
 On Behalf Of Michael Oujesky

Sent: Wednesday, November 8, 2023 10:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Kinda fun

Sequence numbers could also be used for 
implementing a new release of vendor software 
that had been customized by in-house 
modifications. By comparing the old/new/in-house 
code you could identify which programs needed no conversion effort.â

Sequence numbers could also be used for implementing a new release of

vendor software that had been customized by in-house

modifications.  By comparing the old/new/in-house code you could

identify which programs needed no conversion effort. which programs

could be automatically adapted to the new release, which needed no

code changes, and those that required manual interpretation of the

releases changes versus in-house modifications.

separately. SYSLOG still has a 133 record length left over from the

360 days when the console was a 1050 typewriter using pin-fed

green-bar paper.  Though SAMPLIB(IEAMDBLG) can be modified to provide

SYSLOG from OPERLOG with a longer record length and do away with split lines.

Michael

At 08:38 AM 11/8/2023, Bob Bridges wrote:

>Ok, Shmuel, I'm curious.  Dropped decks are the only reason I ever heard,

>back when I was a $HASP operator.  What's the more important reason?

>

>(Mostly when customers brought huge decks of cards, two or three or four

>boxes sometimes, each card was a single row of a database, so the order

>didn't necessarily matter.  But with program code, sure.)

>

>---

>Bob Bridges, 
robhbrid...@gmail.com<mailto:robhbrid...@gmail.com>, cell 336 382-7313

>

>/* You know you've had too much coffee when

> Juan Valdez names his donkey after you.

> You've worn out the handle on your favorite coffee mug.

> Your eyes stay open when you sneeze. */

>

>-Original Message-

>From: IBM Mainframe Discussion List 
mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of

>Seymour J Metz

>Sent: Wednesday, November 8, 2023 07:26

>

>People were using sequence numbers for editing before SPF. Dropped decks is

>but one of several reasons, and, IMHO, not the most important.

>

>--

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

>send email to 
lists...@listserv.ua.edu<mailto: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<mailto:lists...@listserv.ua.edu> 
with the message: INFO IBM-MAIN

American Express made the following annotations

This e-mail was sent to you by a representative 
of Amex Bank of Canada, P.O. Box 3204, Station 
"F", Toronto, ON, M1W 3W7, 
www.americanexpress.ca. If you no longer wish to 
receive these e-mails, please notify the sender by reply e-mail.

This e-mail is solely for the intended recipient 
and may contain confidential or privileged 
information. If you are not the intended 
recipient, any disclosure, copying, use, or 
distribution of the information included in this 
e-mail is prohibited. If you have received this 
e-mail in error, please notify the sender by 
reply e-mail and immediately and permanently 
delete this e-mail and any attachments. Thank you.

American Express a fait les remarques suivantes
Ce courriel vous a été envoyé par un 
représentant de la Banque Amex du Canada, C.P. 
3204, succursale F, Toronto (Ontario) M1W 3W7, 
www.americanexpress.ca. Si, par la suite, vous 
ne souhaitez plus recevoir ces courriels, 
veuillez en aviser les expéditeurs par courriel.

Ce courriel est réservé au seul destinataire 
indiqué et peut renfermer des renseignements 
confidentiels et privilégiés. Si vous nêtes pas 
le destinataire prévu, toute divulgation, 
duplication, utilisation ou distribution du 
courriel est interdite. Si vous avez reçu ce 
courriel par erreur, veuillez en aviser lexpý
©diteur par courriel et détruire immédiatement 
le courriel et toute pièce jointe. Merci.

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

-

Re: Kinda fun

2023-11-08 Thread Michael Oujesky

Sequence numbers could also be used for implementing a new release of 
vendor software that had been customized by in-house 
modifications.  By comparing the old/new/in-house code you could 
identify which programs needed no conversion effort. which programs 
could be automatically adapted to the new release, which needed no 
code changes, and those that required manual interpretation of the 
releases changes versus in-house modifications.


separately. SYSLOG still has a 133 record length left over from the 
360 days when the console was a 1050 typewriter using pin-fed 
green-bar paper.  Though SAMPLIB(IEAMDBLG) can be modified to provide 
SYSLOG from OPERLOG with a longer record length and do away with split lines.


Michael

At 08:38 AM 11/8/2023, Bob Bridges wrote:

Ok, Shmuel, I'm curious.  Dropped decks are the only reason I ever heard,
back when I was a $HASP operator.  What's the more important reason?

(Mostly when customers brought huge decks of cards, two or three or four
boxes sometimes, each card was a single row of a database, so the order
didn't necessarily matter.  But with program code, sure.)

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

/* You know you've had too much coffee when
Juan Valdez names his donkey after you.
You've worn out the handle on your favorite coffee mug.
Your eyes stay open when you sneeze. */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Seymour J Metz
Sent: Wednesday, November 8, 2023 07:26

People were using sequence numbers for editing before SPF. Dropped decks is
but one of several reasons, and, IMHO, not the most important.

--
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: Kinda fun

2023-11-07 Thread Michael Oujesky


Boot being short for boot-strap.  AKA IPL text.

At 05:42 PM 11/7/2023, Bob Bridges wrote:

My old boss sent me a pack of 50 blank punch cards for Christmas a few years
ago, just as a sort of gag gift.  He says he uses them for shopping lists
and such.  I'd probably be more inclined to keep them as bookmarks, except I
already use old business cards for that.

But I thought it was an interesting idea and went to eBay to see what I
could get them for.  My buss must have a source of his own, because the last
I looked people are trying to sell old punch cards for $100 for a pack of
50, or even $10 for just one.  They're antiques, now!  Yeah, here we go:
$11 Canadian for one.  US$19.45 for 15.  $26.69 for 40.  Like that.

Here's a test question for youngsters:  Why do they "boot" a computer?
Where does that term come from?  I'm guessing most of them will assume it's
a sort of joke, that you have to kick a computer to get the ol' clunker
going, like "percussive maintenance" on a TV.  Oops, an old-style CRT TV, I
mean, of course, which I suppose is another thing that doesn't exist any
more.

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

/* An education isn't how much you have committed to memory, or even how
much you know.  It's being able to differentiate between what you know and
what you don't.  -Anatole France */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Schmitt, Michael
Sent: Tuesday, November 7, 2023 16:57

The card punch machines I used would punch each character as you typed it,
rather than buffer and punch card at the end of the line. So, you had to
type *perfectly*. A single mistake meant throw out the card. Or save it for
bookmarks and grocery lists.

I like to ask the new people I work with "Why does ISPF maintain sequence
numbers in source?" (or JCL, sysin members, etc.). Not one answers "so you
can put your punched card deck back in order when you drop it".

(They also don't know why old programs, and JCL, is all upper case.)

--
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: Programatically setting JCL symbols

2023-10-19 Thread Michael Oujesky

the classic solution is a control card dataset 
that is read by the subsequent jobs. That control 
card dataset could even be a proc executed by the subsequent jobs.

Michael

At 09:17 AM 10/19/2023, Charles Hardee wrote:

My apologies, I didn't mean to stir up the hornet's nest of opinions on the
viability of my question.

I will "grossly" explain what I want to do.
I am not interested in other methods, I have other methods, but I am
interested in this method the most, if it can be done.

Program A executes and sets a global symbol to a certain value and
terminates.
Many other jobs execute and, in each one, as needed, the programs check to
see if the global symbol is set and, if it is, to what value.
They then make logic path decisions within the program based on the value
of the global symbol.
Finally, Program B runs, or maybe it's just Program A again, and the global
symbol is deleted.

So, my question is, still, is it possible to define SET symbols from within
a program?

Thanks, again, in advance for any *constructive* assistance.
Chuck

On Thu, Oct 19, 2023 at 2:26â¯AM Lennie Dymoke-Bradshaw <
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Yes, I did mean that. My bad for sending a note late at night when I'm
> tired.
> Lennie
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Paul Gilmartin
> Sent: 18 October 2023 23:56
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Programatically setting JCL symbols
>
> On Wed, 18 Oct 2023 22:53:05 +0100, Lennie Dymoke-Bradshaw wrote:
>
> >On the other hand they can be passed to another job via the internal
> reader specified with the SYMBOLS parameter.
> >For example,
> >//INTRDR   DD  *,SYMLIST=*
> >It could make sense in this instance.
> >
> ITYM:
> // EXPORT SYMLIST=*
> ...
> //INTRDR   DD  SYSOUT=(,INTRDR),SYMBOLS=JCLONLY
>
> It's possible the OP wants to pass values between steps.  The guaranteed
> way to do that is with a temporary data set.
>
> There was s discussion here lately of environment variables.  Questions I
> never saw clearly answered:
>
> o Are environment variables available to any program, regardless of
> language?
>
> o Do they require LE or C RTL?
>
> o Do they endure from step to step?
>
> o Are they rooted with WXTRN environ and structured as in POSIX?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

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

Re: Programatically setting JCL symbols

2023-10-18 Thread Michael Oujesky


Why would you want/need to do this?

Michael

At 04:18 PM 10/18/2023, Charles Hardee wrote:


Hello All,

Thanks in advance for anyone that can shed light on the subject.

Is there a mechanism for setting a JCL type variable from within a program?

In other words, I would like to do this:

// SET XYZ='ABC and DEF'

from within a program.

Again, thanks for anyone that can shed light on this subject.
Chuck

--
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: JCL symbols used to define other JCL symbols [was: RE: Is SMP/E needed for installs?]

2023-10-08 Thread Michael Oujesky

Processing date from control card input is endemic to the financial 
industry, not just banks.

I believe it stems from the fact that "daily" processing occurs after midnight,

Michael

At 11:08 AM 10/8/2023, Paul Gilmartin wrote:

On Sat, 7 Oct 2023 22:30:52 +0200, Radoslaw Skorupka wrote:

>To be honest I consider date-related variables as pooor when
>compared to batch scheduler features, especially ControlM (it is not
>advertisement, just opinion).
>
You worked for a bank.

I had a co-worker who had worked for a bank.  He told me that
certain reports were legally required on certain dates.  Failure
to meet a production window would not avoid a penalty.

To avoid the risk, he read the report date from a control record rather
than using the system date facility.  The readers never knew.

--
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: JCL symbols used to define other JCL symbols [was: RE: Is SMP/E needed for installs?]

2023-10-07 Thread Michael Oujesky

Dynamic symbols (date/time) can be evaluated at different points in 
time during conversion, so if used multiple time in the JCL, they can 
resolve to different values.   My ROT was to never use a dynamic 
symbol more that once in coding and where it was needed multiple 
time, set it to my own date/time variable and then use that in the 
multiple instances it was needed.

Michael

At 12:45 PM 10/7/2023, Paul Gilmartin wrote:

On Sat, 7 Oct 2023 09:41:56 -0700, Ed Jaffe wrote:

>On 9/20/2023 8:23 AM, Farley, Peter wrote:
>> ... JCL symbols as part of the definition of other JCL symbols 
works flawlessly every time.

>
Is this true alike for substitution both in the name (left of the "=")
and in the value (right of the "=")?

In 

Substitute all symbols.
...
Symbols on JCL records are treated as if they resolved simultaneously.

Peter Relson (IIRC) answered my question hers that near midnight 
and  might be resolved at a time when their values are inconsistent.
This requires some explanation of "simultaneously".  There ought to be
a lock to prevent this.  (REXX does it right.)

And some explanation of the effect of resolving a symbol changing the
content of column 72 from blank to non-blank or vice-versa.

>Agreed 100%. We use that feature all the time for in-house JCL and also
>for distributed product JCL.
>
>This seems like a golden opportunity to test the IBM Documentation
>Feedback process.
>
>Give it a try and let us know if you actually get a response...
>
Yes.

--
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: Will AI free Bill Johnson? (was AI will surpass human intelligence!)

2023-09-20 Thread Michael Oujesky


I presume you have a copy of Faster Than Thought.

Michael

At 01:09 PM 9/17/2023, Bernd Oppolzer wrote:

Content-Transfer-Encoding: 8bit

I'd really be interested, because I am collecting historic computer 
related books,


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

Re: AI will surpass human intelligence!

2023-09-15 Thread Michael Oujesky


It appears it is well past time to remove Bill from IBM-MAIN.



At 02:26 PM 9/14/2023, Bill Johnson wrote:


It's already passed yours.


Sent from Yahoo Mail for iPhone


On Thursday, September 14, 2023, 3:22 PM, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:


Yours included?

On 2023-09-14 13:29, Bill Johnson wrote:
> AI will surpass human intelligence.
>
> 
https://www.cnbc.com/2023/09/14/softbanks-masayoshi-son-says-tech-can-surpass-human-intelligence.html

>
>
>
> --
> 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: SORTWK space usage

2023-07-03 Thread Michael Oujesky

Just a warning, but the SORTWK specification decision depends on how 
SORT is provided the input data.  If via SORTIN, then allowing SORT 
to make the determination should be fine.  But when the incoming 
records are provided SORT one records at a time (piping, E15 exit, 
etc,) then nudging SORT's SORTWK decision by providing some SORTWK 
areas would probably be a better approach.


At 01:13 PM 7/3/2023, Billy Ashton wrote:


Thanks everyone - these are good recommendations.

However, the guy who came to me first has a job that sorts 450 
million records of 110 bytes, and I can't see how I could run SORT 
without specifying SORTWK DD statements. Are there special 
configuration options I can verify that we have in place to help my 
comfort level that I could eliminate SORTWK DD?


If the programming team are not convinced, does this look right, 
based on the discussion - and based on a 100% Disk sort, which is not likely?

450mill * 110 * 1.5 = 7425000 = 69GB
so maybe SORTWK01 - SORTWK10
//SORTWK01  DD  UNIT=WORK,DSNTYPE=LARGE,SPACE=(CYL,(4000,1000))
to
//SORTWK10  DD  UNIT=WORK,DSNTYPE=LARGE,SPACE=(CYL,(4000,1000))

and this will give me 4000 + (15*1000) on each, or 4c primary + 
(up to 150 * 1000) secondary


While we have been talking here, I have looked, and found some jobs with
//SORTWK01 DD UNIT=(WORK,5)...
and this will not work, is that right, Sri Kolusu? I would only get 
the first volume anyway?


Thank you and best regards,
Billy Ashton


-- Original Message --
From "Farley, Peter" <031df298a9da-dmarc-requ...@listserv.ua.edu>
To IBM-MAIN@listserv.ua.edu
Date 7/3/2023 12:44:43 PM
Subject Re: SORTWK space usage

I will add on to Sri's excellent answer with my very STRONG 
recommendation NOT to use hard-coded SORTWK's in your JCL.  Both of 
the major SORT vendors (IBM and Syncsort) do a far, far better job 
of estimating necessary SORTWK space and memory utilization than 
any human could hope to do.


I also STRONGLY recommend that you give your JCL and 
program-controlled SORT steps as much memory in the REGION 
parameter as your installation allows for production and test 
jobs.  Both of the major SORT programs will figure out how much of 
that memory to use, whether and how much of it to use in the 
current WLM environment, and will make VERY effective use of as 
much of it as they can to cut down on SORT execution and elapsed 
time.  Memory is (relatively) cheap, don't be afraid to use all 
you've got available to shorten your SORT times.


My basic advice is don't try to second-guess these very intelligent 
programs - they each have more than half a century of practice and 
experience that none of us can match, even those of us who have 
been around that long.


Peter

-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Sri h Kolusu

Sent: Monday, July 3, 2023 12:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SORTWK space usage

I will only get the primary space of 5000 cylinders, and the 
other 14x2000 cylinders is never used. Is that right?


Billy,

No. Incorrect. DFSORT will make use of BOTH primary and secondary 
space allocations ( 1 primary + 15 Secondary) for a total of 16 
extents.  So if you allocated 1 sortwk dataset with 
(CYL,(5000,2000)), then DFSORT would use 5000 + 15* 2000 = 5000 + 
3 = 35,000 cylinders.  Also note that the secondary extents 
will only come into picture ONLY when needed.


Is there a written explanation I can forward to the programmers 
so they understand this?
Also (since I know it will come), is there any good way to 
calculate how much DASD sortwork would be used? I know this 
depends on what is in memory at the time, but want to get a 
better handle on how Sort determines what it needs.


I would suggest that you use DFSORT's Dynamic Allocation as it will 
allocate the required workspace optimally rather than programmers 
calculating it.  The reason is you don't want to change the 
allocation every time there is an increase/decrease in the number 
of records to be sorted.


Having said that, here is a general formula that you want to use.

The amount of sortwk space required depends on the size of the 
file. It usually ranges from 1.3X to 1.8X of the size of the file 
to be sorted depending on the sorting path that DFSORT chose.


Filesize = Number of records * Avg length of the record ( for Fixed 
length RECFM=F or FB , it is the LRECL value, or RECFM=V or 
RECFM=VB is the average length of the record)


However, that range is applicable ONLY when the entire file is 
being sorted using Disk workspace. DFSORT has the capability of 
using memory (real and auxiliary storage) and if it runs out of it, 
it will then use disk workspace.



Thanks,
Kolusu
--

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

Re: VSAM skip sequential processing

2023-05-23 Thread Michael Oujesky


Sometimes mis-used instead of random.

Point, then read (as I recall) flushes VSAM's data buffers, then 
reads in whatever number of control intervals have been specified by 
BUFND.  If the application only needs a record or two and BUFND is 
set to read in a substantial potion of the control area, the excess 
I/O deteriorates performance.


Usefull in reading in reading through large files where only portions 
of the data is needed, but too often abused when random with LSR 
would be the better choice.


Michael

At 05:03 AM 5/23/2023, Binyamin Dissen wrote:

Perhaps a beginners question, but I am not finding precise doc on the
difference between sequential and skip-sequential VSAM processing.

Is it that instead of doing an ENDREQ and a new positioning, one changes the
value of ARG and VSAM uses that for the next GET?

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

Director, Dissen Software, Bar & Grill - Israel

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


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

Re: VBS file read in windows - end of record issue

2023-05-18 Thread Michael Oujesky

Long time ago IFASMFDP had a default BLKSIZE of 
4096, but today uses SDB to match to device 
characteristics.  However, LRECL is set to 32767 
and SMF did write records that long.  At last 
check, still did use DCBE, so  features like LBI 
could not be used for it's output files.

Note that if you SMS compress the output file, 
BLKIZE becomes logical as the data is physically 
written full track (roughly 56K bytes).

Michael

At 10:09 AM 5/18/2023, Lennie Dymoke-Bradshaw wrote:

Radoslaw,

If you specify the LRECL and/or BLKSIZE in your 
program, then you can set a  value that appears 
to flout the JCL rules. For example it used to 
be that IFASMFDP wrote data sets with a BLKSIZE 
of 32767. I am unsure if it still does.

Lennie Dymoke-Bradshaw
https://rsclweb.com
Dance like no one is watching. Encrypt like everyone is.â

-Original Message-
From: IBM Mainframe Discussion List 
 On Behalf Of Radoslaw Skorupka

Sent: 18 May 2023 10:36
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VBS file read in windows - end of record issue

Well, can you show me a JCL job to allocate such dataset?
My experience say that any attempt to create PS 
dataset with LRECL > ~32kB ends with JCL error 
and IEF638I JCL Reference clearly say that for 
non-VSAM dataset the maximum is 32760. For VSAM it is 32761.
"Additional Syntax" says it is possible to use 
LRECL=nK when n is up to 16,383. However 
it is possible only for ISO/ANSI V3 tapes.
And there is LRECL=X, which is applicable only 
to QSAM VS/VBS. It is not cheating in the 
meaning I provided earlier, but it is not quite simple dataset usage.

Note: despite of the above it is possible to 
allocate PS VBS file with LRECL=32767, but the 
LRECL cannot be specified in JCL. LIKE is the trick.

Regarding a little bit off-topic compressed extended format datasets:
system reports "legal" BLKSIZE 32760 (SDB was used). What's inside - it
is covered by media manager IMHO.

(irrelevant)
My local "cheating" definition used before: user creates
records/segments, *including* SDW. IMHO tools like File Manager allow
such cheating. However it is just track editing play, not dataset usage.

Regards
--
Radoslaw Skorupka
Lodz, Poland

W dniu 17.05.2023 o 21:14, Michael Oujesky pisze:
> Having read and written records longer than three MB, it is not
> "cheating". Especially with RMF 74.5 records with 59 "broken" (split)
> records to reassemble into one very long record. See the SMF manual on
> RMF record reassembly area.
>
> JCL allows LRECL=16384K.  And SMS compressed files write full tracks
> (roughly 56KB).
>
> Michael
>
> At 01:20 PM 5/17/2023, Radoslaw Skorupka wrote:
>> Content-Transfer-Encoding: 8bit
>>
>> Well, not really.
>> There is LRECL=X, but besides we have not very strict limitation of
>> LRECL. It is 32760 or 32767.
>> First value is limited by JCL syntax, but the second is available
>> when allocation PS using LIKE= keyword.
>> Of course one may automagically write segments with custom-created
>> SDWs, but I would call it cheating.
>>
>> BTW: The purpose of VBS was not veeery long record, but records
>> up to 32k, even on DASD with shorter track. Hint: the track is
>> natural limit of BLKSIZE. It is no longer important since 3380
>> (80's), because track size exceeded 32k.
>>
>>
>> --
>> Radoslaw Skorupka
>> Lodz, Poland
>>
>>
>>
>>
>> W dniu 16.05.2023 o 18:52, Michael Oujesky pisze:
>>> Just another tidbit, but when combining the record segments, while
>>> the VBS architecture does not specify a maximum record length, you
>>> can expect the full records to be up to 16,777,215 (16384K - 1)
>>> bytes in length.
>>>
>>> Realizing that the RDW is actually a SDW.
>>>
>>> Michael
>>>
>>> At 01:26 AM 5/16/2023, Michael Stein wrote:
>>>> On Tue, May 16, 2023 at 04:14:07AM +, Prashant Joshi wrote:
>>>> >> Did you specify binary mode on the python open call? --
>>>>
>>>> > Yes. And I can read the data.
>>>>
>>>> How are you reading the data.  Assuming an open like:
>>>>
>>>> myfile = open("filename", "rb")
>>>>
>>>> You need to either read it all into memory:
>>>>
>>>> alldata = myfile.read()
>>>>
>>>> or read specific lengths which is messier as you need to read specific
>>>> lengths, first 4 bytes for the RDW and then the length of the record
>>>> in the RDW-4 (as you already read the RDW).
>>>>
>>>> The 4 byte RDW includes the length of the record in the first 2 bytes
>>&g

Re: VBS file read in windows - end of record issue

2023-05-18 Thread Michael Oujesky

See the references on XLRI.

This should be a good start -
<https://www.ibm.com/docs/en/zos/2.1.0?topic=records-processing-longer-than-32760-bytes>Processing
Records Longer than 32 760 Bytes - IBM Documentation

This also might help -
<https://www.ibm.com/docs/en/zos/2.1.0?topic=definition-additional-syntax-lreclbytes>Additional
syntax for LRECL=(bytes) - IBM Documentation

You will perhaps need to review transmittal modes in -
<https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sc236855/$file/idad400_v2r4.pdf>z/OS:
z/OS DFSMS Using Data Sets (ibm.com)

LRECL=16384K in JCL ends up providing a lrecl of 16384k-1, but guess
the folks coding JCL interpretation thought 16384K was enough of a keyword.

LRECL=X gives you a lrecl of 32768 which appears to signal that SDW
are present and that BFTEK=A (which doesn't support logical records
longer than 32767) will not work to reassemble the logical
record. For such file, reassembly (de-segmentation) of the logical
record is left to the application program.

Note that when working with records longer than 32767 the length of
the record is now three bytes long (i.e. 16384K - 1). Also see DCB
field DCBXLREC.

Michael

At 04:35 AM 5/18/2023, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 8bit

Well, can you show me a JCL job to allocate such dataset?
My experience say that any attempt to create PS dataset with LRECL >
~32kB ends with JCL error and IEF638I
JCL Reference clearly say that for non-VSAM dataset the maximum is
32760. For VSAM it is 32761.
"Additional Syntax" says it is possible to use LRECL=nK when
n is up to 16,383. However it is possible only for ISO/ANSI V3 tapes.
And there is LRECL=X, which is applicable only to QSAM VS/VBS. It is
not cheating in the meaning I provided earlier, but it is not quite
simple dataset usage.

Note: despite of the above it is possible to allocate PS VBS file
with LRECL=32767, but the LRECL cannot be specified in JCL. LIKE is the trick.

Regarding a little bit off-topic compressed extended format
datasets: system reports "legal" BLKSIZE 32760 (SDB was used).
What's inside - it is covered by media manager IMHO.

(irrelevant)
My local "cheating" definition used before: user creates
records/segments, *including* SDW. IMHO tools like File Manager
allow such cheating. However it is just track editing play, not dataset usage.

Regards
--
Radoslaw Skorupka
Lodz, Poland

W dniu 17.05.2023 o 21:14, Michael Oujesky pisze:
Having read and written records longer than three MB, it is not
"cheating". Especially with RMF 74.5 records with 59 "broken"
(split) records to reassemble into one very long record. See the
SMF manual on RMF record reassembly area.

JCL allows LRECL=16384K. And SMS compressed files write full
tracks (roughly 56KB).

Michael

At 01:20 PM 5/17/2023, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 8bit

Well, not really.
There is LRECL=X, but besides we have not very strict limitation
of LRECL. It is 32760 or 32767.
First value is limited by JCL syntax, but the second is available
when allocation PS using LIKE= keyword.
Of course one may automagically write segments with custom-created
SDWs, but I would call it cheating.

BTW: The purpose of VBS was not veeery long record, but
records up to 32k, even on DASD with shorter track. Hint: the
track is natural limit of BLKSIZE. It is no longer important since
3380 (80's), because track size exceeded 32k.

--
Radoslaw Skorupka
Lodz, Poland

W dniu 16.05.2023 o 18:52, Michael Oujesky pisze:
Just another tidbit, but when combining the record segments,
while the VBS architecture does not specify a maximum record
length, you can expect the full records to be up to 16,777,215
(16384K - 1) bytes in length.

Realizing that the RDW is actually a SDW.

Michael

At 01:26 AM 5/16/2023, Michael Stein wrote:

On Tue, May 16, 2023 at 04:14:07AM +, Prashant Joshi wrote:
>> Did you specify binary mode on the python open call? --

> Yes. And I can read the data.

How are you reading the data. Assuming an open like:

myfile = open("filename", "rb")

You need to either read it all into memory:

alldata = myfile.read()

or read specific lengths which is messier as you need to read specific
lengths, first 4 bytes for the RDW and then the length of the record
in the RDW-4 (as you already read the RDW).

The 4 byte RDW includes the length of the record in the first 2 bytes
(bigendian order) and the spanning bits in the last 2 bytes.

Either way you need to walk your way through the binary data, any code
looking for CR or NL or space isn't correct.

A description of VBS records formats:

z/OS 2.4 DFSMS Using Data Sets SC23-6855-40
https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sc236855/$file/idad400_v2r4.pdf

pdf page 273 Variable-Length Record Formats
(

Re: VBS file read in windows - end of record issue

2023-05-17 Thread Michael Oujesky

Having read and written records longer than three MB, it is not
"cheating". Especially with RMF 74.5 records with 59 "broken" (split)
records to reassemble into one very long record. See the SMF manual
on RMF record reassembly area.

JCL allows LRECL=16384K. And SMS compressed files write full tracks
(roughly 56KB).

Michael

At 01:20 PM 5/17/2023, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 8bit

Well, not really.
There is LRECL=X, but besides we have not very strict limitation of
LRECL. It is 32760 or 32767.
First value is limited by JCL syntax, but the second is available
when allocation PS using LIKE= keyword.
Of course one may automagically write segments with custom-created
SDWs, but I would call it cheating.

BTW: The purpose of VBS was not veeery long record, but records
up to 32k, even on DASD with shorter track. Hint: the track is
natural limit of BLKSIZE. It is no longer important since 3380
(80's), because track size exceeded 32k.

--
Radoslaw Skorupka
Lodz, Poland

W dniu 16.05.2023 o 18:52, Michael Oujesky pisze:
Just another tidbit, but when combining the record segments, while
the VBS architecture does not specify a maximum record length, you
can expect the full records to be up to 16,777,215 (16384K - 1)
bytes in length.

Realizing that the RDW is actually a SDW.

Michael

At 01:26 AM 5/16/2023, Michael Stein wrote:

On Tue, May 16, 2023 at 04:14:07AM +, Prashant Joshi wrote:
>> Did you specify binary mode on the python open call? --

> Yes. And I can read the data.

How are you reading the data. Assuming an open like:

myfile = open("filename", "rb")

You need to either read it all into memory:

alldata = myfile.read()

or read specific lengths which is messier as you need to read specific
lengths, first 4 bytes for the RDW and then the length of the record
in the RDW-4 (as you already read the RDW).

The 4 byte RDW includes the length of the record in the first 2 bytes
(bigendian order) and the spanning bits in the last 2 bytes.

Either way you need to walk your way through the binary data, any code
looking for CR or NL or space isn't correct.

A description of VBS records formats:

z/OS 2.4 DFSMS Using Data Sets SC23-6855-40
https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sc236855/$file/idad400_v2r4.pdf

pdf page 273 Variable-Length Record Formats
(near bottom of page and continues on to more pages)

> its just that I don't get proper end of reord. Hence every time I
> read record, I get random record length (multiple records/half records
> combined)

There aren't any "end of records" in a VBS file. At the begining of
the file you know you are at the start of a RDW (Well, BDW/RDW but I'm
assuming the FTP removed the BDWs).

You can find the next record by going the length specified in the RDW
into the file -- that is the start of the next RDW. Continue until
you've processed all the records.

More help will likely require you to show some code and/or data so
we can see what is going on...

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

Re: VBS file read in windows - end of record issue

2023-05-16 Thread Michael Oujesky

Just another tidbit, but when combining the record segments, while
the VBS architecture does not specify a maximum record length, you
can expect the full records to be up to 16,777,215 (16384K - 1) bytes
in length.

Realizing that the RDW is actually a SDW.

Michael

At 01:26 AM 5/16/2023, Michael Stein wrote:

On Tue, May 16, 2023 at 04:14:07AM +, Prashant Joshi wrote:
>> Did you specify binary mode on the python open call? --

> Yes. And I can read the data.

How are you reading the data. Assuming an open like:

myfile = open("filename", "rb")

You need to either read it all into memory:

alldata = myfile.read()

or read specific lengths which is messier as you need to read specific
lengths, first 4 bytes for the RDW and then the length of the record
in the RDW-4 (as you already read the RDW).

The 4 byte RDW includes the length of the record in the first 2 bytes
(bigendian order) and the spanning bits in the last 2 bytes.

Either way you need to walk your way through the binary data, any code
looking for CR or NL or space isn't correct.

A description of VBS records formats:

z/OS 2.4 DFSMS Using Data Sets SC23-6855-40
https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sc236855/$file/idad400_v2r4.pdf

pdf page 273 Variable-Length Record Formats
(near bottom of page and continues on to more pages)

> its just that I don't get proper end of reord. Hence every time I
> read record, I get random record length (multiple records/half records
> combined)

There aren't any "end of records" in a VBS file. At the begining of
the file you know you are at the start of a RDW (Well, BDW/RDW but I'm
assuming the FTP removed the BDWs).

You can find the next record by going the length specified in the RDW
into the file -- that is the start of the next RDW. Continue until
you've processed all the records.

More help will likely require you to show some code and/or data so
we can see what is going on...

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

Re: VBS file read in windows - end of record issue

2023-05-15 Thread Michael Oujesky


Depend on what you need to do and there at least two levels to be addressed:
   * How variable length records appear on Windows
   * How to deal with SDW (spanned long record segments
If you want  both BDW and RDW/SDW present on Windows at least two approaches:
   * TERSE the file, binary transfer to windows, WWUNTERSE from 
Watson & Walker) on windows (-V option removes BDW)
   * FTP binary transfer from z/OS to Windows using //DD: and JCL to 
force RDCFM=U
Regular FTP binary transfer with "SITE RDW" will give you the file 
with just RDW/SDW (BDW is stripped off).  Without the "SITE RDW", you 
just get the data with no indication of where the record ends).


Then there is the issue of how to re-combine the segments into the 
full record length.


Does that help any?

Michael


At 01:54 PM 5/15/2023, Prashant Joshi wrote:
I am trying to read VB & VBS binary file in windows using python. I 
tried FTPing file directly, then using Terse and then XMIT but every 
time when I read the file in windows, I get random new line (CR/LF) 
inserted in record. I am not able to read complete record.


For some files, when I transfer using IND$FILE (option 6) using 
Binary and CRLF option checked, I gets record properly. But it does 
not work for every file. And due to different file sizes, IND$FILE 
may not be option for me.




Need your help to find, what am I missing?


Thanks,
Prashant

--
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: Unlike data sets concatenation - revised

2023-04-29 Thread Michael Oujesky

Interesting.  When transferring to ASCII platforms, the BDW and RDW 
are stripped off, though RDW can be retained with a SITE command.

So RECFM=V could be included as a like attribute file for concatenation.

Michael

At 07:36 PM 4/28/2023, Paul Gilmartin wrote:

On Fri, 28 Apr 2023 18:55:47 -0500, Michael Oujesky wrote:

>Note that RECFM=V is missing the "B" (i.e. block descriptor
>word).  RECFM=V is almost the equivalent of RECFM=U, exceptt that the
>data block is prefixed by a half-word length (limited to 32767) and "BB".
>
This says otherwise:
<https://www.ibm.com/docs/en/zos/2.5.0?topic=formats-format-v-records>

Format-V records
Last Updated: 2023-03-29

Figure 1 shows blocked and unblocked variable-length (format-V) 
records without spanning. A block in a data set containing unblocked 
records is in the same format as a block in a data set containing 
blocked records. The only difference is that with blocked records 
each block can contain multiple records.

See particularly the part of the figure labelled "Unblocked records".

--
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: Unlike data sets concatenation - revised

2023-04-28 Thread Michael Oujesky

Note that RECFM=V is missing the "B" (i.e. block descriptor 
word).  RECFM=V is almost the equivalent of RECFM=U, exceptt that the 
data block is prefixed by a half-word length (limited to 32767) and "BB".

BTW, a VBS record can be as long as 16,777,215 bytes,

Michael

At 12:40 PM 4/28/2023, Paul Gilmartin wrote:

On Fri, 28 Apr 2023 12:20:29 -0500, Michael Oujesky wrote:

>Would not think "V" could be included.  "...
>
Why not?  If I create a VBS data set; write a single logical record 
which happens
not to be segmented, then close it, the content is identical to that 
of a RECM=V

data set.  RECFM=VBS must be prepared to deal with that on input.

Why presume the program is assembler?  An override in JCL DD should suffice.

>At 07:12 PM 4/27/2023, Paul Gilmartin wrote:
>
>> >Presuming the program is assembler, I would suggest trying
>> >hard-coding for RECFM=VBS, LRECL=32767, BLKSIZE=32760, BFTEK=A.
>> >
>> >And presuming all the files are RECFM=VBS.
>> >
>>In fact, can't any mixture of RECFM=V, VB, and VBS be overriden to
>>those specifications?

--
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: Unlike data sets concatenation - revised

2023-04-28 Thread Michael Oujesky

Would not think "V" could be included.  "VBS" is just a variation of 
"VB" where the RDW is treated as a SDW where X'' in the "BB" 
field indicates a non-segmented (i.e full variable length record" in 
the buffer).

Another approach would be to not open the file as concatenated, but 
treat the TIOT entries for the DDNAME as a list of data sets to be 
dynamically allocated separately and then each processed on it's 
own.  using that approach, you can "concatenated" VSAM files.

Michael

At 07:12 PM 4/27/2023, Paul Gilmartin wrote:

On Thu, 27 Apr 2023 13:54:18 -0500, Michael Oujesky wrote:

>Presuming the program is assembler, I would suggest trying
>hard-coding for RECFM=VBS, LRECL=32767, BLKSIZE=32760, BFTEK=A.
>
>And presuming all the files are RECFM=VBS.
>
In fact, can't any mixture of RECFM=V, VB, and VBS be overriden to 
those specifications?

>If you do your own segmented record, LRECL=X ought to work.

--
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: Unlike data sets concatenation - revised

2023-04-27 Thread Michael Oujesky

Presuming the program is assembler, I would suggest trying 
hard-coding for RECFM=VBS, LRECL=32767, BLKSIZE=32760, BFTEK=A.


And presuming all the files are RECFM=VBS.

If you do your own segmented record, LRECL=X ought to work.

Michael

At 08:00 AM 4/26/2023, Pierre Fichaud wrote:


Seymour's response made me realize that my post was incomplete.

I'm trying to read a concatenation of unlike data sets using QSAM.
The first dataset is VBS with LRECL=200,BLKSIZE=1000
The second dataset is VBS with LRECL=230,BLKSZIE= 1150.

I've coded a DCB OPEN exit that sets a re-read flag.
I had a SYNAD exit but removed it.
Prior to OPEN, I set the DCBOFPPC bit to 1.
After the OPEN, I set up the DCB OPEN exit.

I read the 1st data set and all is well.
When I attempt to read the 2nd data set, my DCB OPEN exit is driven.
It sets the re-read bit and then returns using R14.
I get control after the GET and test the re-read bit.
It is set so I do NOT process the record but go back to the GET.
I blow up with an S001-4. See below.
I was under the impression the technique described above prevents an 
S001 abend.
You could read through an entire concatenation without abending and 
with one OPEN.


Thanks in advance, Pierre.

   ..
08.40.17 JOB12309  +get1
08.40.17 JOB12309  +get1
08.40.17 JOB12309  +get1
08.40.17 JOB12309  +get1
08.40.17 JOB12309  +open exit
08.40.17 JOB12309  +reread1
08.40.17 JOB12309  IEC020I 001-4,TH127153,,FILEA-0002,0A97,MVSXXX,
08.40.17 JOB12309  IEC020I PIERRE.IN123456.VB230
08.40.17 JOB12309  IEC020I DCB EROPT=ABE OR AN INVALID CODE, AND/OR 
NO SYNAD EXIT SPECIFIED

08.40.20 JOB12309  IEA995I SYMPTOM DUMP OUTPUT  053
   053 SYSTEM COMPLETION CODE=001  REASON CODE=0004
   053  TIME=08.40.17  SEQ=05644  CPU=  ASID=001A
--
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: Tape compression and modern encryption facilities.

2023-04-15 Thread Michael Oujesky

SMS compression is limited to sequential DASD datasets, but some 
utilities (ADRDSSU) uses it internally for tape files.  For those 
that do, turning off IRDC save cycles in the tape controller.




At 09:12 PM 4/15/2023, kekronbekron wrote:

And an add-on question if I may - zEDC or z15+ on-chip 
compression... does this apply only to data heading to disk, or does 
it apply for data heading to tape too.
If it applies for data heading to tape also, does that mean there 
are 2 levels of compression now - CP's on-chip compression + zstd on 
the TS7700?


- KB

--- Original Message ---
On Sunday, April 16th, 2023 at 7:17 AM, John Young 
 wrote:



> Although my post today is probably rhetorical question, I wanted 
to find out whether this matters anymore or not.

>
> Back in the late 2000's, IBM developed encryption facilities 
within the tape drives, as this is also where compression was being 
performed. The idea was that compression of data must occur before 
encryption, as encrypted data does not compress well, and obviates 
the use of compression.

>
> Nowadays, we've got pervasive encryption on z/OS. As a result, 
any data that is backed up (for instance, ADRDSSU/FDR), is already encrypted.

>
> Also, we now have zEDC, to compress data prior to storage, 
typically on disk.

>
> To my question: With all the encryption and compression being 
performed on disk, to what degree does TAPE COMPRESSION matter anymore?

>
> --
> 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: Comparing WLM Service Definitions

2023-02-22 Thread Michael Oujesky

In a past life, I used the MXg REXXWLM to convert the old and new 
policy definitions to SAS data bases and compared the two,


Another is to just print the old and new and Super-C the two.

Michael


At 05:50 AM 2/22/2023, Gadi Ben-Avi wrote:

Hi,
Is there a way to compare two WLM Service Definitions?

Thanks

Gadi

--
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: Transmitting SMF records

2023-01-27 Thread Michael Oujesky

And just an FYI, but the logical record lengths SAS reads can be up 
to 16,777,215.


Michael

At 05:40 PM 1/25/2023, Kirk Wolf wrote:
ISTR that distributed SAS has an option to read binary byte stream 
files with BDW+RDWs, which is what you would get if the program were 
to produce a merged RECFM=U DCB.


Kirk Wolf
Dovetailed Technologies, LLC
http://coztoolkit.com
Dovetailed Technologies: +1 636.300.0901

Note: Our website and domain name have changed from dovetail.com to 
coztoolkit.com


On Wed, Jan 25, 2023, at 4:23 PM, Andrew Rowley wrote:
> On 26/01/2023 7:24 am, Andrew N Wilt wrote:
>
> > The GDKUTIL utility does allow an Upload of something with 
RECFM=U. This was done at the behest of a customer that was using 
ftp to put SMF data out for processing by the SAS tool. Apparently, 
they are able to decipher the RDW records resulting from uploading 
a RECFM=VBS as a RECFM=U.

>
> I would be slightly surprised if SAS can't read VB records properly
> formatted with the RDW. RECFM U was a workaround for the problem where
> FTP stripped out the RDW. So GDKUTIL seems to be reproducing the
> brokenness of FTP, then providing the same workaround as a feature.
>
> It would be preferable if it retained the RDW in VB records by default.
> GDKUTIL seems new enough that the default could be changed without too
> much impact. I doubt there is anyone using variable length binary
> transfers currently who needs the data without the RDW. (However there
> might be people uploading data who haven't discovered the resulting data
> is unusable.)
>
> I have been working with SMF data myself for many years, and this
> problem with FTP causes a LOT of customer confusion and frustration.
>
> --
> Andrew Rowley
> Black Hill Software
>
> --
> 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: DFSORT APAR

2023-01-21 Thread Michael Oujesky


This what you were looking for??
II14047: USE OF 
DFSORT BY DB2 UTILITIES (ibm.com)


At 12:19 AM 1/21/2023, kekronbekron wrote:

Content-Transfer-Encoding: base64Hello,

Does anyone have a copy of this?

APAR II13495 - HOW DFSORT TAKES ADVANTAGE OF 64-BIT REAL ARCHITECTURE

I don't know what IBM has against TechDocs and treating their 
technical employees' work with respect, to not properly organize & archive it.


- KB

--
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: PDS compression needs a new name - defoam? unfoam? degas? I hope someone has a better idea!

2022-12-24 Thread Michael Oujesky


Wrong end,  Passing gas occurs at a different orifice.

Michael


At 08:40 AM 12/21/2022, Paul Gorlinsky wrote:


Burping ... because we are removing the gas trapped above in a PDS

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


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

Re: Can I get the true jobname in JCL

2022-12-16 Thread Michael Oujesky


Just remember to add it to MSTRJCL asIEFJOBS.

Michael

At 10:39 AM 12/16/2022, Carmen Vitullo wrote:

Content-Transfer-Encoding: 8bit

I'm not sure this was a question or a statement 
but yes, I use SYS1.STCJOBS and place jobcards 
for STC's I want to add, accounting info or 
change the msgclass or any other valid jobcard parms.


I learn something almost daily, I didn't know about , good to know

Carmen


On 12/16/2022 10:32 AM, Jay Maynard wrote:


You can now put a JOB statement in an STC PROC?!

On Fri, Dec 16, 2022 at 10:10 AM Steve Smith  wrote:


Well, I've only used the new  for batch jobs, as the old 
seems to work well for STCs.  However!  I found (in MVS System Commands)
the following description of the rabbit hole that is names of STCs:

The job name for a given started task can be assigned based on a variety of

inputs. These inputs are examined in the following order, so that if item
#1 is not specified, item #2 is used. If neither #1 nor #2 is specified,
then #3 is used, and so on.

1. The job name specified in the JOBNAME= parameter of the START
command

or

The identifier specified on the START command.
2. The job name specified on the JOB JCL statement within the member.
3. The device number specified on the START command, or the device
number associated with the device type specified on the START command

or

The device number associated with the device type specified on the
START command.
4. The device number associated with the IEFRDER DD statement within
the member.
5. The member name.

IBM® recommends that you use the JOBNAME parameter rather than an
identifier. If you use the JOBNAME parameter, SMF records, messages, and
automated programs can reflect or react to job status; identifiers can

only

be viewed at a console.
Note: JOBNAME and identifier are mutually exclusive; you cannot specify
both parameters on the START command.

Nothin's simple.  It would be interesting to see how all the options affect
both variables.

sas

On Fri, Dec 16, 2022 at 9:37 AM Colin Paice  wrote:


Wth
S OMPROUTE.OMP4  gives OMROUTE
S OMPROUTE,JOBNAME=OMP4 gives OMP4

I can live with this

Colin

On Fri, 16 Dec 2022 at 14:31, Colin Paice  wrote:


Thank you .. I'll raise some doc comments, as it is not well

documented.

It is only mentioned in the
*what's changed in 2.3 *
Colin

On Fri, 16 Dec 2022 at 13:04, Steve Smith  wrote:


This was asked and answered before.  

sas

On Fri, Dec 16, 2022 at 4:07 AM Colin Paice 
wrote:


If I start OMPROUTE.OMP1, or issue Start OMPROUTE,JOBNAME=OMP1, can

I

get

the
OMP1 as a JCL symbol so I can use it to pick up different

configuration

members?
I can crawl around the control blocks and create a symbol - but

want a

supported solution.

If I use  I get JES2.

Colin


--

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

IBM-MAIN

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

IBM-MAIN

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

--
Carmen

--
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: Split JES2 MAS

2022-12-08 Thread Michael Oujesky

Food for thought - separate MAS for each environment, but same 
SYSPLEX.  Though better to have each environment in separate SYSPLEX 
and MAS.  (That also allows better separation for implementing 
changes to each environment.


Michael)

At 01:16 PM 12/8/2022, Michael Babcock wrote:

Content-Transfer-Encoding: 8bit

We have a 3 system plex, with two of those systems, DEV and PROD, in 
a JES2 MAS.   We had an incident recently where a development job 
got into a loop and used up all spool.  This in turn, caused our 
PROD system to come to, basically, a screeching halt.


Management wants to investigate removing PROD from the MAS.

Beyond the obvious cons below, what else am I missing?  Will a cold 
start be required?


CONS:
1.  No longer monitor production jobs from DEV
2.  User's will need to logon to production to check on production jobs
3.  Significant changes to desk procedures
4.  May require changes to production jobs and/or CA7 (convert from 
SYSAFF to ROUTE XEQ)


--
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: Bytes in a 3390 track

2022-11-23 Thread Michael Oujesky

Actually, if you are doing sequential processing, zEDC is perhaps the 
best as it "write"s full-tracks, regardless of the BLKSIZE 
specified.  With zEDC, the BLKSIZE is just the size of data passed 
to/from the application and no longer the physical data "written" to disk.

Michael

At 12:14 PM 11/23/2022, Mike Schwab wrote:

If you are doing sequential reads and writes, half track is the best 
you can do.  If you are random reading small records, I.E. 80 byte, 
400 bytes, 2000 bytes; then smaller blocks lead to less I/O per 
record, since you aren't using most of the data read, and the larger 
the block the less you use.  VSAM use a 4K physical record unless 
you specify a very large CI size.

On Wed, Nov 23, 2022 at 11:56 AM Paul Gorlinsky  wrote:
>
> Short block more efficient? Elaborate please. Space utilization 
and efficient are not necessarily the same. Latency issues vary a 
lot depending on the exact box being used for DASD. DS6K v DS8K. 
DS8K with rotating v solid-state ...

>
> QSAM v BPAM v BSAM v etc...
>
> General guidelines ...
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

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

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

Re: TNZ 3270 Emulator: Any Experiences?

2022-11-18 Thread Michael Oujesky


Object Code Only.  I.e. executables only with no source code.

Michael

At 09:33 AM 11/18/2022, kekronbekron wrote:


Hi Paul,

What's OCO?


- KB
--- Original Message ---
On Thursday, November 17th, 2022 at 7:52 PM, Paul Gilmartin 
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:



> On Thu, 17 Nov 2022 19:06:03 +0800, David Crayford wrote:
>
> > Thanks for sharing. I just tried it and it's cool. Much better than
> > c3270. Supports all the usual fruit. I spend a lot of time in shells and
> > this is a great utility.
>
> c3270? A fairer comparison would be to x3270.
>
> Does it support screen capture as text (not inage)?
>
>
> On Thu, 17 Nov 2022 13:44:53 +, kekronbekron wrote:
>
> > It is cool indeed. I wish IBM did more to encourage enterprises 
(especially the mainframe domain) to use more open source.
> > It's quite obvious now that open source isn't broke man's 
software; it's a place for very talented people from around the 
world to solve common problems, in a way that a single vendor cannot.

> > Like how some folks write extremely performant this or that.
>
> That's somewhat the way things were a half-century ago, prior to OCO.
>
> --
> 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: CRTIME Field on $DJ(xxxxx),LONG command output

2022-09-21 Thread Michael Oujesky

Careful,  In a SYSPLEX with multiple local time zones, use of local 
time zone in a message can be confusing.

Michael

At 04:22 PM 9/21/2022, Paul Gilmartin wrote:

On Wed, 21 Sep 2022 19:40:01 +, Seymour J Metz wrote:

>Why not a settable option to use local, UTC or both?
>
Of course!  That covers every timezone on earth!

From: John McKown
Sent: Wednesday, September 21, 2022 7:27 AM

Just as a guess on my part, it might be because there are a number of
multinational companies with a mega datacenter used in multiple time zones.
I guess the date could be rendered in the local time of the datacenter. But
that could confuse people in other time zones. Or even in the same time
zone because some places, like Illonis do not use daylight time.

--
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: Real fun for companies on older machines & SCRT

2022-09-10 Thread Michael Oujesky

Look like LINUX desktops are supported and simple binary transfer of 
the SMF data per 
<https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/SCRTsc236845/$file/e0z3s127.pdf>SCRT: 
Using the Sub-Capacity Reporting Tool V28.2.0 
(ibm.com) 
https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/SCRTsc236845/$file/e0z3s127.pdf 



Michael


At 12:50 PM 9/10/2022, John McKown wrote:


Not too sure the form the SMF data would need to be in. And I thought to he
Linux version was only for z/Linux. But it's something to look into.

On Sat, Sep 10, 2022, 11:56 Michael Oujesky  wrote:

> It has been a while since I worked with SCRT, but thought it also ran
> on Linux and Windows.
>
> Michael
>
> At 08:20 AM 9/9/2022, John McKown wrote:
>
> >I just found out that IBM will be releasing version 29 of the SCRT program
> >on 15Oct2022. Version 28 reports will be accepted only up to the Nov2022
> >report (submitted in Dec2022), at which time only version 29 reports will
> >be accepted. Version 29 of SCRT requires Java 8.
> >
> >I just tested this out at work using Java 8 instead of Java 7. Java 8
> >reports that it will not run on a z9BC. "Processor detected (z9) does not
> >support instruction MVGHI" .
> >
> >This is going to be fun. A sister company is on a z15, running z/OS. So
> >perhaps they will be tasked to take our SMF data, produce the SCRT report,
> >and then upload it to IBM. But perhaps they will give me an ID on their
> >system to do this.
> >
> >--
> >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: Real fun for companies on older machines & SCRT

2022-09-10 Thread Michael Oujesky

It has been a while since I worked with SCRT, but thought it also ran 
on Linux and Windows.


Michael

At 08:20 AM 9/9/2022, John McKown wrote:


I just found out that IBM will be releasing version 29 of the SCRT program
on 15Oct2022. Version 28 reports will be accepted only up to the Nov2022
report (submitted in Dec2022), at which time only version 29 reports will
be accepted. Version 29 of SCRT requires Java 8.

I just tested this out at work using Java 8 instead of Java 7. Java 8
reports that it will not run on a z9BC. "Processor detected (z9) does not
support instruction MVGHI" .

This is going to be fun. A sister company is on a z15, running z/OS. So
perhaps they will be tasked to take our SMF data, produce the SCRT report,
and then upload it to IBM. But perhaps they will give me an ID on their
system to do this.

--
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: SMF type 76 records - RMF trace activity

2022-09-08 Thread Michael Oujesky

Depends on what level of zOS you are at,  RMF has been recently been 
split into the Data Gatherer and RMF components.

https://www.ibm.com/docs/en/zos/2.5.0?topic=zos-rmf
https://www.ibm.com/docs/en/zos/2.5.0?topic=zos-data-gatherer
Michael

At 12:53 PM 9/8/2022, Pierre Fichaud wrote:


Where do I find doc for the ERBFRMxx member in PARMLIB ?

I change NOTRACE to TRACE and I get a syntax error.

 .  33   IOQ(NOCOMM)/* NO 
COMMUNICATION I/O QUEUEING*/  .
 .  34   IOQ(NOGRAPH)   /* NO 
GRAPHICS DEVICE I/O QUEUEING  */  .
 .  35   IOQ(NONMBR)/* NO 
SELECTIVITY BY LCU NUMBERS*/  .
 .  36 NOFCD/* NO 
FICON DIRECTORS MEASURED  */  .
 .  37   PAGESP /* PAGE 
DATASET STATISTICS  */  .
 .  38   PAGING /* 
PAGING DATA  */  .
 .  39   TRACE  /* NO 
TRACE REPORT PRF-2022/09/08   */  .
 .  40   VSTOR(S)   /* 
VIRTUAL STORAGE SUMMARY DATA */  .
 .  41   WKLD   /* 
WORKLOAD MANAGER DATA*/  .


ERB100I RMF: ACTIVE
ERB300I ZZ : SYNTAX ERROR IN OR FOLLOWING TEXT BEGINNING '   */
ERB300I ZZ : VSTOR(S) ' IN LIBRARY 00 INPUT
ERB103I ZZ : OPTIONS IN EFFECT
ERB103I ZZ :   NOEXITS  -- MEMBER
ERB103I ZZ :   SYSOUT(A)  -- MEMBER
ERB103I ZZ :   NOREPORT  -- MEMBER
ERB103I ZZ :   RECORD  -- MEMBER
ERB103I ZZ :   NOOPTIONS  -- MEMBER
ERB103I ZZ :   SYNC(SMF)  -- MEMBER
ERB103I ZZ :   NOSTOP  -- MEMBER
ERB103I ZZ :   CYCLE(1000)  -- MEMBER
ERB103I ZZ :   NOVMGUEST  -- MEMBER
ERB103I ZZ :   WKLD  -- MEMBER
ERB103I ZZ :   VSTOR(S)  -- MEMBER
ERB103I ZZ :   NOTRACE  -- CHANGED
ERB103I ZZ :   PAGING  -- MEMBER

I don't see what I've done wrong.

Also, I can /S RMF but I can't /P RMF. It says that it is not active.
So I need to IPL to get rid of RMF.

Thanks in advance, Pierre.

--
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: SMF type 76 records - RMF trace activity

2022-09-08 Thread Michael Oujesky


And in Parmlib as:
BROWSESYS1.PARMLIB(ERBRMF02)   Line 42 Col 001 080
Command ===>  Scroll ===> CSR
 TRACE(RCVUICA,END) /* TRACE 'UIC AVERAGE'  */
 TRACE(RCVCPUA,END) /* TRACE 'CPU USAGE*16' */
 TRACE(RCVPTR,END)  /* TRACE 'PAGING RATE'  */
Michael

At 10:36 AM 9/8/2022, Michael Oujesky wrote:

 https://www.ibm.com/docs/en/zos/2.1.0?topic=rmf-zos-programmers-guide

See the sections on tracing.

Michael

ee the section on
At 09:23 AM 9/8/2022, Pierre Fichaud wrote:


In the RMF manuals, there is no mention of this SMF type.
How can I get these generated?

Thanks in advance, Pierre.

--
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: SMF type 76 records - RMF trace activity

2022-09-08 Thread Michael Oujesky


 https://www.ibm.com/docs/en/zos/2.1.0?topic=rmf-zos-programmers-guide

See the sections on tracing.

Michael

ee the section on
At 09:23 AM 9/8/2022, Pierre Fichaud wrote:


In the RMF manuals, there is no mention of this SMF type.
How can I get these generated?

Thanks in advance, Pierre.

--
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: SDSF record and request types [EXTERNAL]

2022-08-06 Thread Michael Oujesky

Just an FYI, but SYS1.SAMPLIB(IEAMDBLG) can be 
modifies to increase the record length of the 
SYSLOG formatted extract of OPERLOG from 132 to 
255 and thereby eliminate split ("s") records.


Michael

At 09:21 AM 8/6/2022, Feller, Paul wrote:
Content-Transfer-Encoding: base64This is from 
the z/OS 2.4 "z/OS MVS Planning: Operations" 
manual.  I do find it interesting that similar 
information is found in different manuals.



Each SYSLOG record is prefaced by a two-character record type field.

Valid first characters are:
N - single-line message
W - single-line message with reply
  WTOR messages are not processed by Message Flood Automation.
M - first line of a multi-line message
  Message Flood Automation can only react 
to the first line of a multiline message, not 
to any of the label, data or end lines

L - multi-line message label line
D - multi-line message data line
E - multi-line message data/end line
S - continuation of previous line
O - LOG command input
X - non-hardcopy or LOG command source

Valid second characters are:
C - command issued by operator
R - command response message
I - internally issued command
U - command from unknown console ID (z/OS® R8 and above)



Paul Feller
GTS Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List 
 On Behalf Of Colin Paice

Sent: Saturday, August 6, 2022 9:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF record and request types [EXTERNAL]

See MVS System messages ABA..  eg SA38-0668-04 
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_docs_en_zos_2.3.0-3Ftopic-3Dformat-2Dmessage-2Dbody=DwIBaQ=9g4MJkl2VjLjS6R4ei18BA=eUhu3PeeWy6RTndlJVKembFjFsvwCa8eeU_gm45NyOc=NfQ8LoRxiy8fkxXrX7-7a5SFmv_-By6n1u6sWfznZjJfI1g8BgAFX4Rl12cHh9fZ=VtNyovKAdHn7AQ4_VdL5m08OoF2dh2wlYjrr0uDm6eQ=

and
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_docs_en_zos_2.3.0-3Ftopic-3Dformat-2Dmessages-2Dsent-2Dhardcopy-2Dlog-2Din-2Djes2-2Dsystem=DwIBaQ=9g4MJkl2VjLjS6R4ei18BA=eUhu3PeeWy6RTndlJVKembFjFsvwCa8eeU_gm45NyOc=NfQ8LoRxiy8fkxXrX7-7a5SFmv_-By6n1u6sWfznZjJfI1g8BgAFX4Rl12cHh9fZ=RZb-SuX9aMMbmK3iHMR8EXDheXyOV8_9bHmsxOTNZLE=

On Sat, 6 Aug 2022 at 14:24, Pierre Fichaud 
mailto:pr...@videotron.ca>> wrote:


> In SDSF, I type in the LOG command.
>
> I get lines like :
B3s##c£ 25.24 SYSLOG     IEE042I SYSTEM
ÑÈUHÑU@NITIALIZED
>  NC000 S0W1 22060 18:00:18.73 INTERNAL 0290  CONTROL M,UEXIT=Y
> IEAVN701 - INTERNALLY ISSUED K M
>  NR000 S0W1 22060 18:00:18.78 INTERNAL 0090  IEA590I WTO USER
VUQPUVUÕÕS
ÌÌH
MÎNNË90  IEA371I
> SYS1.IPLPARM ON DEVICE 0CE3 SELECTED FOR IPL PARAMETERS
>  N 000 S0W1 22060 17:59:03.28  0290  IEA246I LOAD   ID
> W1 SELECTED
>
> The first 2 characters according to the SDSF documentation and the
> HELP panels are the record type and request type.
> The HELP panel gives the following for record type :
HÚ[ÛK[[HY\ÜØYÙCBrÒ6ævÖÆæRÖW76vP with a reply
> M - First line of a multi-line message O - Log command input X - Entry
ÛHHÛÝ\ÙHÝ\@n hardcopy or log command
>
> Another HELP panel gives the following for the request types:
ÈHÛÛ[X][Ûof previous line
> L - Label line of a multi-line message D - First line of a multi-line
> message
>
>
> I am seeing more than the documentation I pasted above.
Hsee lines with E or ER. What is E ?
> What are C or R in the 2nd byte (request type?)
>
> Is there more complete documentation on this ?
>
> Thanks in advance, Pierre.
>
> --
ÜPKSPRSÝXØÜXHÈÚYÛÙ / archive access instructions, send
[XZ[È\ÝÙ\@listserv.ua.edu 
with the message: INFO IBM-MAIN

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


--
Please note:  This message originated outside 
your organization. Please use caution when opening links or attachments.



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

2022-08-02 Thread Michael Oujesky

Long ago (2005) we had one of the largest generators of SMF data on 
record and continued to use MAN datasets using a couple of techniques 
to carry the load.


Environment: four CECS, all in the same SYSPLEX.  four on UK time, 
ten on US time.  Extensive use of CICSPLEX and transaction routine 
with DB2 data sharing.


Techniques:
   * multiple MAN data sets for each system all in shared user 
catalogs after system initialization.  IPLed on master cataloged MAN 
files, then switched over to the user cataloged ones late in the 
start up process.)
   * dump/clear routines designed so that multiple instances could 
run on a system at the same time.  GDGs were not used to avoid base 
contention.  Dataset names generated by dynamic system variables.
   * Dump phases were scheduled on small utility LPARS, with clear 
phases run on the originating image.
   * offloaded data was SMS tailored compressed (today would use 
zEDC) getting close to 90% compression/
   * Did not use internal compression for CICS or DB2 data to lower 
processor utilization in those address spaces. (these use CSRCESRV 
which uses the generic compression algorithms getting 40-50% 
compression and ran on GP engines).  SMS compression also 
super-blocks (full track read/writes) for better disk 
utilization.  Multi-stripping also used to speed up and overlap 
phisical I/O to the files.

Michael

At 02:45 PM 8/2/2022, Radoslaw Skorupka wrote:

Content-Transfer-Encoding: 8bit

W dniu 02.08.2022 o 19:41, Steve Beaver pisze:

Has anyone ever created a LOGSTREAM on an M54 of 65000 cylinders.



I have a very, very busy CICS and DB2 on the same LPAR


No, never, even close to such huge size. I'm talking about very busy 
and overloaded CICS region with DB2 on same LPAR

(200M trn/day, up to 4000 trn/s).

--
Radoslaw Skorupka
Lodz, Poland

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


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

Re: Logstreams

2022-08-02 Thread Michael Oujesky


You might consider splitting the data into multiple logstreams.

Michael


At 12:41 PM 8/2/2022, Steve Beaver wrote:

Has anyone ever created a LOGSTREAM on an M54 of 65000 cylinders.



I have a very, very busy CICS and DB2 on the same LPAR



Thanks


--
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: Mainframe outage affecting W.Va. state agencies could take 48, 72 hours to resolve

2022-07-27 Thread Michael Oujesky


Depending on whether or not the individual is subject to FINRA restrictions.

Michael

At 05:04 PM 7/27/2022, Mike Schwab wrote:

Yep.  Banking standards require everyone to take 1 or 2 weeks off 
with no work contact.


On Wed, Jul 27, 2022 at 9:36 AM Bob Bridges  wrote:
>
> Absolutely right.  I have impression that they sometimes do this during
> military exercises:  A key officer "dies", now what?
>
> Normally I just stick in the next tagline, but for the current thread I
> picked this one out.
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* If you're not failing when you train or test your security, you're not
> learning anything.  -Craig Tucker */
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Seymour J Metz
> Sent: Wednesday, July 27, 2022 08:16
>
> I had a boss of the government side with a habit of pulling random tapes
> during a DR test and saying something like "this is unreadable. 
Proceed with

> the test." He also pointed at random people and said "You're dead." ;the
> remaining crew had to proceed without your involvement. Nasty, but if we
> couldn't handle it during a drill then we weren't prepared for a real
> disaster; I absolutely approved. The recovery plan should cover all
> contingencies.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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


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

Re: Finding uncatalogued datasets

2022-07-22 Thread Michael Oujesky

Sorry, meant to say DcOLLECT and LISTCATs merged to determine those 
not cataloged?


At 12:21 PM 7/22/2022, Michael Oujesky wrote:


Have you had a look at DCOLLECT data?

Michael

At 09:00 AM 7/22/2022, Jack Zukt wrote:


Hi all,
As a byproduct of what I am working now, I have found out a few
uncatalogued datasets. Now I would like to find out all the uncatalogued
datasets that are forgotten on the hundred of volumes that are out there.
Using ADRDDSU and   (CATLG EQ NO) is not an option as it would need a DD
for each VOLSER. I could write a rexx that would read the DCOLLECT
VOLUMES(*) NODATAINFO and generate a JOB for each VOLSER or group of
VOLSERs but I really would like to use a more standard approach. I seem to
remember, from another age, that FDRABR could do it. However Dr. Google has
not been able to find me anything to that effect using only IBM tools.
Do you have any ideas how to go about this?
Your help will be, as always, greatly appreciated.
Regards,
Jack

--
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: Finding uncatalogued datasets

2022-07-22 Thread Michael Oujesky


Have you had a look at DCOLLECT data?

Michael

At 09:00 AM 7/22/2022, Jack Zukt wrote:


Hi all,
As a byproduct of what I am working now, I have found out a few
uncatalogued datasets. Now I would like to find out all the uncatalogued
datasets that are forgotten on the hundred of volumes that are out there.
Using ADRDDSU and   (CATLG EQ NO) is not an option as it would need a DD
for each VOLSER. I could write a rexx that would read the DCOLLECT
VOLUMES(*) NODATAINFO and generate a JOB for each VOLSER or group of
VOLSERs but I really would like to use a more standard approach. I seem to
remember, from another age, that FDRABR could do it. However Dr. Google has
not been able to find me anything to that effect using only IBM tools.
Do you have any ideas how to go about this?
Your help will be, as always, greatly appreciated.
Regards,
Jack

--
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: SMF Record types to capture

2022-07-05 Thread Michael Oujesky

My bad.  126 has the Extended SMF record header version 1.  That 
allows this record  type to have up to 68,108,864 possible 
combinations of sub-type and extended sub-type with the extended 
sub-type limited to 2048 values.  Yet the extended sub-type field is 
two bytes, so, theoretically, the combinations could be as great at 
1,073,741,824 if my match is correct.

Michael

At 11:50 AM 7/4/2022, Michael Oujesky wrote:

Record type 125 is the new extended SMF record that provide for the 
double-byte record ID's.

Probably the most concise collection of information is in Cheryl 
Watson's SMF Reference Summary found at:
https://watsonwalker.com/wp-content/uploads/2021/02/SMF-Reference-20210124.pdf 

Michael

At 03:22 PM 7/3/2022, Roger W Suhr wrote:

z/OS 2.5 provides for new "extended" SMF record types >255.  They have a
standard type (I forgot the number) for backward compatibility, AND an
extended  type number (4 digits).

Roger W. Suhr

suhr...@gmail.com

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Michael Oujesky
Sent: Sunday, July 3, 2022 13:51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMF Record types to capture

The standard header is still a one byte field, so 0:255 captures them all.

At each dump/off-load, I segmented our SMF records by
category/interest-group and anticipated retention period to reduce the
processing resources and time by not having to process record types that ere
superfluous.  As an example:

* CICS 110.1.3 transaction detail and further segmented by region
grouping 9production, development, etc)
* CICS 110.1.1 dictionary records for preparation of processing the
tracnsaction detail 110.1.3 records
* CICs exception records
* CICS DOMAIN interval records
* DB2 101
* DB2 100/102
* RMF 70 and 72
* RMF device 74.1
* Security 80
* WLM 99
* Dataset 14/15/60-series
And a number of others, but this set should give you an idea of ho this
approach orked.

Michael

At 10:44 AM 7/3/2022, Lizette Koehler wrote:
>I am reviewing our SMF Setup.  We are on z/OS V2.3 going to z/OS V2.4
>We have not reviewed or updated our SMF record types in decades We only
>use 0:255 for our archive/collection parms Is there a new  range to
>change to use?
>If so, what should I use?
>Any suggestions or is this still valid
>
>Thank you
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

--
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: SMF Record types to capture

2022-07-04 Thread Michael Oujesky

Record type 125 is the new extended SMF record that provide for the 
double-byte record ID's.

Probably the most concise collection of information is in Cheryl 
Watson's SMF Reference Summary found at:

https://watsonwalker.com/wp-content/uploads/2021/02/SMF-Reference-20210124.pdf
Michael

At 03:22 PM 7/3/2022, Roger W Suhr wrote:

z/OS 2.5 provides for new "extended" SMF record types >255.  They have a
standard type (I forgot the number) for backward compatibility, AND an
extended  type number (4 digits).

Roger W. Suhr

suhr...@gmail.com

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Michael Oujesky
Sent: Sunday, July 3, 2022 13:51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMF Record types to capture

The standard header is still a one byte field, so 0:255 captures them all.

At each dump/off-load, I segmented our SMF records by
category/interest-group and anticipated retention period to reduce the
processing resources and time by not having to process record types that ere
superfluous.  As an example:

* CICS 110.1.3 transaction detail and further segmented by region
grouping 9production, development, etc)
* CICS 110.1.1 dictionary records for preparation of processing the
tracnsaction detail 110.1.3 records
* CICs exception records
* CICS DOMAIN interval records
* DB2 101
* DB2 100/102
* RMF 70 and 72
* RMF device 74.1
* Security 80
* WLM 99
* Dataset 14/15/60-series
And a number of others, but this set should give you an idea of ho this
approach orked.

Michael

At 10:44 AM 7/3/2022, Lizette Koehler wrote:
>I am reviewing our SMF Setup.  We are on z/OS V2.3 going to z/OS V2.4
>We have not reviewed or updated our SMF record types in decades We only
>use 0:255 for our archive/collection parms Is there a new  range to
>change to use?
>If so, what should I use?
>Any suggestions or is this still valid
>
>Thank you
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

--
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: SMF Record types to capture

2022-07-03 Thread Michael Oujesky


The standard header is still a one byte field, so 0:255 captures them all.

At each dump/off-load, I segmented our SMF records by 
category/interest-group and anticipated retention period to reduce 
the processing resources and time by not having to process record 
types that ere superfluous.  As an example:


   * CICS 110.1.3 transaction detail and further segmented by region 
grouping 9production, development, etc)
   * CICS 110.1.1 dictionary records for preparation of processing 
the tracnsaction detail 110.1.3 records

   * CICs exception records
   * CICS DOMAIN interval records
   * DB2 101
   * DB2 100/102
   * RMF 70 and 72
   * RMF device 74.1
   * Security 80
   * WLM 99
   * Dataset 14/15/60-series
And a number of others, but this set should give you an idea of ho 
this approach orked.


Michael


At 10:44 AM 7/3/2022, Lizette Koehler wrote:

I am reviewing our SMF Setup.  We are on z/OS V2.3 going to z/OS V2.4
We have not reviewed or updated our SMF record types in decades
We only use 0:255 for our archive/collection parms
Is there a new  range to change to use?
If so, what should I use?
Any suggestions or is this still valid

Thank you

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


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

Re: SFTP JOB Data parameter

2022-06-23 Thread Michael Oujesky


One way, presuming the job runs once per day:
//SFTPB24E JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=,USER=STCSYS
//GETYEST  EXEC PGM=IKJEFT01,REGION=0M
//SYSEXEC  DD DISP=SHR,DSN=SYS1.SBPXEXEC
//OUTPUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DISP=OLD,DSN=MYHLQ.YESTFILE.CMD
//*/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\*
//BLDGET   IF RC=0 THEN
//BYEBYE   EXEC PGM=IEFBR14
//YESTFILE DD   DISP=(MOD,DELETE),DSN=MYHKQ.YESTFILE.CMD,
// UNIT=SYSALLDA,SPACE=(TRK,(0))
//**
//STEP0EXEC PGM=EZACFSM1
//SYSOUT   DD DSN=MYHLQ.YESTFILE.CMD,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,0)),UNIT=SYSALLDA
//SYSINDD DATA,DLM=@@
OSHELL { echo 'lcd /u/op117/';  +
 echo 'cd /XX/Output/TMP';  +
 echo 'ASCII';  +
 echo 'get MDS_'; } |   +
 sftp -P  eftmfge...@10.222.xx.yy
 oget '/u/op117/MDS_' -
  'MCCP.DATA.XX.MDS.SFTP'
@@
//BLDGET ENDIF
Seed it by running the BLDGET steps the day before regular runs begin.

Michael



At 01:58 AM 6/23/2022, saurabh khandelwal wrote:


Dear Team,



Thanks for reply and helping me to resolve this issue.



1)  Mainframe is getting file from windows. So, few of the files in
windows having todays date and few of them having yesterdayâs date( today
-1) .

2)  For todays date below code is the solution you all suggested and
worked out.



//SFTPB24E JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=,USER=STCSYS
//STEP0EXEC PGM=EZACFSM1
//SYSOUT   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0)),UNIT=VIO
//SYSINDD DATA,DLM=@@
OSHELL { echo 'lcd /u/op117/';  +
 echo 'cd /XX/Output/TMP';  +
 echo 'ASCII';  +
 echo 'get MDS_'; } |   +
 sftp -P  eftmfge...@10.222.xx.yy
 oget '/u/op117/MDS_' -
  'MCCP.DATA.XX.MDS.SFTP'
@@
//STEP1EXEC PGM=IKJEFT01,REGION=0M
//SYSEXEC  DD DISP=SHR,DSN=SYS1.SBPXEXEC
//OUTPUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DISP=(OLD,PASS),DSN=&

3)  Now, to get the file into Mainframe using SFTP and oshell with
yesterdays date is the step we failing. So, can you please help me to
change this code mentioned above to get yesterdays file.

Thank you so much once again for help.


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

Re: SFTP JOB Data parameter

2022-06-22 Thread Michael Oujesky


Might you have the job log from one that had yesterday's data?

In processes I have built, I did the job build  "today", but 
submitted the job stream "tomorrow" or used a timer facility to delay 
start of execution until "tomorrow" (or days/weeks later).


Michael

At 08:00 AM 6/22/2022, saurabh khandelwal wrote:


Dear All,

Thanks you so much. Finally below code worked. But in this, we are getting
current (today's date) but in some of the files, we are getting yesterday's
date (today's -1) .

How can we make this process work for yesterday's date.

But in this, we are able to retrieve

//SFTPDOBM JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=,USER=STCSYS
//STEP0EXEC PGM=EZACFSM1
//SYSOUT   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0)),UNIT=VIO
//SYSINDD DATA,DLM=@@
OSHELL { echo 'lcd /u/op117/';  +
  echo 'cd /3DSecure/KWT/TMP';  +
 echo 'ASCII';  +
echo 'get NonMon_DailyExtract_KWT_'; } | +
 sftp -P  eftm...@10.222.xx.xx
oget '/u/op117/NonMon_DailyExtract_KWT_'-
 'NBFDP.XX.SECURE.DOBMOB.XX.SFTP'
@@
//STEP1EXEC PGM=IKJEFT01,REGION=0M
//SYSEXEC  DD DISP=SHR,DSN=SYS1.SBPXEXEC
//OUTPUT   DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN  DD DISP=(OLD,PASS),DSN=&


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

Re: Debit vs Credit card for cash at ATM? [was: RE: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS]

2022-06-17 Thread Michael Oujesky

ATM is just the teller (i.e. Automated Teller Machine), but there are 
only two kinds of accounts - debit (deposit) or credit (loan).   Most 
ATMs accept either kind off account, though some are limited as to 
what banking network they accept.


BTW, for BOA, the card number is just that - the number identifying 
that particular piece of plastic.  The true account number is 
entirely unrelated to the card number.


Michael

At 05:26 PM 6/17/2022, Tom Brennan wrote:

Content-Transfer-Encoding: 7bit

With BofA the default seems to be an ATM card that is also a debit 
card.  When one was mailed to me I asked for an ATM card only, and 
they sent that instead.


On 6/17/2022 2:36 PM, Farley, Peter x23353 wrote:
Curious - How do you get cash at an ATM directly from your checking 
or savings account without a bank debit card?  Using a credit card 
to get cash from an ATM usually means drawing "Cash Advance" money 
on that card, which is subject to interest costs on the credit cards I own.


--
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: SFTP JOB Data parameter

2022-06-15 Thread Michael Oujesky

My guess is that resolution of dynamic symbols can differ each time 
they are interpreted,  In my JCL coding, I use refer-backs so that 
that any dataset is evaluated only once in the JCL.  Further 
references to that dataset do not use the dynamic symbol.


Michael

At 12:26 PM 6/15/2022, Farley, Peter x23353 wrote:
Thanks Sri, I did not know about SYSSYM=ALLOW.  But that raises the 
question why NOT always allow system symbols in every batch 
initiator?  Allowing them just seems like a no-brainer to me, but 
then I'm just an application programmer who expects to be able to 
use all of the available tools to get the job done.


Peter

-Original Message-
From: IBM Mainframe Discussion List  On 
Behalf Of Sri h Kolusu

Sent: Wednesday, June 15, 2022 1:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SFTP JOB Data parameter

>> Why is EZACFSM1 required to use  in an instream 
DD?  Couldn't the OP just use:


Peter,

Not all shops SYSSYM=ALLOW defined. So if your jobclass is NOT 
defined to allow symbols, the symbols will not be 
translated.  However with program EZACFSM1 will translate all the 
symbols defined to the system.



Thanks,
Kolusu
--

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


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

1 2 >

1 - 100 of 136 matches

Mail list logo