Re: EXPDT added to newly allocated dataset

[Ituriel do Neto]

Maybe IGGPRE00/IGGPOST0?


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 9 de abril de 2024 às 14:20:33 BRT, Mark Jacobs 
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> escreveu: 





Not on these two systems. On the others we use SRS.

Mark Jacobs 


Sent from ProtonMail, Swiss-based encrypted email.

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


On Tuesday, April 9th, 2024 at 1:15 PM, Michael Babcock 
<05ad4e2d7232-dmarc-requ...@listserv.ua.edu> wrote:

> Do you have CA-DISK or similar software that manages non-SMS allocations?
> 
> On Tue, Apr 9, 2024 at 12:07 PM Mark Jacobs <
> 0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:
> 
> > I have an interesting problem I'm looking at and nothing seems obvious as
> > to the reason why. On two of our systems when I allocate a new SYS1
> > dataset, non-sms with no DATACLASS assigned by the ACS routines or on the
> > allocation itself, when I specify UNIT=3390 it's assigned an EXPDT of
> > today+3 days, when I allocate the same dataset on the same volume using
> > UNIT=SYSDA or UNIT=SYSALLDA it's not given an EXPDT.
> > 
> > When I do the same processes on different systems in the same SYSPLEX, but
> > in a different SMSPLEX, we're not observing the same EXPDT behavior, with
> > no EXPDT assigned for both datasets.
> > 
> > Does anyone have ideas on where to look?
> > 
> > Mark Jacobs
> > 
> > Sent from ProtonMail, 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

--
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: Reading a scratch tape

[Ituriel do Neto]

Since the tape is a scratch, the first thing to be done is to change it to 
private, to avoid it being offered
to be rewritten. 
I believe TS7700 does not allow a scratch tape to be open as input, so changing 
it to private will also
allow you to read it.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 7 de fevereiro de 2024 às 10:26:19 BRT, Bob Bridges 
 escreveu: 





Been a while since I had to do this, but can't you just BLP?

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

/* The road to the promised land runs past Sinai.  The moral law may exist to 
be transcended; but there is no transcending it for those who have not first 
admitted its claim upon them, and then tried with all their strength to meet 
that claim, and fairly and squarely faced the fact of their failure.  -C S 
Lewis, _The Problem of Pain_ */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Brian Fraser
Sent: Wednesday, February 7, 2024 07:34

TS7700 wont read a tape in scratch category, I don't know about Control-M, but 
in CA1 there is a utility called CTSSYNC to "protect" a scratch tape by 
altering the cat code back to non-scratch.

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

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

Re: Where are Unix reason codes over 7371 documented

[Ituriel do Neto]

Maybe i'm wrong, did you actually try TSO BPXMTEXT  ?


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em domingo, 4 de fevereiro de 2024 às 17:10:16 BRT, Mark Jacobs 
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> escreveu: 





BPXMTEXT is shipped in SYS1.SBPXEXEC and must be in SYSEXEC or SYSPROC to use. 

Mark Jacobs 

Sent from ProtonMail, Swiss-based encrypted email.

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


On Sunday, February 4th, 2024 at 3:06 PM, Phil Smith III  
wrote:

> Colin Paice wrote:
> 
> > tso command bpxmtext 7663730c
> 
> 
> I get:
> COMMAND BPXMTEXT NOT FOUND
> ?
> 
> 
> --
> 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: SDSF PS Command column

[Ituriel do Neto]

Hi,

If you type "/", a panel will pop up with more space to type commands


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sexta-feira, 2 de fevereiro de 2024 às 16:30:56 BRT, Frank Swarbrick 
 escreveu: 





Is there any way to get more than the first 40 characters of the associated 
command line for a job in the PS screen?


--
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: GTF trace for a JCL error?

[Ituriel do Neto]

Hi,

You can check the jobclass definitions of your STCs by issuing 
$DJOBCLASS(STC),LONG or looking into SDSF at JC screen. Probably the outdisp is 
(PURGE,PURGE).

In this case, you may change it to (HOLD,HOLD) to see the JCL.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 30 de janeiro de 2024 às 11:31:17 BRT, Peter Ten Eyck 
<04d3761a18a7-dmarc-requ...@listserv.ua.edu> escreveu: 





Under z/OS 2.4.

I have a STC when started, fails with the following error in the SYSLOG:

IEE132I START COMMAND DEVICE ALLOCATION ERROR

Looking at the STC output in JES, there is a JCL error in the proc (dataset not 
found).

Is there a way to "see" the JCL error without looking at the JES output?

I have been researching and running a GTF trace with no success "seeing" the 
JCL error, not sure what GTF trace options to turn on or if it is possible to 
see that JCL error via a GTF trace.

Is it possible to see that JCL error in a GTF trace, if so, what options 
(parms) do I need to run with?



Note: We had an issue with VTAM not coming up on a LPAR and we were unable to 
access JES to see the JCL error.

--
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: So Long, and Thanks for All the Fish*

[Ituriel do Neto]

You are and will always be an inspiration to me.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 23 de janeiro de 2024 às 04:39:23 BRT, Timothy Sipples 
 escreveu: 





Best wishes Cheryl! If Singapore is on your bucket list please stop by to say 
hello.

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


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

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

Re: ADRDSSU COMPRESS and enq

[Ituriel do Neto]

BYPASSNQ program ?


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sexta-feira, 19 de janeiro de 2024 às 14:24:02 BRT, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> escreveu: 





Hi Radek,
- Run ICKDSF to take the VTOC out of Indexed Format (BUILDOS)
- ZAP the VTOC  (i.e. FORMAT4.DSCB) to change the DSNAME to something 
innocuous.
- Compress via IEBCOPY
- ZAP the DSNAME to SYS1.LINKLIB
- Run ICKDSF to put the VTOC into Indexed Format (BUILDIX)

I've done this, but, not recently.

Here is an article where someone else came up with the same idea:
Deleting a File That Is “In Use” | Steve Baugh - The CICS Guy 
(wordpress.com) 


Regards,
David

On 2024-01-19 07:27, Radoslaw Skorupka wrote:
> I want to compress some system datasets like SYS1.LINKLIB, but *not* 
> real "live", rather offline copies.
> DSS ends with RC8, because of failed serialization.
> SETPROG LNKLST,UNALLOCATE will not solve all the enqueues, because 
> some datasets are serialized by other entities like TSO users.
>
> And I also want to CONSOLIDATE some datasets as well.
>
>
> Any clue?
>

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

Assembler optimization OPTION

[Ituriel do Neto]

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

Re: Rexx to clone users in RACF

[Ituriel do Neto]

Hi,

Years ago I created a small DFSORT job to parse an IRRDBU00 dataset to clone 
userids and all authorizations. Later, Mr Kolusu enhanced and optimized it to 
its final version. Thank you again Mr Kolusu.

If you want to try, here goes the job:
  
//RACFCLON JOB (),CLASS=A,MSGCLASS=X,NOTIFY=,REGION=0M        
//*                                                                  
//   SET BASEUSER='ZR15'        <== SOURCE                           
//   SET CLONUSER='ZR23'        <== TARGET                           
//*  
//* CREATE RACF STATEMENTS TO CLONE THE USERID                   **  
//*  
//STEP0100 EXEC PGM=SORT,PARM='JP1"",JP2""'        
//SYSOUT   DD SYSOUT=*                                               
//SORTIN   DD DISP=SHR,DSN=ZDATA.UNLOAD.RACF                         
//ADDUSER  DD SYSOUT=*                                               
//ALTUSER  DD SYSOUT=*                                               
//CONNECT  DD SYSOUT=*                                               
//PERMIT   DD SYSOUT=*                                               
//SYSIN    DD *                                                      
  OPTION COPY,VLSCMP                                                 
  INCLUDE COND=((005,4,CH,EQ,C'0200',AND,010,8,CH,EQ,JP1),OR,        
                (005,4,CH,EQ,C'0220',AND,010,8,CH,EQ,JP1),OR,        
                (005,4,CH,EQ,C'0270',AND,010,8,CH,EQ,JP1),OR,        
                (005,4,CH,EQ,C'0102',AND,019,8,CH,EQ,JP1),OR,        
                (005,4,CH,EQ,C'0404',AND,062,8,CH,EQ,JP1),OR,        
                (005,4,CH,EQ,C'0505',AND,266,8,CH,EQ,JP1))           
  INREC IFTHEN=(WHEN=INIT,                                           
         BUILD=(001,004,                                             
                005,1100)),                                          
        IFTHEN=(WHEN=(5,4,CH,EQ,C'0200'),                            
         BUILD=(1,4,                                                 
                C' ADDUSER ',                                        
                JP2,C' OWNER(',30,8,C') DFLTGRP(',100,8,C')   + ',   
                85:C'         PASSWORD(',10,8,C') ',                 
                   C'NAME(''',79,20,C''')')),                        
         IFTHEN=(WHEN=(5,4,CH,EQ,C'0220'),                           
          BUILD=(1,4,                                                
                C' ALTUSER ',                                        
                JP2,C' TSO(PROC(',154,8,C')  ',                      
                C' ACCTNUM(',19,8,C') + ',                           
               85:C'         SIZE(',163,8,C') ',                     
                  C' MAXSIZE(',176,10,C') ',                         
                  C' UNIT(',209,8,C') )')),                          
         IFTHEN=(WHEN=(5,4,CH,EQ,C'0270'),                           
          BUILD=(1,4,                                                
                C' ALTUSER ',                                        
                JP2,C' OMVS(UID(',15,10,C') ',                       
                C' HOME(',30,10,C') ',                               
                C' PROGRAM(',1054,8,C') )')),                        
         IFTHEN=(WHEN=(5,4,CH,EQ,C'0102'),                           
          BUILD=(1,4,                                                
                C' CONNECT ',                                
                JP2,C' GROUP(',10,8,C') ',                   
                C'OWNER(',10,8,C') ',                        
                C'AUTHORITY(',28,8,C') ')),                  
         IFTHEN=(WHEN=(5,4,CH,EQ,C'0404'),                   
          BUILD=(1,4,                                        
                C' PERMIT ',                                 
                C' ',10,44,C'       GEN + ',                 
                85:C'         CLASS(DATASET ) ',             
                   C'ID(',JP2,C') ',                         
                   C'ACCESS(',71,8,C') ')),                  
         IFTHEN=(WHEN=(5,4,CH,EQ,C'0505'),                   
          BUILD=(1,4,                                        
                C' PERMIT ',                                 
                C' ',10,44,C'       + ',                     
                85:C'         CLASS(',257,8,C') ',           
                   C'ID(',JP2,C') ',                         
                   C'ACCESS(',275,8,C') '))                  
  OUTFIL FNAMES=ADDUSER,INCLUDE=(5,8,CH,EQ,C' ADDUSER '),    
  VTOF,BUILD=(5,80,/,85,80)                                  
  OUTFIL FNAMES=ALTUSER,INCLUDE=(5,8,CH,EQ,C' ALTUSER '),    
  VTOF,BUILD=(5,80,/,85,80)                                  
  OUTFIL FNAMES=CONNECT,INCLUDE=(5,8,CH,EQ,C' CONNECT '),    
  VTOF,BUILD=(5,80)                                      

Re: RACF, the FACILITY class, and z/XDC

[Ituriel do Neto]

David,

Why don't you give the option to select the RACF class to the customer? You can 
give the instructions to create a new class in CDT or instruct them to use the 
XFACILIT class.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 13 de novembro de 2023 às 18:27:18 BRT, David Cole 
 escreveu: 





Hi Jon,

Thanks for your thoughts, but I'm not trying to 
decide if I should use FACILITY. I'm trying to 
decide how I should go about discontinuing using FACILITY.

Based on suggestions from others on this thread, 
I've made the decision to switch to using a class named XFACILIT.

[Switching will be tricky though. I don't want to 
leave existing customers high and dry, so I'll 
have to "dual path" (soft of). But I don't want 
to create security exposures by doing it wrong.]

Dave








At 11/13/2023 02:51 PM, Jon Perryman wrote:
>On Mon, 13 Nov 2023 13:30:56 -0500, David Cole  wrote:
>
> >so while creating a "$XDC" class perhaps might be "easy", to
> >paraphrase Peter, why would I make a customer 
> do that when I don't have to...
> >
> >So thank you to those who tipped me off about the XFACILIT. It sounds
> >perfect for my needs.
>
>Dave, as food for thought:
>
>RACF FACILITY is a special class which needs 
>special consideration in recommending it. For 
>instance, ask yourself why the resource name is restricted to 39 characters.
>
>If you choose to recommend FACILITY, you might 
>need to document special considerations and 
>include sections for each of the security 
>products (e.g. RACF, ACF2 and Top-secret).
>
>It's been a very long time for me, but I think 
>these are in storage rules. Probably not a big 
>deal if you only have a couple of rules but it's 
>something you should consider. Additionally, I 
>believe FACILITY requires a refresh in RACF. I 
>can't remember about ACF2 and Top-secret. These are customer considerations.
>
>If I remember correctly, RACF uses class numbers 
>which has a limit. classes are associated to a 
>number and mutliple classes can use the same 
>number. It's not unusual for customers to 
>combine classes into a single class but they 
>must avoid resource name collisions. It's a good 
>practice to uniquely identify your product in the resource name.
>
>Â I can't recall how ACF2 and Top-secret handle 
>these situations. Maybe they have a facility to equate multiple RACF classes.
>
>As an alternative to FACILITY, you might 
>consider a class that is not special but exists 
>at all. For example, I've had customers use the dataset class.
>
>You may want to continue with class $XDC as your 
>recommendation with alternatives. Equating 
>classes can be useful. For instance, companies 
>acquire other companies which means staff is 
>dealing with multiple unique environments. It 
>easier to manage XDC rules when class $XDC is 
>specified although it has a different meaning in each environment.
>
>I'm not suggesting you take this as advice but 
>simply to make you aware of these points.
>
>--
>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 for number of program executions?

[Ituriel do Neto]

If the program you want is specified in EXEC PGM= statement, then it is 
possible to use SMF 30.

If it is a subroutine, then it will be much more complicated.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 9 de novembro de 2023 às 16:01:27 BRT, L H 
 escreveu: 





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: SORT Help with JFY and SQZ

[Ituriel do Neto]

I think there is also another option, like below

 //STEP1  EXEC PGM=ICETOOL                                     
//TOOLMSG DD SYSOUT=*                                          
//DFSMSG  DD SYSOUT=*                                          
//IN      DD DISP=SHR,DSN=YOUR.DATASET 
//TOOLIN  DD *                                                 
* SET RC=12 IF THE 'IN' DATA SET IS EMPTY, OR                  
* SET RC=0 IF THE 'IN' DATA SET IS NOT EMPTY                   
 COUNT FROM(IN) EMPTY                                          
/*                                                             


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 9 de novembro de 2023 às 13:18:44 BRT, Sri h Kolusu 
 escreveu: 





>> If the input file has no records to process, I would like to set a return 
>> code so I can bypass further processing. Is there a way that I can tweak 
>> this SORT input that you gave me to know if the SORTCMD1 file is empty, and 
>> set a CC for the step?

Don,

Yes, we can set a return code if the file is empty.  Cameron has the right idea 
of using NULLOUT, however it will NOT work in your case as you are using OUTFIL 
processing.  So, the parm you need to use is NULLOFL.

So, change this statement

OUTFIL BUILD=(1,133)

To

OUTFIL BUILD=(1,133),NULLOFL=RC4

This will set RC=4 when the input file is EMPTY.

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: IPCS and Rexx

[Ituriel do Neto]

I'm also very interested in this IPCS subject.
Can any of you share some Rexx samples interacting with IPCS, to see how it 
works?

TIA


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 12 de outubro de 2023 às 06:51:34 GMT+2, Tony Harminc 
 escreveu: 





On Wed, 11 Oct 2023 at 19:25, Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 11 Oct 2023 17:07:44 -0400, Tony Harminc wrote:
> >    ...
> >So e.g. we have a product
> >that has a notion of transactions, and a transaction is represented by a
> >single CB that points to various other CBs, ...
> >
> How do you achieve that, given that Rexx has no pointer type?
>

The transaction product is not written in REXX (it's mostly assembler).
We're talking about using REXX running under IPCS to process a dump from
that product.

STORAGE() lets you access and modify CBs once you know
> their addresses, but not to use addresses of Rexx-owned objects.
>

Sure. But the REXX runs with IPCS commands available to it, and at least
one of them (EVAL) can use a REXX variable interface. So the content of any
storage in the dump can be stuck into a REXX variable. And a live system
can (mostly) be examined without changing the REXX, since with suitable
permissions IPCS EVAL can fetch from active storage rather than a dump.

I can imagine supplying interfaces to GETMAIN/FREEMAIN.
>

Indeed. Perhaps an extension to the REXX Storage function. With of course
ALETs and 64-bit and such as well...

I once lamented that the SMP/E API depends on pointers in
> ways that are hostile to REXX.  Kurt Q. replied, approximately,
> "Well, you can't please everybody."
>
> The ICSF API, in contrast, is REXX- friendly.  There are SAMPLIB
> members.  The only pointers needed are arguments to LINKMVS.
>

The Binder API is mostly at least not REXX-unfriendly.

>
> REXX is important enough that it should be considered in the
> design of an API.
>

IPCS does have that variable interface, which is Good Enough to get a lot
done.


Tony H.

--
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: Retrieve LPAR weight without BCPii HWIQUERY ?

[Ituriel do Neto]

This information can also be obtained in REQLPDAT service.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 28 de setembro de 2023 às 11:14:49 BRT, Rob Scott 
 escreveu: 





I am guessing they use the "diagnose" instruction to retrieve this information 
( Diag 204 if memory serves correctly).

There are other ways to get this information including intercepting SMF 70 
records, and calling RMF monitor III programming interfaces.

Rob Scott
Rocket Software.

Sent from Samsung Mobile on O2
Sent from Outlook for Android

From: IBM Mainframe Discussion List  on behalf of 
Boesel Guillaume 
Sent: Thursday, September 28, 2023 2:20:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Retrieve LPAR weight without BCPii HWIQUERY ?

EXTERNAL EMAIL





Hi,

With HWIQUERY, I'm able to retrieve the weight of a LPAR but, of course, it 
doesn't work if BCPii is not started.

Mainview (LPARACT view) or Sysview (PRISM command) are able to retrieve this 
information on LPARs without BCPii.

Is somebody could help me to understand how products like Mainview or Sysview 
are able to retrieve the weight of a LPAR without BCPii ?

Thank you for your help,
Regards

Guillaume

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



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


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


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

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

[Ituriel do Neto]

I don't believe we are having this kind of discussion here.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sexta-feira, 15 de setembro de 2023 às 15:34:14 BRT, Bill Johnson 
<0047540adefe-dmarc-requ...@listserv.ua.edu> escreveu: 





Are you that naive? Ever been to Share? The current makeup of mainframe systems 
programmers is 65% white, 15% Asian, 9% Hispanic & 5% African American. 
Factoring in most of the heavy posters are over 50, the demographics are even 
more white since almost all systems programmers who got into IT in the 50’s 
through the 70’s were almost exclusively white. Guess what? I can also tell 
which people are Jewish, Asian, Hispanic, Scandinavian, Irish, and most other 
ethnicities. That’s not nearly as easy but it’s not as difficult as you’d 
think. I’d bet Oujeski isn’t a black guy. My Father in Law’s name was Majewski.

Almost all IT workers back then were men too. Ever notice the absence of female 
posters here?


A simple check from the bureau of labor statistics from the 50's, 60's, and 
70's is quite the fantasy buster I need.



Sent from Yahoo Mail for iPhone


On Friday, September 15, 2023, 12:55 PM, Seymour J Metz  wrote:

Only in your fantasy world is it possible to tell the skin color of an e-mail 
poster whom you have never met. I have you reason to believe that your 
antagonists are mostly White, and no reason to believe your implicit claim not 
to be. For all I know, you might be a klan member lying about his skin color.

Now, statistically, it's likely that most of the US posters calling you out are 
White, but this is an international list.


From: IBM Mainframe Discussion List  on behalf of 
Bill Johnson <0047540adefe-dmarc-requ...@listserv.ua.edu>
Sent: Friday, September 15, 2023 12:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: AI will surpass human intelligence!

So no problem with his attack on me, but I retaliate and it’s banning time. 
This is a white frat boy cult site. Nobody dares challenge the hierarchy.


Sent from Yahoo Mail for iPhone


On Friday, September 15, 2023, 12:00 PM, Michael Oujesky 
 wrote:

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




--
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 Extract Using to find the user id who deleted datasets

[Ituriel do Neto]

Hi,

There is a utility on CBT site that may help you to find it.
It is called DAF.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 4 de setembro de 2023 às 11:59:36 BRT, Sathish Kumar 
 escreveu: 





Hi Team,

One of our system datasets someone deleted we are not sure who deleted
those datasets.  How we can find which user ID deleted a dataset?

I tried to run the SMF extract job using record type 65 but was not able to
find it.

Pls suggest me

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

SCRT doubt

[Ituriel do Neto]

Hi all,

I have a silly doubt about SCRT and would like your expertise.
Is field "Machine MSU Consumed" measured using the same period of
"Machine Peak Utilization", from 2nd day to 1st day of next month, or is this 
computed
from first to last day of the month ?

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

Re: Char to Hex

[Ituriel do Neto]

Curtis,

Thank you.
Brillant.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 13 de junho de 2023 às 16:23:23 BRT, Pew, Curtis G 
 escreveu: 





On Jun 13, 2023, at 2:16 PM, Ituriel do Neto 
<03427ec2837d-dmarc-requ...@listserv.ua.edu<mailto:03427ec2837d-dmarc-requ...@listserv.ua.edu>>
 wrote:

Sorry, i was not clear.
I mean in assembler, not Rexx or any other language.


Use TR to convert C’A’, C’B’, etc. to x’FA’, x’FB’, etc. and then PACK one more 
byte than what you need.


--
Curtis Pew
ITS Campus Solutions
curtis@austin.utexas.edu<mailto:curtis@austin.utexas.edu>





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

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

Re: Char to Hex

[Ituriel do Neto]

Hi Kolusu,

Actually I need to generate X'0123AB' from X'F1F2F3C1C2'


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 13 de junho de 2023 às 16:19:11 BRT, Sri h Kolusu 
 escreveu: 





> I need to convert C'123AB' to X'0123AB'

Ituriel,

HEX of 123AB is  F1F2F3C1C2

Sort can convert character to hex and vice versa.

//SYSIN    DD *
  OPTION COPY
  INREC BUILD=(01,05,HEX)
/*

Looks like you just want to pad leading zero?

Thanks,
Kolusu



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

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

Re: Char to Hex

[Ituriel do Neto]

Hi,

Sorry, i was not clear.
I mean in assembler, not Rexx or any other language.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 13 de junho de 2023 às 16:10:46 BRT, Radoslaw Skorupka 
<0471ebeac275-dmarc-requ...@listserv.ua.edu> escreveu: 





W dniu 13.06.2023 o 21:05, Ituriel do Neto pisze:
> Hi all,
>
> I don't want to reinvent the wheel, so I would be grateful for your advice.
> I need to convert C'123AB' to X'0123AB'
>
> Any ideas?

Did you check REXX functions like X2C and C2X?

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

Char to Hex

[Ituriel do Neto]

Hi all,

I don't want to reinvent the wheel, so I would be grateful for your advice.
I need to convert C'123AB' to X'0123AB'

Any ideas?


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

UCB primary or secondary

[Ituriel do Neto]

HI all,

In a PPRC environment, is there any way to discover using SMF if a specific
UCB is a primary or secondary volume?

I saw that SMF 74 presents the subchannel set information, which can be used to 
identify 
if the volume matches this primary/secondary information, but it does not apply 
to all cases 
because it is possible to have a PPRC established between volumes in the same 
subchannel set.

Any help is appreciated.

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

Re: Almost gone

[Ituriel do Neto]

Sorry to hear this.
Your contributions over the years were very important, and I hope you continue 
in this business.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 29 de março de 2023 às 12:47:03 BRT, Seymour J Metz 
 escreveu: 





I get a lot of those from Linkedin.

If you have HLASM experience and are looking, contact me offline.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
rpinion865 [042a019916dd-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, March 29, 2023 11:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Almost gone

I will second that.  There are still job listings for remote system 
programmers, if you are interested in that.




Sent with Proton Mail secure email.

--- Original Message ---
On Wednesday, March 29th, 2023 at 11:32 AM, Lionel B. Dyck  
wrote:


> Thank you for ALL your contributions to the community.
>
>
> Lionel B. Dyck <><
>
> Website: 
> https://secure-web.cisco.com/1xJFuqNrru0ZqT2JGu5itdw9MO4ZUyI0vr91g5CZOmjM6rkShgJP0a1WBHACG6aGsKQjHX4KMB1aNCenJzZ1dUZIXRe7Ud5XlW4xj-tmhShoEf2jgwQQVCxN1ubyTjyEW3-wCmzX8BEkA2dCpCosI7-cRBaxoTDtl-4_0mYLMW4x7rDjpqUmuaArmwiz1P7Dg1eegg7LdUBy34lYgRj4gKwmhMRbWDyOIfe5ys9g8n8IBpAGz3WkgeVaDw_IBoW5vEvVHpiRaE0p88-d9iHUHuxV-J6FFuky9hrxib14SqM1vhj9YcM7RfkfGDSl_MBNwUbbprLMBh8qOMKoNCVm_kZCZrbyACdkbLVkWdQ6B6KaeqN44X4SW3qArJ5EGnph8c0o3E9nC8KcEbNKP7we5RpEj0_TWfXHVOiG1JbjYIJ4/https%3A%2F%2Fwww.lbdsoftware.com
> Github: 
> https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgithub.com%2Flbdyck=05%7C01%7Csmetz3%40gmu.edu%7C5af7d7f889cd4152872708db306b2c53%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638157009093635866%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C=kcMFd3xJCRUG8rxtMjMwKU585bxjuPVXhKFDrWLObk8%3D=0
>
> “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 IBM-MAIN@LISTSERV.UA.EDU On Behalf Of 
> John McKown
>
> Sent: Wednesday, March 29, 2023 10:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Almost gone
>
> HealthMarkets z9BC is shutting down. User access will be removed 5Apr. CICS 
> will be unavailable after 31Mar. The last day is at the end of April. Most of 
> the equipment is so old it is being destroyed, except for the tape drives 
> which are being sold for parts. SCRT will be run on 2May. I'll be on the 
> payroll until the beginning of August in lieu of severance.
>
> --
> 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: Question for our international friends (mostly)

[Ituriel do Neto]

In Portuguese, we pronounce it like "six".


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sexta-feira, 17 de março de 2023 às 17:35:02 BRT, Bob Bridges 
 escreveu: 





In English the letter 'z' is a voiced 's'.

I believe the Italians pronounce it 'ts' like the Germans.

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

/* If you're going to walk on thin ice, you may as well dance. */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bernd Oppolzer
Sent: Friday, March 17, 2023 16:10

not exactly "six" ... more like "tsix", the first letter sounds like a Z in 
Germany, a letter T followed by a letter S.

It comes to my mind that most other languages don't pronounce the letter Z this 
way, only we Germans do ... the other (like French and English) simply say S.
For example zebra. How do you pronounce it? The word is the same in all three 
languages, I guess ...
We say t-s-ebra.

--- Am 17.03.2023 um 20:36 schrieb René Jansen:
> I’ve heard Germans say ‘six’; in Dutch we say ‘kicks’ like the Brits.

--
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: linklist error at IPL

[Ituriel do Neto]

I used to work for a company and during this time we developed an SYSREXX 
launched as soon as possible after IPL, that has the following purposes:

a) Using Showzos, it takes a photo of the current IPL, saving the information 
into a Dataset GDG. It has information about IPL addresses, APF libraries, 
Linklist, Lpa, subsystems, and so. Very useful if you want some information 
from past IPLs.

b) It lists the current Linklist and APF, and compares them to the PROGxx 
member of PARMLIB. If something is missing or different, a WTO is issued.

c) It also checked if all LPA Datasets were on disk.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 16 de março de 2023 às 21:46:16 BRT, Mark Jacobs 
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> escreveu: 





Personally I use Netview's CANZLOG functionally post-ipl to review syslog, 
filtering on descriptor codes that I find interesting. Adding this to your 
PROGxx member allows Netview to view messages that were issued prior to the 
subsystem being initialized, including NIP messages. 

EXIT ADD EXITNAME(CNZ_MSGTOSYSLOG) MODNAME(DSI4LCUI)

Mark Jacobs 

Sent from ProtonMail, Swiss-based encrypted email.

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


--- Original Message ---
On Thursday, March 16th, 2023 at 8:31 PM, Mark Zelden  wrote:


> I know there are lots of critical errors that can happen during NIP so I 
> don't know
> exactly where to draw the line, but it would be great if the OS could flag 
> things like
> this (missing LNKLST library, missing LPA library or MLPA, missing SVCs) and 
> then
> reflect the error in a health check post IPL. Normal console automation could 
> catch
> that easily and warn someone and it could be fixed and the system re-IPLed at 
> the time.
> 
> Personally, for planned IPLs I always check NIP on at least on one system in 
> a sysplex
> if multiple systems are being IPLed (parms / sysres are shared anyway).
> 
> Regards,
> 
> Mark
> --
> Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
> ITIL v3 Foundation Certified
> mailto:m...@mzelden.com
> Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
> 
> 
> On Thu, 16 Mar 2023 17:20:36 -0500, Steve Horein steve.hor...@gmail.com wrote:
> 
> > Do you have any kind of automation package available to you?
> > 
> > On Thu, Mar 16, 2023 at 8:11 AM Richard McIntosh <
> > richard.mcint...@oracle.com> wrote:
> > 
> > > Is there anyway to get alerted to a linklist error duing the IPL process.
> > > The error messages come out to early for any MPF processing to hilite it
> > > and they rolled by to quick for operations to notice and caused TLMS to 
> > > not
> > > get initialized. Dataset is not in master catalog and the wrong volser was
> > > specified.
> > > 
> > > IGGN307I SYSP01,SYSR.TLMS.R14MA.CTAPLINK,DATA SET NOT FOUND ON
> > > VOLUME
> > > 
> > > IEA716I UNABLE TO OPEN LIBRARY - LNKLST DATA SET IGNORED
> > > 
> > > SYSR.TLMS.R14MA.CTAPLINK
> > > 
> > > I googled an old (18 years ago) message about someone using the IEAVMXIT
> > > exit to check some storage to see if any error flags were set, but there
> > > was no mention of what storage it was.
> > > 
> > > Thanks
> > > 
> > > Richard McIntosh
> > > 
> > > --
> > > 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: CS/CDS instruction

[Ituriel do Neto]

Can we detect if a specific feature is available in the current hardware?


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sábado, 11 de março de 2023 às 14:05:12 BRT, Paul Gilmartin 
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> escreveu: 





On Sat, 11 Mar 2023 00:03:06 -0800, Leonard D Woren wrote:

>If some particular instruction set feature is installed, the 
>definition of ASI/AGSI is enhanced to serialize the update, making it 
>a simpler solution than a CDS loop or PLO.
>
>In some performance testing a while back on a z14 or z15 which I think 
>had the above serialization feature, the execution times for a very 
>large number of executions of L / AHI / ST were very close to the same 
>count of ASI.  If I recall, the ASI was a few percent slower, I guess 
>because of the serialization.  I.e., unless you're doing abnormal 
>tests as I did, you won't notice the difference.
>

>From the PoOps (excerpted):
  The storage-operand update reference for the follow- ing
  instructions appears to be an interlocked-update reference as
  observed by other CPUs and channel programs.

• TEST AND SET
• COMPARE AND SWAP
(of course)

• AND (NI and NIY), when the interlocked-access facility 2 is installed
• OR (OI and OIY), when the interlocked-access facility 2 is installed
(at last!)

• ADD IMMEDIATE (ASI and AGSI), when the interlocked-access facility
  1 is installed and the first operand is aligned on an integral
  boundary corresponding to its size

The feature-dependent instructions are treacherous.  Programmers must
avoid them in multi-tasking code intended to be portable.

I consider it bad hardware design to introduce feature-dependent
instructions.  They should have remained invalid operations on models
lacking the interlock facility.

I believe NI and OI are primeval: they antedate multiprocessors and
became unsafe only at the advent of multiprocessors.

-- 
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: DLF and Hiperbatch

[Ituriel do Neto]

Hi,

In the 90's and early 2000's i worked for a company that used Hiperbatch with a 
significant performance boost in batch processing.

I don't think is a viable choice anymore, mainly because of Sysplex processing 
and the evolution of storage subsystems.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 13 de março de 2023 às 14:54:58 BRT, Mark Jacobs 
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> escreveu: 





Nope. Was never active at $currentjob, $previousjob-1, $previousjob-2, which 
covers the past 28 years of my career.

Mark Jacobs 

Sent from ProtonMail, Swiss-based encrypted email.

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


--- Original Message ---
On Monday, March 13th, 2023 at 1:33 PM, Lennie Dymoke-Bradshaw 
<032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:


> While working at multiple sites I have seen customers activating the DLF
> address space often. DLF supports a facility known as Hiperbatch, which was
> introduced in the early 1990s. Hiperbatch is a way of making data available
> in expanded storage from one job step of a batch job to another job step,
> thereby reducing I/O. (Hope you all remember expanded storage folks.) The
> manual for Hiperbatch is no longer distributed with those for z/OS but is
> still available. It is dated 1994 and is still at Version 1 I believe. DLF
> is controlled from the COFDLFxx member of PARMLIB. I understand there are 3
> ways to make a dataset eligible for Hiperbatch assistance,
> 
> 1. Through a RACF profile in the DLFCLASS class
> 2. Through the DLF exit (specified in the COFDLFxx member)
> 3. Through the OPC/ESA (long since renamed) special resources dialog,
> also using a DLF exit.
> 
> 
> 
> I think that if DLF is active and the DLFCLASS class is active then each
> data set OPEN will cause an extra RACF check to the DLFCLASS class to see if
> the data set is eligible. I have seen these checks in zSecure Access
> Monitor.
> 
> 
> 
> So I have two questions. Number 1 is for most people.
> 
> Is anyone still using Hiperbatch?
> 
> 
> 
> Question 2 is for IBM.
> 
> In many cases we can simply not start DLF and inactivate the DLFCLASS class
> and thereby save processing cycles. What is the downside to this?
> 
> 
> 
> 
> 
> Lennie Dymoke-Bradshaw
> 
> https://rsclweb.com/ https://rsclweb.com
> 
> 
> 
> 'Dance like no one is watching. Encrypt like everyone is.'
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> 
> --
> 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: CS/CDS instruction

[Ituriel do Neto]

Guys,

Thank you, that's exactly what I need. 
I don't know how I didn't see it in Pop


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 1 de março de 2023 às 18:34:12 BRT, Seymour J Metz 
 escreveu: 





In addition to the obvious instructions Phil mentioned, there is also PLO. I 
don't have any relevant performance data.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Ituriel do Neto [03427ec2837d-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, March 1, 2023 3:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: CS/CDS instruction

Hi all,

Is there a similar instruction to CS or CDS, but using 64 bits register ?

I have a double word that contains a counter and using 64 bits instructions
would be faster to increment this value than manipulate it with other storage
areas and an even-odd pair of 32 bits registers.

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

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

CS/CDS instruction

[Ituriel do Neto]

Hi all,

Is there a similar instruction to CS or CDS, but using 64 bits register ?

I have a double word that contains a counter and using 64 bits instructions
would be faster to increment this value than manipulate it with other storage
areas and an even-odd pair of 32 bits registers.

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

Re: Sv: CLIST for APF and link list datasets

[Ituriel do Neto]

Lots of possibilities

TSO IPLINFO
TSO SHOWZOS
TSO MXI
TSO ISRDDN
TSO TASID


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 15 de fevereiro de 2023 00:12:15 BRT, Lars Höglund 
 escreveu: 





And with parm like LINK / APF / LPA (or without parm)

-Ursprungligt meddelande-
Från: IBM Mainframe Discussion List  För rpinion865
Skickat: den 14 februari 2023 20:56
Till: IBM-MAIN@LISTSERV.UA.EDU
Ämne: Re: CLIST for APF and link list datasets

DDLIST from any ISPF command line.




Sent with Proton Mail secure email.

--- Original Message ---
On Tuesday, February 14th, 2023 at 2:47 PM, Bill Giannelli 
 wrote:


> I was shown a clist that had various options to display things like APFs and 
> LLA, etc.
> I am struggling to remember the clist name to run.
> I am hoping this vague question sparks someone's memory.
> does anyone know the clist?
> thanks
> Bill
> 
> --
> 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 puzzle

[Ituriel do Neto]

I would like to thank you all.
As expected It was a logic error, before the piece of code shown.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 31 de janeiro de 2023 15:58:01 BRT, Michael Babcock 
 escreveu: 





Exit IEFU86 is called first.  Do you have a U86 exit doing something first?

On Tue, Jan 31, 2023 at 12:30 PM Ituriel do Neto <
03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:

> I have done a small change, like below:
>
>                    USING SMFRCD0,R9
> DXSOTHR  CLI  SMF0RTY,128
>                      BL    DXSTYSU
>                      WTO  'IEFU83 EXIT INVOKED'
> **                  BAS  R8,DXMSG    <=== TEMP
> DXSTYSU    DS    0H                      *
>
> And when SMF 205 is generated, the WTO is issued, while when it is time
> for 206, nothing is WTOed, but the SMF is generated.
>
> Really, really strange.
>
> Best Regards
>
> Ituriel do Nascimento Neto
> z/OS System Programmer
>
>
>
>
>
>
> Em terça-feira, 31 de janeiro de 2023 13:03:09 BRT, Binyamin Dissen <
> bdis...@dissensoftware.com> escreveu:
>
>
>
>
>
> Are you checking the return code from WTO?
>
> Does the message show data from the SMF record or a boilerplate?
>
> The snippet looks fine.
>
> Show the code.
>
> On Tue, 31 Jan 2023 13:29:16 + Ituriel do Neto
> <03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> :>I'm facing a problem with SMF that is completely unusual, and maybe you
> can enlight me.
>
> :>I do have a program that generates SMF records and it is possible to
> specify the SMF number
> :>of any choice (bigger than 127). The SMF record is issued using SMFWTM
> macro.
>
> :>I also have an IEFU83 and IEFU84 SMF exits and since SMFWTM is being
> used, IEFU83 will
> :>be lunched to intercept the previously generated SMF record.
> :>Since it is in test, the first thing IEFU83 does is to WTO the SMF type
> and subtype it is processing,
> :>for debugging purposes.
>
> :>Now comes the strange part. if the SMF number is between 128 and 205
> (inclusive), the WTO is
> :>issued normaly, but if the SMF number is bigger than 205 it seems the
> exit is not invoked because
> :>no WTO is issued at all.
> :>The SMF is generated correctly because I can extract it from SYS1.MANx
> datasets.
>
> :>Here goes a piece of code of IEF83/4 to ilustrate.
>
> :>                    USING SMFRCD0,R9              * MAPS SMF RECORD
> HEADER
> :>DXSOTHR  CLI  SMF0RTY,128            * SMF SYSTEM RECORD (<128)?
> :>                    BL    DXSTYSU                * YES, CHECK
> TYPE/SUBTYPE/PROD
> :>                    BAS  R8,DXMSG    <=== TEMP  * DISPLAY AND RETURN
>
> :>DXSTYSU  DS    0H
>
> :>Are there any kind of restriction because it is completely crazy.
>
> --
> 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
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

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

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

Re: SMF puzzle

[Ituriel do Neto]

I have done a small change, like below:

                    USING SMFRCD0,R9                   
DXSOTHR   CLI   SMF0RTY,128             
                     BL    DXSTYSU                 
                     WTO   'IEFU83 EXIT INVOKED'              
**                  BAS   R8,DXMSG     <=== TEMP            
DXSTYSU    DS    0H                      *

And when SMF 205 is generated, the WTO is issued, while when it is time for 
206, nothing is WTOed, but the SMF is generated.

Really, really strange.

Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 31 de janeiro de 2023 13:03:09 BRT, Binyamin Dissen 
 escreveu: 





Are you checking the return code from WTO?

Does the message show data from the SMF record or a boilerplate?

The snippet looks fine.

Show the code.

On Tue, 31 Jan 2023 13:29:16 +0000 Ituriel do Neto
<03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:

:>I'm facing a problem with SMF that is completely unusual, and maybe you can 
enlight me.

:>I do have a program that generates SMF records and it is possible to specify 
the SMF number 
:>of any choice (bigger than 127). The SMF record is issued using SMFWTM macro.

:>I also have an IEFU83 and IEFU84 SMF exits and since SMFWTM is being used, 
IEFU83 will
:>be lunched to intercept the previously generated SMF record.
:>Since it is in test, the first thing IEFU83 does is to WTO the SMF type and 
subtype it is processing,
:>for debugging purposes.

:>Now comes the strange part. if the SMF number is between 128 and 205 
(inclusive), the WTO is 
:>issued normaly, but if the SMF number is bigger than 205 it seems the exit is 
not invoked because 
:>no WTO is issued at all. 
:>The SMF is generated correctly because I can extract it from SYS1.MANx 
datasets.

:>Here goes a piece of code of IEF83/4 to ilustrate.

:>                    USING SMFRCD0,R9              * MAPS SMF RECORD HEADER    
   
:>DXSOTHR  CLI   SMF0RTY,128             * SMF SYSTEM RECORD (<128)?    
:>                    BL    DXSTYSU                 * YES, CHECK 
TYPE/SUBTYPE/PROD 
:>                    BAS   R8,DXMSG     <=== TEMP  * DISPLAY AND RETURN        
     
:>DXSTYSU   DS    0H   

:>Are there any kind of restriction because it is completely crazy.

--
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: SMF puzzle

[Ituriel do Neto]

Mr Pinion,

Thank you, but its not this problem.
The SMFPRMxx is correct, otherwise the SMF record would not be generated.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 31 de janeiro de 2023 10:48:01 BRT, rpinion865 
<042a019916dd-dmarc-requ...@listserv.ua.edu> escreveu: 





Check your PARMLIB SMFPRMxx member to insure the higher number is processed.






Sent with Proton Mail secure email.

--- Original Message ---
On Tuesday, January 31st, 2023 at 8:29 AM, Ituriel do Neto 
<03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:


> Hi all,
> 
> I'm facing a problem with SMF that is completely unusual, and maybe you can 
> enlight me.
> 
> I do have a program that generates SMF records and it is possible to specify 
> the SMF number
> of any choice (bigger than 127). The SMF record is issued using SMFWTM macro.
> 
> I also have an IEFU83 and IEFU84 SMF exits and since SMFWTM is being used, 
> IEFU83 will
> be lunched to intercept the previously generated SMF record.
> Since it is in test, the first thing IEFU83 does is to WTO the SMF type and 
> subtype it is processing,
> for debugging purposes.
> 
> Now comes the strange part. if the SMF number is between 128 and 205 
> (inclusive), the WTO is
> issued normaly, but if the SMF number is bigger than 205 it seems the exit is 
> not invoked because
> no WTO is issued at all.
> The SMF is generated correctly because I can extract it from SYS1.MANx 
> datasets.
> 
> Here goes a piece of code of IEF83/4 to ilustrate.
> 
> USING SMFRCD0,R9 * MAPS SMF RECORD HEADER
> DXSOTHR CLI SMF0RTY,128 * SMF SYSTEM RECORD (<128)?
> BL DXSTYSU * YES, CHECK TYPE/SUBTYPE/PROD
> BAS R8,DXMSG <=== TEMP * DISPLAY AND RETURN
> DXSTYSU DS 0H
> 
> Are there any kind of restriction because it is completely crazy.
> 
> 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

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

SMF puzzle

[Ituriel do Neto]

Hi all,

I'm facing a problem with SMF that is completely unusual, and maybe you can 
enlight me.

I do have a program that generates SMF records and it is possible to specify 
the SMF number 
of any choice (bigger than 127). The SMF record is issued using SMFWTM macro.

I also have an IEFU83 and IEFU84 SMF exits and since SMFWTM is being used, 
IEFU83 will
be lunched to intercept the previously generated SMF record.
Since it is in test, the first thing IEFU83 does is to WTO the SMF type and 
subtype it is processing,
for debugging purposes.

Now comes the strange part. if the SMF number is between 128 and 205 
(inclusive), the WTO is 
issued normaly, but if the SMF number is bigger than 205 it seems the exit is 
not invoked because 
no WTO is issued at all. 
The SMF is generated correctly because I can extract it from SYS1.MANx datasets.

Here goes a piece of code of IEF83/4 to ilustrate.

                    USING SMFRCD0,R9              * MAPS SMF RECORD HEADER      
 
DXSOTHR  CLI   SMF0RTY,128             * SMF SYSTEM RECORD (<128)?    
                    BL    DXSTYSU                 * YES, CHECK 
TYPE/SUBTYPE/PROD 
                    BAS   R8,DXMSG     <=== TEMP  * DISPLAY AND RETURN          
   
DXSTYSU   DS    0H   

Are there any kind of restriction because it is completely crazy.

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

Re: ZFS Address Space, shared ENQ but filesystem isn't mounted

[Ituriel do Neto]

Maybe there is a subdirectory pointing to another ZFS still mounted


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 29 de dezembro de 2022 09:04:24 BRT, Mark Jacobs 
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> escreveu: 





It came back with a file system not found message.

Mark Jacobs 

Sent from ProtonMail, Swiss-based encrypted email.

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


--- Original Message ---
On Wednesday, December 28th, 2022 at 11:46 PM, Lizette Koehler 
 wrote:


> I apologize if this has been asked and answered;
> 
> what does a D OMVS,F,N= xN is the name of the MVS filesystem
> 
> Sometimes it is not freed with a UNMOUNT FILESYS= because other mounts are 
> still active
> 
> 
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU On Behalf Of 
> Mark Jacobs
> 
> Sent: Wednesday, December 28, 2022 2:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ZFS Address Space, shared ENQ but filesystem isn't mounted
> 
> I issued a D GRS,RES=(*,name.of.file.system) command and it showed me that 
> ZFS had it allocated as shared on one system in the sysplex. No other address 
> space had the enqueue.
> 
> Mark Jacobs
> 
> 
> Sent from ProtonMail, Swiss-based encrypted email.
> 
> GPG Public Key - 
> https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com
> 
> 
> 
> 
> --- Original Message ---
> On Wednesday, December 28th, 2022 at 4:19 PM, Shelia Chalk 
> 03d9384cc8f1-dmarc-requ...@listserv.ua.edu wrote:
> 
> 
> 
> > Mark,
> > 
> > Have you tried going to 3.4 put in the zfs address space dataset and
> > in the command field type in whohas This will tell who has the dataset.
> > 
> > Thanks
> > Shelia C
> > 
> > -Original Message-
> > From: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU On Behalf
> > Of Mark Jacobs
> > 
> > Sent: Wednesday, December 28, 2022 11:53 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: ZFS Address Space, shared ENQ but filesystem isn't mounted
> > 
> > The ZFS address space has a shared enqueue on one of our ZFS file systems, 
> > but when I attempt to unmount it ZFS says it's not mounted. I attempted to 
> > manually mount it, failed with a filesystem is busy error. Any ideas on how 
> > to release the enqueue so I can delete the file system?
> > 
> > Mark Jacobs
> > 
> > Sent from ProtonMail, Swiss-based encrypted email.
> > 
> > GPG Public Key -
> > https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Fapi.
> > protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40proton
> > mail.com=05|01|SChalk%40TRUSTMARK.COM|080ecfd7b14e4ce75a5d08dae8f
> > c6bc8|518d66eacb8948c8a7b903cba11cde91|1|0|638078468085536783|Unknown|
> > TWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVC
> > I6Mn0%3D|3000|||=7Rmjq4ii%2BUkFkQ5IueOwDCLXif%2BJrA%2FnLWhKy5x%2
> > F2zA%3D=0
> > 
> > --
> > 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: RLSE - A question about releasing unused tracks in a DASD dataset

[Ituriel do Neto]

Hi,

ADRDSSU has a RELEASE primary command that can do it.

//S1       EXEC  PGM=ADRDSSU                                  
//*            PARM='TYPRUN=NORUN'                            
//SYSPRINT DD  SYSOUT=*                                       
//SYSIN    DD  *                                              
 RELEASE INCLUDE(HLQ.**)                              -      
    STORGRP(SGSMALL)  ADMIN                             -     
    SELECTMULTI(ALL)    /*   EVEN IF MULTIVOL     */          



Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 21 de dezembro de 2022 07:59:39 BRT, David Cole 
 escreveu: 





Hi Seymour,

WRT "OPEN/CLOSE", yeah. I don't either.



WRT "I know of no reason", It's been a long time since I wrote a 
program to read a directory, but if I did that, then the reason would 
be "to release space", of course.

In any case, writing a new program is not an option here. Also using 
any 3rd party tool is not an option either.

H. I wonder if IEBGENER can be tricked into reading a directory...



Dave Cole







At 12/21/2022 04:55 AM, Seymour J Metz wrote:
>Every release tool that I am aware of does an OPEN/CLOSE. I know of 
>no reason why a program would need to read the directory in order to 
>release space.
>Does ISPF create and delete a dummy member? If so, why is that required?
>--
>Shmuel (Seymour J.) Metz
>http://mason.gmu.edu/~smetz3
>
>>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on 
>>behalf of David Cole [dbc...@colesoft.com]
>>Sent: Wednesday, December 21, 2022 4:20 AM
>>To: IBM-MAIN@LISTSERV.UA.EDU
>>Subject: RLSE - A question about releasing unused tracks in a DASD  dataset
>>Is there a way to release unused tracks in a classic z/OS PDS but
>>without having to open and close it?
>>Or if opening/closing is required, is there a way to do that for a
>>PDS without knowing (or discovering) what members are in it, and
>>without creating a new member?
>>Obviously, I could write something, but I don't want to.
>>And I cannot rely on the presence of any program or TSO command that
>>does not come standard on a z/OS system?
>>I don't think there is a way to do this, but I'd love for someone to
>>prove me wrong.
>>David Cole
>>dbc...@gmail.com (personal)
>>dbc...@colesoft.com (business)
>>540-456-6518 (cell)
>>--
>>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: Transmitting SMF records

[Ituriel do Neto]

The idea is to send an SMF dataset from one z/OS to another one, but first, it 
needs to be downloaded to windows to be sent to us, also in windows. Once we 
have the file, we upload it to our mainframe to process it.

It is possible to split the original SMF dataset in smaller pieces but demands 
a lot of control, so it would be the last resource..


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 14 de dezembro de 2022 11:06:35 BRT, Matt Hogstrom 
 escreveu: 





Are you processing this on another z/OS system ?  You indicated you’re 
downloading it so I wanted to make sure I understand the requirements.

For “downloading”  are you using FTP, SFTP or SCP.  Are you processing the data 
on a non-Z platform ?

Matt Hogstrom
m...@hogstrom.org

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom



> On Dec 14, 2022, at 8:56 AM, Ituriel do Neto 
> <03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
> 
> Hi all,
> 
> I know we can TERSE or use XMIT a SMF dataset to generate a fixed-form 
> dataset,
> that can be downloaded in binary mode, transmitted, and then recovered 
> following
> the reverse order.
> My attempts of downloading the SMF dataset directly, in binary, and then 
> uploading
> it to another SMF dataset with the same DCB attributes did not work. The file 
> got 
> corrupted.
> 
> I have a customer that has a huge SMF dataset that can't be TERSED or XMITTED
> because of a lack of space.
> 
> Is there a way to send it, without previous use of XMIT or TRS ?
> 
> 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

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

Transmitting SMF records

[Ituriel do Neto]

Hi all,

I know we can TERSE or use XMIT a SMF dataset to generate a fixed-form dataset,
that can be downloaded in binary mode, transmitted, and then recovered following
the reverse order.
My attempts of downloading the SMF dataset directly, in binary, and then 
uploading
it to another SMF dataset with the same DCB attributes did not work. The file 
got 
corrupted.

I have a customer that has a huge SMF dataset that can't be TERSED or XMITTED
because of a lack of space.

Is there a way to send it, without previous use of XMIT or TRS ?

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

Re: To share or not to share DASD

[Ituriel do Neto]

Hi,

In the past, i used to work for a tiny shop with the same distribution you 
indicated. 
Only three Lpars and no Sysplex, no GRS.

At that time, we choose to make all disks available to all Lpars, but there was 
a segregation of Production, Development, and Sysprog volumes done by VOLSER. 
I don't remember the details anymore, but shared disks were labeled as SHR*, 
Production and development disks as PRD* and DEV*, and of course SYSRES, Page, 
spool, etc...

At IPL time, a small program was executed, searching all volumes and issuing V 
OFFLINE to those that do not belong to the appropriated Lpar. This program used 
wildcard masks to select what should remain ONLINE.

And, of course, MVS commands were protected in RACF, so only authorized userids 
can VARY ONLINE a volume.

It worked well for us, in this reality.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em sexta-feira, 25 de novembro de 2022 02:38:47 BRT, Joel C. Ewing 
 escreveu: 





But its not just a case of whether you trust they will not intentionally 
damage something, but the ease of accidentally causing integrity 
problems by not knowing when others have touched catalogs, volumes, or 
datasets on DASD that is physically shared but not known to be shared by 
the Operating System.  If many people are involved, the coordination 
procedures involved to prevent damage, assuming such procedures are even 
feasible, are a disaster waiting to happen.

 If volumes are SMS, all datasets must be cataloged and the associated 
catalogs must be accessed from any system that accesses those 
datasets.   If the systems are not in a relationship that enables proper 
catalog sharing, access and possible modification of the catalog from 
multiple systems causes the cached versions of catalog data to become 
out of sync with actual content on the drive when the catalog is altered 
from a different system, and there is a high probability the catalog 
will become corrupted on all systems.

Auditors are justified in being concerned whether independent RACF 
databases on multiple systems will always be in sync to properly protect 
production datasets from unintentional access or unauthorized access if 
test LPARs share access to production volumes.  There should always be 
multiple barriers to doing something bad because accidents happen -- 
like forgetting to change a production dataset name in what was intended 
to be test JCL.

There are just two many bad things that can happen if you try to share 
things that are only designed for sharing within a sysplex. The only 
relatively safe way to do this across independent LPARs is 
non-concurrently:   have a set of volumes and a catalog for HLQ's of 
just the datasets on those volumes that is also located on one of those 
volumes, and only have those volumes on-line to one system at a time and 
close, and deallocate all datasets and the catalog on those volumes 
before taking them offline to move them to a different system.

A much simpler and safer solution is to not share DASD volumes across 
LPARs not in the same sysplex, to maintain a unique copy of datasets on 
systems where they are needed, and to use a high-speed communication 
link between the LPARs to transmit datasets from one system to another 
when there is a need to resync those datasets from a production LPAR.

Joel C Ewing


On 11/24/22 21:38, Farley, Peter wrote:

> Not necessarily true in a software development environment where all members 
> of the team need to share all their data everywhere.  "Zero trust" is 
> anathema in a development environment.
>
> If you don't trust me then fire me.  It's cleaner that way.
>
> Shakespeare was *almost* right.  First get rid of all the auditors, *then* 
> get rid of all the lawyers.
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Lennie Dymoke-Bradshaw
> Sent: Thursday, November 24, 2022 5:24 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: To share or not to share DASD
>
> If you were asking in a security context, I would advise against it in nearly 
> all cases.
> Auditors will not like that a system's data can be accessed without reference 
> to the RACF (or ACF2, or TSS) system that is supposed to protect it.
>
> Lennie Dymoke-Bradshaw
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Gord Neill
> Sent: 24 November 2022 20:55
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: To share or not to share DASD
>
> G'day all,
> I've been having discussions with a small shop (single mainframe, 3 separate 
> LPARs, no Sysplex) regarding best practices for DASD sharing.  Their view is 
> to share all DASD volumes across their 3 LPARs (Prod/Dev/Test) so their 
> developers/sysprogs can get access to current datasets, but in order to do 
> that, they'll need to use GRS Ring or MIM with the associated overhead.  I 
> don't know of any other serialization products, and since this is not a 
> Sysplex environment, 

Re: WTO and IEF170I message

[Ituriel do Neto]

Pierre,

I have used MCSFLAG=HRDCPY with success


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em terça-feira, 18 de outubro de 2022 22:17:34 GMT+2, Charles Mills 
 escreveu: 





Yikes indeed!

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Abell
Sent: Tuesday, October 18, 2022 11:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: WTO and IEF170I message

And she was deemed to possibly your next President.  YIKES

John T. Abell    
Tel:            800-295-7608    Option 4
President 
International:  1-416-593-5578  Option 4
E-mail:  john.ab...@intnlsoftwareproducts.com
Fax:            800-295-7609

International:  1-416-593-5579


International Software Products
www.ispinfo.com
                                                
This email may contain confidential and privileged material for the sole use of 
the intended recipient(s). Any review, use, retention, distribution or 
disclosure by others is strictly prohibited. If you are not the intended 
recipient (or authorized to receive on behalf of the named recipient), please 
contact the sender by reply email and delete all copies of this message. 
Also,email is susceptible to data corruption, interception, 
tampering, unauthorized amendment and viruses. We only send and receive emails 
on the basis that we are not liable for any such corruption, interception, 
tampering, amendment or viruses or any consequence thereof.
    

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pierre Fichaud
Sent: Tuesday, October 18, 2022 2:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: WTO and IEF170I message

I issue a plain WTO :    wto  'This is a message'
I also issue a WTO  :    wto  text=dsa_wtotext,mf=(e,dsa_wtoarea)

In both cases the WTO appears in the SDSF LOG.

But I also get an IEF170I message for each WTO no matter the flavor.

IEF170I 3          This is a message

A WTO or WTOR macro requested a write-to-programmer (WTP) operation. The system 
was unable to complete WTP processing due to an error

3 means "The system issued the PUT macro to a system message data set, but 
failed."

The code runs in an exit but since SVCs are allowed in the exit, the code must 
execute in TCB mode.

Is there something in the WTO parameters that causes the IEF170 message to 
disappear ?
Maybe a combination of MCSFLAG, DESC and ROUTCDE ?

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

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

Re: Minor disaster

[Ituriel do Neto]

I don't know if it is a valid contribution since I don't
remember how to do it anymore, but in the past I have recovered deleted members 
with DITTO.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 28 de setembro de 2022 13:42:04 BRT, Michael Babcock 
 escreveu: 





Do you have an HSM backup of the PDSE?  Or a volume backup?  Otherwise I
don’t know.  BTW, I always have prompting turned on so that if I
accidentally hit D, I get a prompt verifying I really want to delete it.

On Wed, Sep 28, 2022 at 7:02 AM Lennie Dymoke-Bradshaw <
032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote:

> Aaargghhh!
>
> I just pressed "D" next to a PDSe member I was editing, instead of "S".
>
> I have generations set up for this PDSe, but I cannot see how to get to the
> member I just accidentally deleted.
>
> Is there a way to recover the member?
>
>
>
>
>
> Lennie Dymoke-Bradshaw
>
>   https://rsclweb.com
>
>
> 'Dance like no one is watching. Encrypt like everyone is.'
>
>
>
>
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead


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

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

Re: Superuser (su) in batch

[Ituriel do Neto]

You may try:

//STEP1  EXEC PGM=IKJEFT01                                   
//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC                        
//SYSTSPRT DD   SYSOUT=*                                                  
//SYSTSIN  DD   *                                                         
  PROF MSGID WTPMSG                                                       
  OSHELL su                                                               



Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 11 de agosto de 2022 10:07:58 BRT, Rob Schramm 
 escreveu: 





Coz toolkit is very easy to use for switching to superuser.

Rob

On Thu, Aug 11, 2022, 08:51 Boyer, William <
0442c7525a40-dmarc-requ...@listserv.ua.edu> wrote:

> My userid on z/OS is not a superuser but I have RACF READ access to
> BPX.SUPERUSER.  Occasionally as a Systems Programmer, I need to have
> perform something in USS that requires UID=0. In TSO I can switch to EUID=0
> by going to 3.17 (Utilities/Udlist) and type a su which seems to stay set
> for the entire length of the TSO session.  Is there a way do a su in batch
> and then copy files or adjust permits/owner etc.
>
> For example interactively, I can set my euid=0 with su in 3.17, then go to
> =6 and type in OPUT to copy files into USS to directories that my normal
> uid does not have permission but the OPUT works because I am still euid=0.
> I am looking for a way to do this in batch.
>
> Thanks
>
> William Boyer
> System Engineer Sr Advisor
>
> T  410-842-1706
> william.bo...@gdit.com
> One W. Pennsylvania Ave
> Towson, MD 21204
> www.gdit.com
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

>

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

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

Re: How To Handle RACROUTE logic

[Ituriel do Neto]

Hi,

I don't think you should do extra checking.

If the user is a member of a group and is not explicitly defined to access a 
specific profile, but the group he belongs is allowed to access it, then 
RACROUTE should succeed.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 23 de junho de 2022 12:55:44 BRT, esst...@juno.com 
 escreveu: 





Hello,
.
I'm not a RACF person.
.
I'm developing two routines to check a userids authority to access a resource 
in a RACF Facility Class.
. 
One routine issues RACROUTE REQUEST=FATSAUTH, and the other issues RACROUTE 
REQUEST=AUTH. 
Both requests work well when checking for an individual user.
.
The User Id may or may not be part of a Group that has access to a Facility 
Class Resource.
..
How should both functions approach this, without knowing if the user belongs to 
a RACF group ? 
Should I examine the ACEE First, to see if the User Id is part of a Group ?
Do I need to issue two RAROUTE calls in each routine one for a single userid 
and a second for the userids group ?
Can I issue the RACROUTE for a single user regardless if the user id belongs to 
a group or not ?
. 
I would prefer to issue a single RACROUTE call in each routine.
.
I need help understanding this.
.
What is the recommended approach ?
.
paul.
..

--
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 management from BMC

[Ituriel do Neto]

In the past, the company i worked for used to have ControlT. Amazing product, 
with a very nice user interface


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 13 de junho de 2022 08:54:57 BRT, Jack Zukt 
 escreveu: 





The tso/ispf one. I have not seen the zosmf one yet.
Jack


On Mon, Jun 13, 2022, 05:21 Timothy Sipples  wrote:

> Jack Zukt wrote:
> >Between those three, I would say that rmm has an unfriendly user
> interface,
> >but I suppose that is just the IBM way. I really liked Control-M ease of
> >use. CA1 was, and I am sure it still is, a great product, and the
> >transition to Control-My was easy to do. The transition to rmm was more
> >painful due to the user interface not being very intuitive.
>
> Which user interface? There are at least 3 of them, and one of them is
> quite new. z/OS DFSMSrmm started offering a z/OS Management Facility
> plug-in fairly recently, and it’s seen some improvements already. Here’s a
> tour (circa July, 2020):
>
> https://www.ibm.com/support/pages/system/files/inline-files/edgdoc.pdf
>
> — — — — —
> Timothy Sipples
> Senior Architect
> Digital Assets, Industry Solutions, and Cybersecurity
> IBM zSystems/LinuxONE, Asia-Pacific
> sipp...@sg.ibm.com
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

>

--
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 -TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K

[Ituriel do Neto]

Hi,

If by any chance your ACS routine is defining the dataset as multivolume, the 
additional entries in catalog, even if not used, will occupy a TIOT slot.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 13 de junho de 2022 09:32:12 BRT, Seymour J Metz 
 escreveu: 





What size volumes are you using? EAV might help you reduce the number of 
extents.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Ron 
Thomas [ron5...@gmail.com]
Sent: Saturday, June 11, 2022 12:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: dfsort -TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K

Hello -

We are splitting a very large files in to 750 files dynamically based on key , 
which means if the key changes the file is moved to the respective ones


we are getting the message

STEPBB - TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K
STEPBB - STEP WAS NOT EXECUTED.

and hence the step is not getting executed .

File LRECL = 500 Key is from position 19,4.

Here is the control card used

SORT FIELDS=COPY
OUTREC IFTHEN=(WHEN=GROUP,KEYBEGIN=(19,4),PUSH=(501:ID=3))
OUTFIL FNAMES=OUT001,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,001)
OUTFIL FNAMES=OUT002,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,002)
OUTFIL FNAMES=OUT003,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,003)
OUTFIL FNAMES=OUT004,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,004)
OUTFIL FNAMES=OUT005,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,005)
OUTFIL FNAMES=OUT006,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,006)
OUTFIL FNAMES=OUT007,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,007)
OUTFIL FNAMES=OUT008,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,008)
---
--
OUTFIL FNAMES=OUT749,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,749)
OUTFIL FNAMES=OUT750,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,750)


so could some let me know how to get this fixed ? of is there any other way we 
can build this one ?


Regards
Ron T

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

GCL and AGC

[Ituriel do Neto]

Hi all,

I have used GCL (Group Capacity Limit) in the past and someone has suggested
AGC (Absolute Group Capping).

What is the difference between them?

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

Re: [External Sender] Re: IBM BLSR subsystem

[Ituriel do Neto]

HI,

If possible, I would like also to take a look at this SORT.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 16 de maio de 2022 15:50:51 BRT, Carroll, William 
<0423ec9b7fa0-dmarc-requ...@listserv.ua.edu> escreveu: 





I would love to see your sort, I am attempting that same project at my site.

Thank You
bill

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Massimo Biancucci
Sent: Monday, May 16, 2022 1:40 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External Sender] Re: IBM BLSR subsystem

Hi,

we changed many JCLs using " AMP=('ACCBIAS=DO')" and succeded in CPU and 
elapsed time reduction (up to 50% in few cases).

We used SMF64 to choose the best candidates.
If needed, I can share a simple SORT step to convert SMF64 to "readable"
CSV file.

Best regards.
Max

Il giorno lun 16 mag 2022 alle ore 16:36 Pommier, Rex < 
rpomm...@sfgmembers.com> ha scritto:

> Hi list,
>
> Is the BLSR subsystem (batch local shared resources) still a 
> viable/valuable thing or has it been replaced by something 
> bigger/better/faster?  I seem to be stuck in the  mid-90s because the 
> most current documentation I can find on it is from MVS/ESA 5.1 dated 
> 1994.  Is there more current documentation on how to use it and how it 
> works?  Has it been replaced and deprecated?  I just had a developer 
> use it last week and experienced a 40+ reduction in I/Os but I wanted 
> to read up on its limitations - especially around using it on a shared VSAM 
> dataset.  However
> I can't find anything newer than 25+ years old.  I did multiple internet
> searches which is where I found the ESA manual.  I checked the 
> knowledge center and my own z/OS 2.2 and 2.4 collections all to no avail.
>
> Thanks,
>
> Rex
>
> --
> The information contained in this message is confidential, protected 
> from disclosure and may be legally privileged. If the reader of this 
> message is not the intended recipient or an employee or agent 
> responsible for delivering this message to the intended recipient, you 
> are hereby notified that any disclosure, distribution, copying, or any 
> action taken or action omitted in reliance on it, is strictly 
> prohibited and may be unlawful. If you have received this 
> communication in error, please notify us immediately by replying to 
> this message and destroy the material in its entirety, whether in electronic 
> or hard copy format. 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



WARNING: All information contained in, and/or attached to, this message is 
privileged and/or confidential and is protected from disclosure.  This email 
may contain non-public information that includes, but it not limited to 
personally identifiable information of a natural person.  The unauthorized 
access, use, modification, alteration, or disclosure of such non-public 
information is prohibited.  If  you are not the intended recipient, you are 
hereby notified that any unauthorized dissemination, distribution or copying of 
this communication is strictly prohibited.  Please notify the sender 
immediately if you have received this email in error, and delete it from your 
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: Producing throwaway SMF?

[Ituriel do Neto]

If you're looking for a product that intercepts SMF records, writes them to 
databases and, optionally, discards them before writing to SMF datasets or 
Logstreams, there is one named ZETALY Streaming Agent, from ZETALY.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em segunda-feira, 9 de maio de 2022 15:34:17 BRT, Larre Shiller 
<0102cb4997b0-dmarc-requ...@listserv.ua.edu> escreveu: 





Hi Mike -

I know it's not a "Product", but we use a simple SMF exit for this very purpose.

Larre Shiller
US Social Security Administration 
“The opinions expressed in this e-mail are mine personally and do not 
necessarily reflect the opinion of the US Social Security Administration or the 
US Government.”

--
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: CIBXUTOK fetch protected

[Ituriel do Neto]

Hi,

I have done some extra tests and Mr. Steve Smith was correct, CIBX is not 
available to batch jobs until a MODIFY is issued.

Thank you again for your time and support


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quinta-feira, 28 de abril de 2022 10:18:20 BRT, Ituriel do Neto 
<03427ec2837d-dmarc-requ...@listserv.ua.edu> escreveu: 





Gentlemen,

Thank you very much for your support.
I'll analyze the code and let you know any news.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 27 de abril de 2022 21:42:57 BRT, Seymour J Metz 
 escreveu: 





Fetch protection is is S0c$-04. Please show your code for accessing the CIB.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Ituriel do Neto [03427ec2837d-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, April 27, 2022 1:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: EXTERNAL: CIBXUTOK fetch protected

Mike,

I don't think so, but to remove all doubts i have associated the PROCNAME in 
class STARTED with my userid.

Now both STC and batch job run with the same userid, but when batch, the 
CIBXTOKN continues to be fetch protected giving me and abend S0C4-11


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 27 de abril de 2022 13:07:03 BRT, Mike Schwab 
 escreveu:





Is there a RACF setting to allow a particular user to run any APF
program, or a resource authorization to run this APF program?

On Wed, Apr 27, 2022 at 3:28 PM Ituriel do Neto
<03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi,
>
> The loadlib is APF in both cases because i'm using the same JCL.
>
> For instance, as STC it is started by the command S PROCNAME, while as a 
> batch job, using the following JCL:
>
> //JOBNAME (),CLASS=A,MSGCLASS=X,REGION=0M
> //A1            EXEC PROCNAME
>
> The PROC is the same, expanded from the same PROCLIB.
>
> The only difference i could perceive is when it runs as batch, it is assigned 
> to my userid, and as STC, it is assigned a different one defined in STARTED 
> class.
>
>
> Ituriel do Nascimento Neto
> z/OS System Programmer
>
>
>
>
> Em quarta-feira, 27 de abril de 2022 10:45:47 BRT, Crawford, Robert C. 
> <01feadb2c2d2-dmarc-requ...@listserv.ua.edu> escreveu:
>
>
>
>
>
> Does your program get loaded out of an APF authorized library when it runs as 
> a STC?  What's in the STEPLIB concatenation for the batch job?  One 
> unauthorized library makes the whole STEPLIB unauthorized.
>
> Robert Crawford
> Mainframe Management
> United Services Automobile Association
> (210) 913-3822
>
> “Моє око! Я не повинен брати в нього пудинг!”
> Emma Andijewska
> Please send requests to mainframe management through our front door at  
> go/mfmfrontdoor
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Ituriel do Neto
> Sent: Wednesday, April 27, 2022 7:35 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: EXTERNAL: CIBXUTOK fetch protected
>
> Hi all,
>
> I'm trying to reach CIBXTOKN field under CIBX control block, and if the 
> program is executed as a batch job, this field is fetch protected, but if it 
> runs as an STC, the access is granted.
>
> What is the difference?
>
> 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
>
> --
> 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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@

Re: EXTERNAL: CIBXUTOK fetch protected

[Ituriel do Neto]

Gentlemen,

Thank you very much for your support.
I'll analyze the code and let you know any news.


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 27 de abril de 2022 21:42:57 BRT, Seymour J Metz 
 escreveu: 





Fetch protection is is S0c$-04. Please show your code for accessing the CIB.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Ituriel do Neto [03427ec2837d-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, April 27, 2022 1:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: EXTERNAL: CIBXUTOK fetch protected

Mike,

I don't think so, but to remove all doubts i have associated the PROCNAME in 
class STARTED with my userid.

Now both STC and batch job run with the same userid, but when batch, the 
CIBXTOKN continues to be fetch protected giving me and abend S0C4-11


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 27 de abril de 2022 13:07:03 BRT, Mike Schwab 
 escreveu:





Is there a RACF setting to allow a particular user to run any APF
program, or a resource authorization to run this APF program?

On Wed, Apr 27, 2022 at 3:28 PM Ituriel do Neto
<03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi,
>
> The loadlib is APF in both cases because i'm using the same JCL.
>
> For instance, as STC it is started by the command S PROCNAME, while as a 
> batch job, using the following JCL:
>
> //JOBNAME (),CLASS=A,MSGCLASS=X,REGION=0M
> //A1            EXEC PROCNAME
>
> The PROC is the same, expanded from the same PROCLIB.
>
> The only difference i could perceive is when it runs as batch, it is assigned 
> to my userid, and as STC, it is assigned a different one defined in STARTED 
> class.
>
>
> Ituriel do Nascimento Neto
> z/OS System Programmer
>
>
>
>
> Em quarta-feira, 27 de abril de 2022 10:45:47 BRT, Crawford, Robert C. 
> <01feadb2c2d2-dmarc-requ...@listserv.ua.edu> escreveu:
>
>
>
>
>
> Does your program get loaded out of an APF authorized library when it runs as 
> a STC?  What's in the STEPLIB concatenation for the batch job?  One 
> unauthorized library makes the whole STEPLIB unauthorized.
>
> Robert Crawford
> Mainframe Management
> United Services Automobile Association
> (210) 913-3822
>
> “Моє око! Я не повинен брати в нього пудинг!”
> Emma Andijewska
> Please send requests to mainframe management through our front door at  
> go/mfmfrontdoor
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Ituriel do Neto
> Sent: Wednesday, April 27, 2022 7:35 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: EXTERNAL: CIBXUTOK fetch protected
>
> Hi all,
>
> I'm trying to reach CIBXTOKN field under CIBX control block, and if the 
> program is executed as a batch job, this field is fetch protected, but if it 
> runs as an STC, the access is granted.
>
> What is the difference?
>
> 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
>
> --
> 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

--
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: CIBXUTOK fetch protected

[Ituriel do Neto]

Mike,

I don't think so, but to remove all doubts i have associated the PROCNAME in 
class STARTED with my userid.

Now both STC and batch job run with the same userid, but when batch, the 
CIBXTOKN continues to be fetch protected giving me and abend S0C4-11


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer






Em quarta-feira, 27 de abril de 2022 13:07:03 BRT, Mike Schwab 
 escreveu: 





Is there a RACF setting to allow a particular user to run any APF
program, or a resource authorization to run this APF program?

On Wed, Apr 27, 2022 at 3:28 PM Ituriel do Neto
<03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi,
>
> The loadlib is APF in both cases because i'm using the same JCL.
>
> For instance, as STC it is started by the command S PROCNAME, while as a 
> batch job, using the following JCL:
>
> //JOBNAME (),CLASS=A,MSGCLASS=X,REGION=0M
> //A1            EXEC PROCNAME
>
> The PROC is the same, expanded from the same PROCLIB.
>
> The only difference i could perceive is when it runs as batch, it is assigned 
> to my userid, and as STC, it is assigned a different one defined in STARTED 
> class.
>
>
> Ituriel do Nascimento Neto
> z/OS System Programmer
>
>
>
>
> Em quarta-feira, 27 de abril de 2022 10:45:47 BRT, Crawford, Robert C. 
> <01feadb2c2d2-dmarc-requ...@listserv.ua.edu> escreveu:
>
>
>
>
>
> Does your program get loaded out of an APF authorized library when it runs as 
> a STC?  What's in the STEPLIB concatenation for the batch job?  One 
> unauthorized library makes the whole STEPLIB unauthorized.
>
> Robert Crawford
> Mainframe Management
> United Services Automobile Association
> (210) 913-3822
>
> “Моє око! Я не повинен брати в нього пудинг!”
> Emma Andijewska
> Please send requests to mainframe management through our front door at  
> go/mfmfrontdoor
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Ituriel do Neto
> Sent: Wednesday, April 27, 2022 7:35 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: EXTERNAL: CIBXUTOK fetch protected
>
> Hi all,
>
> I'm trying to reach CIBXTOKN field under CIBX control block, and if the 
> program is executed as a batch job, this field is fetch protected, but if it 
> runs as an STC, the access is granted.
>
> What is the difference?
>
> 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
>
> --
> 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: EXTERNAL: CIBXUTOK fetch protected

[Ituriel do Neto]

Hi,

The loadlib is APF in both cases because i'm using the same JCL.

For instance, as STC it is started by the command S PROCNAME, while as a batch 
job, using the following JCL:

//JOBNAME (),CLASS=A,MSGCLASS=X,REGION=0M
//A1            EXEC PROCNAME

The PROC is the same, expanded from the same PROCLIB. 

The only difference i could perceive is when it runs as batch, it is assigned 
to my userid, and as STC, it is assigned a different one defined in STARTED 
class.


Ituriel do Nascimento Neto
z/OS System Programmer




Em quarta-feira, 27 de abril de 2022 10:45:47 BRT, Crawford, Robert C. 
<01feadb2c2d2-dmarc-requ...@listserv.ua.edu> escreveu: 





Does your program get loaded out of an APF authorized library when it runs as a 
STC?  What's in the STEPLIB concatenation for the batch job?  One unauthorized 
library makes the whole STEPLIB unauthorized.  

Robert Crawford
Mainframe Management
United Services Automobile Association
(210) 913-3822

“Моє око! Я не повинен брати в нього пудинг!”
Emma Andijewska
Please send requests to mainframe management through our front door at  
go/mfmfrontdoor

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Ituriel do Neto
Sent: Wednesday, April 27, 2022 7:35 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: CIBXUTOK fetch protected

Hi all,

I'm trying to reach CIBXTOKN field under CIBX control block, and if the program 
is executed as a batch job, this field is fetch protected, but if it runs as an 
STC, the access is granted.

What is the difference?

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

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

CIBXUTOK fetch protected

[Ituriel do Neto]

Hi all,

I'm trying to reach CIBXTOKN field under CIBX control block, and if the program 
is executed as a
batch job, this field is fetch protected, but if it runs as an STC, the access 
is granted.

What is the difference?

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

Re: How to simplify IODF activation

[Ituriel do Neto]

Hi all,

Related to the IODF activation order, i think we should first do SW only 
activation in all
Lpars and SW-HW activation in the last one. The Lpars will be synchronized 
again when 
HW activation is finished.

If you are deleting devices and do a HW activate first, you will probably have 
device errors
messages in Lpars where those deleted devices are defined.

Just my guess


Ituriel do Nascimento Neto

z/OS System Programmer




Em quinta-feira, 17 de março de 2022 16:19:08 GMT+1, David Spiegel 
 escreveu: 





Hi Allan,
Why can't the user FTP the Batch Activate Job to all 28 LPARs?

Regards,
David

On 2022-03-17 11:03, Allan Staller wrote:
> Classification: Confidential
>
> I believe you are out of luck. Since these are all single-image systems, each 
> needs the IODF activated individually.
> There is an option to activate an IODF "SYSPLEX WIDE", but only within the 
> sysplex.
>
> The 1st IODF should be activated as HW and SW. The remaining IODFs as 
> SOFTWARE only.
> Don’t forget to go back and update the LOADxx members of SYS1.PARMLIB/IPLPARM 
> to ensure things don't get regressed at the next IPL.
>
> I don't have any better news.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Jason Cai
> Sent: Thursday, March 17, 2022 5:44 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: How to simplify IODF activation
>
> [CAUTION: This Email is from outside the Organization. Unless you trust the 
> sender, Don’t click links or open attachments as it may be a Phishing email, 
> which can steal your Information and compromise your Computer.]
>
> Hi all
>    In our shop, there are more than 20 single image systems. When we want to 
>activate a production IODF, we have to logon to these 20 systems.
>
>    Could we logon to one z/OS system to submit JOBs to activate the IODF for 
>these 20 systems.
>
> Any suggestions are greatly appreciated!!!
>
> Thanks a lot!
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> ::DISCLAIMER::
> 
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.

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


--
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: Time discrepancy

[Ituriel do Neto]

Fernando de Noronha is an amazing place, but unfortunately i'm not there.

I'm playing with a small ZPDT and probably there are time issues in this server.

Anyway, thank you all for your time and attention.


Best Regards

Ituriel






Em terça-feira, 1 de fevereiro de 2022 16:42:27 BRT, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> escreveu: 





On Tue, 1 Feb 2022 19:13:03 +, Ituriel do Neto wrote:
>
>Thank you for your time.
>
You're welcome.

>Adding the login option in BPXWUNIX did the trick.
>    ...
>To correct it, I had to include CEEOPTS DD card as below :
>
>//CEEOPTS   DD   *   
>ENVAR('TZ=GMT-2')    
>
>It did the trick, but i still don't know why this time difference, since z/OS 
>D T command show me the correct timezone.
>
(I'm guessing) C uses TZ; D T uses CVTLDTO
<https://www.ibm.com/docs/en/zos/2.5.0?topic=correlator-cvt-information>.
Different hands; different motives.  Thus my rant about consistency a few plies 
ago.

Can you (do you need to) make your code portable by such as:
    putenv( system( "TZ=$( echo $TZ )" )?  (needs work.)

BTW, the only place I see on the map that matches your TZ offset is Fernando de 
Noronha.
Do I guess right?

-- 
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: Time discrepancy

[Ituriel do Neto]

Gil,

Thank you for your time.
Adding the login option in BPXWUNIX did the trick.

Now i can see the correct time difference in Rexx.

This whole email was an attempt to search the cause of this same problem (wrong 
time difference local/GMT) of a batch C program. I have supposed that the cause 
of Rexx problem was the same of the C program.

This C program is supposed to present the time as localtime, but there is a 2 
hour difference when time is printed.

To correct it, I had to include CEEOPTS DD card as below :

//CEEOPTS   DD   *   
ENVAR('TZ=GMT-2')    

It did the trick, but i still don't know why this time difference, since z/OS D 
T command show me the correct timezone.

Best Regards

Ituriel




Em terça-feira, 1 de fevereiro de 2022 15:10:13 BRT, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> escreveu: 





On Tue, 1 Feb 2022 17:46:58 +, Ituriel do Neto wrote:
> 
>The batch processing was tested with both IKJEFT* and IRXJCL, presenting the 
>same results.
>Here follows the result of "echo $TZ; env" for batch processing :
>Tue Feb  1 17:12:14 2022                              <===  blank 
>line_=/bin/env                 Tue Feb  1 17:12:14 2022   
>And in TSO OMVS, i got the following :
>GMT+2    
>    ...
You'll probably get more repeatable results if you use LOGIN=1:
<https://www.ibm.com/docs/en/zos/2.5.0?topic=functions-bpxwunix>.

But if you publish your code you'll probably get complaints from
subscribers with bogus TZ values in their profiles.  You can only
tell them, "You broke it; you fix it!"

-- 
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: Time discrepancy

[Ituriel do Neto]

 Gil,
The batch processing was tested with both IKJEFT* and IRXJCL, presenting the 
same results.
Here follows the result of "echo $TZ; env" for batch processing :
Tue Feb  1 17:12:14 2022                              <===  blank 
line_=/bin/env                 Tue Feb  1 17:12:14 2022   
And in TSO OMVS, i got the following :
GMT+2                                                     MAIL=/usr/mail/ZR17   
                                    _BPX_TERMPATH=OMVS                          
              PATH=/bin:.                                               
SHELL=/bin/sh                                             PS1=$LOGNAME:$PWD: >  
                                    COLUMNS=137                                 
              _=/bin/env                                                
LOGNAME=ZR17                                              STEPLIB=none          
                                    LANG=C                                      
              LIBPATH=/lib:/usr/lib:.                                   
TERM=dumb                                                 HOME=/u/zr17          
                                    LINES=42                                    
              TZ=GMT+2                                                  
MANPATH=/usr/man/%L                                       
NLSPATH=/usr/lib/nls/msg/%L/%N:/usr/lib/nls/msg/%L/%N.cat 

Regards
Ituriel
Em terça-feira, 1 de fevereiro de 2022 13:31:52 BRT, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> escreveu:  
 
 On Tue, 1 Feb 2022 14:53:07 +, Ituriel do Neto wrote:

> The TZ is set in /etc/profile.Are there definitions for TZ variable also for 
> batch ?
>
How are you testing in batch?  IRXJCL: IKHEFT*? Other?

You could probe by adding "echo $TZ; env;" to your COMMAND.

POSIX allows the effect of an unset TZ to be implementation dependent.
The majority of UNIX/Linux systems use as a default some value of system
local time, often a symlink, /etc/localtime.  z/OS defaults to UTC.  IBM
gives the rationale, "for compatibility with AIX"‽

Conway's Law.  Rather, there should be a single point of control; one line
in PARMLIB or HMC which an admin could edit to a POSIX (even better,
IANA) format TZ to to govern the setting of CVTDTO (and Daylight Saving
transitions) and TZ for UNIX processes.

-- 
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: Time discrepancy

[Ituriel do Neto]

 The TZ is set in /etc/profile.Are there definitions for TZ variable also for 
batch ?
Best Regards
Ituriel
Em terça-feira, 1 de fevereiro de 2022 11:03:33 BRT, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> escreveu:  
 
 On Tue, 1 Feb 2022 06:55:57 -0600, John McKown wrote:

>My guess is the setting of the TZ environment variable. I'm guessing it is
>not set in batch.
> 
Experiment with the ENV and LOGIN options to verify this.

Hmmm.  If TZ is set in both ENV and .profile, which dominates?

>On Tue, Feb 1, 2022 at 6:51 AM Ituriel do Neto wrote:
>
>> /*REXX*/
>>    ...
>> COMMAND= 'date+%c'
>>    ...
>> COMMAND= 'date -u+%c'
>>    ...
What's swallowing blanks in your text?

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

Time discrepancy

[Ituriel do Neto]

Hi all,
I'm facing a strange situation and would like to understand it.I have issued 
the following commands on OMVS and got the results:
ZR17:/u/zr17: >date +%c      Tue Feb  1 10:29:07 2022     ZR17:/u/zr17: >date 
-u +%c   Tue Feb  1 12:29:17 2022     ZR17:/u/zr17: >            

Executing the same commands in batch (Rexx), the results are different.

/*REXX*/

Say'TESTUNIXRexx'   

Say''   

Say''   

Say'TIME (Local) =' Date()time()

   

COMMAND= 'date+%c'  

EXITRC= BPXWUNIX(COMMAND,'DD:STDIN','DD:STDOUT','DD:STDERR','0')  

   

COMMAND= 'date -u+%c'   

EXITRC= BPXWUNIX(COMMAND,'DD:STDIN','DD:STDOUT','DD:STDERR','0')  

   

EXIT0                                                             
Results :
TESTUNIX Rexx                                                                   
    
TIME (Local) = 1 Feb 2022 14:31:27         Tue Feb  1 12:31:27 2022             
      
Tue Feb  1 12:31:27 2022                  

In OMVS under TSO, i can see the 2 hours difference expected, but in batch, 
there is no time difference.
Do you have any idea why does it happen?


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

Re: Replacement for TM instruction

[Ituriel do Neto]

 Gentlemen,
Thank you very much for your ideas and time.I was considering to copy variable 
A to another place and, since i only need to check one bit, do a NC and then a 
CLC, but i think your suggestion of EX is more elegant.
A       DC    X'1C'  
B       DC    X'08'
C       DC    X
          MVC C,A
          NC    C,B
          CLC   C,B 
         JE       MATCH


Best Regards

Ituriel do Nascimento Neto
z/OS System Programmer


PS. I don't know why the editor joins different lines of my message...


Em domingo, 12 de dezembro de 2021 13:06:20 BRT, Seymour J Metz 
 escreveu:  
 
 No, I meant execute, as in *either* EX or EXRL, a TM. I was, of course, 
assuming that TMY was not necessary and that TMHH, TMHL, TMLH and TMLL were 
useless for the purpose.

    "I meant what I sad and I said what I meant,
    A sysprog is faithful, 100%"
    Horton Hears an IPL by Dr. Seus


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Robin Vowels [robi...@dodo.com.au]
Sent: Friday, December 10, 2021 3:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Replacement for TM instruction

- Original Message -
From: "Seymour J Metz" 
Newsgroups: bit.listserv.ibm-main
Sent: Saturday, December 11, 2021 12:56 AM


For a test of a single bit you can do a logical and on a copy of the byte or 
use NRK.
For testing multiple bits you can execute a TM.

You mean, EXexute a TM.

---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus

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

Replacement for TM instruction

[Ituriel do Neto]

Hi all,
I would like advice because i have a situation where i need to check a bit of a 
storage area, usinganother storage area as a pattern and not an immediate.

I have something like this :
A       DC    X'1C'B       DC    X'08'
         TM    A,x'08'         JO    X
But instead of using x'08', i need to use the variable B in the comparison, 
because the content of B may change.So, i would need something like this:
         TM  A,B
How can i do that ?
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

IEFU85 Sample

[Ituriel do Neto]

Hi all,

I have to create an IEFU85 SMF exit and dynamically load it.I know how to do it 
but would like to take a look into an IEFU85 sample, before starting coding.
Does any of you have a sample to share?

Thanks in advance


Ituriel do Nascimento Netoz/OS System Programmer

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

Re: IGGCSI00

[Ituriel do Neto]

 Mr Scott,
Thank you for the tips.It solved my problem.
Best Regards

Ituriel do Nascimento Neto z/OS System Programmer
Em quinta-feira, 24 de junho de 2021 09:54:04 BRT, Rob Scott 
 escreveu:  
 
 This is what I have coded in the past :

(o) Setting up CSIFIELD

CSIFILTK                Your usercat name
CSICATNM              Your mastercat name
CSIOPTNS                "F" for fullword values
CSIS1CAT                "Y" just one catalog
CSINUMEN              Set to 1 field
CSIENTS        Set to "NAME"

(o) Returned area looks like :

IGGCSIWH            (Header)
IGGCSIWC            (Catalog)
IGGCSIWE            (Usercat entry)

(o) If CSIEDATA is ON and CSIFDDAT is not NULL then divide CSILENF1 by maximum 
alias length (44) to get the number of aliases.


Rob Scott
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Ituriel do Neto
Sent: 24 June 2021 13:33
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IGGCSI00

EXTERNAL EMAIL





Hi all,
I'm coding a new program that will get information from Usercatalogs using 
IGGCSI00 API,but i'm stuck trying to reproduce IDCAMS command LISTCAT ENT(UCAT) 
ALL.
Actually, i am interested in obtaining the number of ALIAS a specific UCAT has, 
and this IDCAMS commandshows that information, i just have to count it.

IDCAMS  SYSTEM SERVICES                                                  
LISTCAT ENT(UCAT.XXX) ALL        USERCATALOG --- UCAT.XXX                IN-CAT 
--- CATALOG.MASTER      HISTORY                              
RELEASE2          VOLUMES                              
VOLSERVV          ASSOCIATIONS                          
ALIASXX01                      ALIASXX02                      
ALIASXX03
I can get this ALIAS information from MCAT but i want to make a smarter 
code.Could some of you, gurus, point me to the right values of CSICATNM, 
CSIFILTK, CSIDTYPS ?
Thanks in advance

Best Regards
Ituriel do Nascimento Netoz/OS System Programmer

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


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


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

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

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

IGGCSI00

[Ituriel do Neto]

Hi all,
I'm coding a new program that will get information from Usercatalogs using 
IGGCSI00 API,but i'm stuck trying to reproduce IDCAMS command LISTCAT ENT(UCAT) 
ALL.
Actually, i am interested in obtaining the number of ALIAS a specific UCAT has, 
and this IDCAMS commandshows that information, i just have to count it.

IDCAMS  SYSTEM SERVICES                                                   
LISTCAT ENT(UCAT.XXX) ALL         USERCATALOG --- UCAT.XXX                 
IN-CAT --- CATALOG.MASTER      HISTORY                               
RELEASE2          VOLUMES                               
VOLSERVV          ASSOCIATIONS                          
ALIASXX01                       ALIASXX02                       
ALIASXX03                 
I can get this ALIAS information from MCAT but i want to make a smarter 
code.Could some of you, gurus, point me to the right values of CSICATNM, 
CSIFILTK, CSIDTYPS ?
Thanks in advance

Best Regards
Ituriel do Nascimento Netoz/OS System Programmer

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

IPV6

[Ituriel do Neto]

Hi all,
I would like to know if any of you use IPV6 on Mainframe.

Best Regards
Ituriel do Nascimento Netoz/OS System Programmer

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

Re: SMF fields of RMF Subchannel Activity Report

[Ituriel do Neto]

 Martin,
We develop a product that intercepts SMF records in real-time and generates a 
DataBase in Open Platform. This Data can be used to generate reports and 
graphics dynamically.
Best Regards
Em quinta-feira, 11 de fevereiro de 2021 11:19:39 BRT, Martin Packer 
 escreveu:  
 
 Subchannel busy (as opposed to busy CONDITIONS) is estimated from request 
rate and service time multiplied together.

I think we'd all like to know the purpose of this, though.

Cheers, Martin

Martin Packer

Systems Investigator & Performance Troubleshooter, IBM

+44-7802-245-584

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

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

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

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



From:  Ituriel do Neto <03427ec2837d-dmarc-requ...@listserv.ua.edu>
To:    IBM-MAIN@LISTSERV.UA.EDU
Date:  11/02/2021 13:25
Subject:        [EXTERNAL] Re: SMF fields of RMF Subchannel Activity 
Report
Sent by:        IBM Mainframe Discussion List 



 Colin,
Thank you very much for your time.I'll take a closer look at these SMF 
fields.

Best Regards
Ituriel
    Em quinta-feira, 11 de fevereiro de 2021 09:55:10 BRT, Colin Paice 
 escreveu: 
 
 Hi,

CF level  Local Coupling Facility Data Section
24 18 R744FPBC 8 l_float Number of times coupling facility requests fail
due to path busy.

You get data for each structure

For the Structures you get the different sorts of requests
92 5C R744SSRC 8 l_float Count of number of times for synchronous requests
 44 R744SARC 8 l_float The total number of operations executed
asynchronously at the
coupling facility.
R744SATM 8 binary Summed service time for asynchronous requests in
microseconds
 54 R744SASQ 8 binary Summed squares of service time for asynchronous
requests.

so you can calculate your own average and standard deviation from these.

and add up the total number of sync/asnyc requests  to get a figure for 
the
CF as a whole

regards

Colin
.



On Thu, 11 Feb 2021 at 12:31, Ituriel do Neto <
03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:

>  Hi Colin,
> I do need the SMF fields, not the extraction from RMF. I have to create 
a
> database with information related to Path Busy, Service Time, Number of
> subchannels, sync and async requests, etc...
> And i could see similar information in several sections of SMF 74.4, 
which
> causes me confusion.
>
> Regards
> Ituriel
>
>
>    Em quinta-feira, 11 de fevereiro de 2021 09:17:18 BRT, Colin Paice <
> colinpai...@gmail.com> escreveu:
>
>  You can get RMF to format most(all?) of these records.
> What high level analysis do you want to do?
> Colin
>
> On Thu, 11 Feb 2021 at 11:56, Ituriel do Neto <
> 03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Hi all,
> > I'm trying to collect some information from SMF 74.4 and would like 
some
> > advice.I need to analyze data similar to Subchannel Activity Report 
does,
> > but i'm a little confused.
> > In SMF 74.4 there are several sections and, if possible, i would like 
to
> > know which one isused as the basis for RMF Subchannel Activity Report.
> > Thanks in Advance
> >
> > Best Regards
> > Ituriel do Nascimento NetoSystem 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
>
>
> --
> 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




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


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

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

Re: SMF fields of RMF Subchannel Activity Report

[Ituriel do Neto]

 Colin,
Thank you very much for your time.I'll take a closer look at these SMF fields.

Best Regards
Ituriel
Em quinta-feira, 11 de fevereiro de 2021 09:55:10 BRT, Colin Paice 
 escreveu:  
 
 Hi,

CF level  Local Coupling Facility Data Section
24 18 R744FPBC 8 l_float Number of times coupling facility requests fail
due to path busy.

You get data for each structure

For the Structures you get the different sorts of requests
92 5C R744SSRC 8 l_float Count of number of times for synchronous requests
 44 R744SARC 8 l_float The total number of operations executed
asynchronously at the
coupling facility.
R744SATM 8 binary Summed service time for asynchronous requests in
microseconds
 54 R744SASQ 8 binary Summed squares of service time for asynchronous
requests.

so you can calculate your own average and standard deviation from these.

and add up the total number of sync/asnyc requests  to get a figure for the
CF as a whole

regards

Colin
.



On Thu, 11 Feb 2021 at 12:31, Ituriel do Neto <
03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:

>  Hi Colin,
> I do need the SMF fields, not the extraction from RMF. I have to create a
> database with information related to Path Busy, Service Time, Number of
> subchannels, sync and async requests, etc...
> And i could see similar information in several sections of SMF 74.4, which
> causes me confusion.
>
> Regards
> Ituriel
>
>
>    Em quinta-feira, 11 de fevereiro de 2021 09:17:18 BRT, Colin Paice <
> colinpai...@gmail.com> escreveu:
>
>  You can get RMF to format most(all?) of these records.
> What high level analysis do you want to do?
> Colin
>
> On Thu, 11 Feb 2021 at 11:56, Ituriel do Neto <
> 03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
>
> > Hi all,
> > I'm trying to collect some information from SMF 74.4 and would like some
> > advice.I need to analyze data similar to Subchannel Activity Report does,
> > but i'm a little confused.
> > In SMF 74.4 there are several sections and, if possible, i would like to
> > know which one isused as the basis for RMF Subchannel Activity Report.
> > Thanks in Advance
> >
> > Best Regards
> > Ituriel do Nascimento NetoSystem 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
>
>
> --
> 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 fields of RMF Subchannel Activity Report

[Ituriel do Neto]

 Hi Colin,
I do need the SMF fields, not the extraction from RMF. I have to create a 
database with information related to Path Busy, Service Time, Number of 
subchannels, sync and async requests, etc...
And i could see similar information in several sections of SMF 74.4, which 
causes me confusion.

Regards
Ituriel


Em quinta-feira, 11 de fevereiro de 2021 09:17:18 BRT, Colin Paice 
 escreveu:  
 
 You can get RMF to format most(all?) of these records.
What high level analysis do you want to do?
Colin

On Thu, 11 Feb 2021 at 11:56, Ituriel do Neto <
03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:

> Hi all,
> I'm trying to collect some information from SMF 74.4 and would like some
> advice.I need to analyze data similar to Subchannel Activity Report does,
> but i'm a little confused.
> In SMF 74.4 there are several sections and, if possible, i would like to
> know which one isused as the basis for RMF Subchannel Activity Report.
> Thanks in Advance
>
> Best Regards
> Ituriel do Nascimento NetoSystem 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
  

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

SMF fields of RMF Subchannel Activity Report

[Ituriel do Neto]

Hi all,
I'm trying to collect some information from SMF 74.4 and would like some 
advice.I need to analyze data similar to Subchannel Activity Report does, but 
i'm a little confused.
In SMF 74.4 there are several sections and, if possible, i would like to know 
which one isused as the basis for RMF Subchannel Activity Report.
Thanks in Advance

Best Regards
Ituriel do Nascimento NetoSystem Programmer

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

Re: How to find out consumer of page datasets

[Ituriel do Neto]

 Hi,
In RMF you can use option 3 (Resource), than option 7 (Storf), or just type 
STORF in any RMF monitor III screen.
Ituriel
Em quinta-feira, 24 de dezembro de 2020 15:49:20 BRT, Lizette Koehler 
 escreveu:  
 
 List -

 

This is not one of my strong points.  

 

I have RMF and omegamon.

 

What can I use that will help me over time see what is using all the Page
Datasets or what is being orphaned?

 

Thanks

 

Lizette

 


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

[Ituriel do Neto]

 Gentlemen,
The logical record i want starts with a "{" and ends with "}"
Thanks
Ituriel
Em quarta-feira, 28 de outubro de 2020 19:13:58 BRT, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> escreveu:  
 
 On Wed, 28 Oct 2020 20:40:54 +, Ituriel do Neto wrote:

>Hi,
>I have an omvs file and would like to separate the fields into multiple 
>lines.The input file has the following format:
>
What's your criterion for separating fields into lines?  Your example
is insufficiently informative.

> Ý{"date":"20200616-0400","MMSU":11206,"IH":35,"X":302},{"date":"20200616-0500","MMSU":11235,"IH":29,"X":303},{"date":"20200616-0600","MMSU":11269,"IH":34,"X":304},{"date":"20200616-0700","MMSU":11309,"IH":40,"X":305},{"date":"20200616-0800","MMSU":11352,"IH":43,"X":306},{"date":"20200616-0900","MMSU":11403,"IH":51,"X":307},{"date":"20200616-1000","MMSU":11459,"IH":56,"X":308},{"date":"20200616-1100","MMSU":11516,"IH":57,"X":309},{"date":"20200616-1200","MMSU":11585,"IH":69,"X":310},{"date":"20200616-1300","MMSU":11639,"IH":54,"X":311},{"date":"20200616-1400","MMSU":11689,"IH":50,"X":312},{"date":"20200616-1500","MMSU":11742,"IH":53,"X":313},{"date":"20200616-1600","MMSU":11805,"IH":63,"X":314},{"date":"20200616.
>And I would like to create a dataset in this 
>format:{"date":"20200616-0400","MMSU":11206,"IH":35,"X":302}
>{"date":"20200616-0500","MMSU":11235,"IH":29,"X":303}{"date":"20200616-0600","MMSU":11269,"IH":34,"X":304}...
>I know SORT can to magic, but I'm not getting success.Any help will be 
>appreciated.

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

DFSORT wizard help

[Ituriel do Neto]

Hi,
I have an omvs file and would like to separate the fields into multiple 
lines.The input file has the following format:
 
Ý{"date":"20200616-0400","MMSU":11206,"IH":35,"X":302},{"date":"20200616-0500","MMSU":11235,"IH":29,"X":303},{"date":"20200616-0600","MMSU":11269,"IH":34,"X":304},{"date":"20200616-0700","MMSU":11309,"IH":40,"X":305},{"date":"20200616-0800","MMSU":11352,"IH":43,"X":306},{"date":"20200616-0900","MMSU":11403,"IH":51,"X":307},{"date":"20200616-1000","MMSU":11459,"IH":56,"X":308},{"date":"20200616-1100","MMSU":11516,"IH":57,"X":309},{"date":"20200616-1200","MMSU":11585,"IH":69,"X":310},{"date":"20200616-1300","MMSU":11639,"IH":54,"X":311},{"date":"20200616-1400","MMSU":11689,"IH":50,"X":312},{"date":"20200616-1500","MMSU":11742,"IH":53,"X":313},{"date":"20200616-1600","MMSU":11805,"IH":63,"X":314},{"date":"20200616.
And I would like to create a dataset in this 
format:{"date":"20200616-0400","MMSU":11206,"IH":35,"X":302}
{"date":"20200616-0500","MMSU":11235,"IH":29,"X":303}{"date":"20200616-0600","MMSU":11269,"IH":34,"X":304}...
I know SORT can to magic, but I'm not getting success.Any help will be 
appreciated.
TIA
Best Regards


Ituriel do Nascimento Neto

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

ACF2 SMF fields

[Ituriel do Neto]

Hi all,
I need to run some reports for a client, based on ACF2 SMF records and would 
like your advice.All my experience is with RACF and I already have some RACF 
reports based on SMF 80 that I could adapt to ACF2.
The problem is that I'm having some difficulties to find the equivalence of 
RACF SMF 80 to ACF2 SMF 230, specifically the following fields:
SMF80GRPSMF80TRMSMF80SECSMF80EVTSMF80EVQSMF80DES
SMF80RE2SMF80ERRSMF80REA
Any help will be very appreciated.
Thanks in advance


Ituriel do Nascimento Netoz/OS System Programmer and Developer 

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