IBM's Connect:Direct for z/OS;Batch Override=Y, SNODEID= use

[Kenneth J. Kripke]

Thank you Tony for the example.  It is much appreciated.  

 

Sincerely; 

 

Kenneth James Kripke 

k.kri...@comcast.net    

 


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

IBM's Connect:Direct for z/OS;Batch Override=Y, SNODEID= use

[Kenneth J. Kripke]

I apologize beforehand for asking, but, I am looking for the correct syntax
to use Connect:Direct 6.x to transfer from one system to another, 

Specifying a different HLVL that is defined on the target system.  I know
how to do this kind of submit using the product provided panels where I can
specify Override Security and specify 

Both the Pnode use rid and password as well as the Snode use rid and
password and specify the Sending dsn as well as the Receiving dsn.  The goal
is to be able to automate a process to transfer files from one system to a
completely different system.  

Any advice or help would be appreciated.  

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

SAS ODS examples

[Kenneth J. Kripke]

Thank you Carmen and all who responded to my query.   

You have been MOST Helpful.

 

 

Sincerely; 

 

Kenneth Kripke 

: 

k.kri...@comcast.net 

 


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

SAS ODS in the Mainframe environment

[Kenneth J. Kripke]

Hello; 

 I realize this is not the correct forum to be asking questions
regarding SAS, but, it appears that SAS-L is no longer available? 

The question is as follows: 

I would like to produce an XCEL spreadsheet written to a member of a
pre-allocated PDSE.  I have fiddled with the various statements to
accomplish this, but, to no avail.  

The type of data to be stored is the result of a PROC PRINT with character
data.  Does anyone else on the list have some experience and suggestions on
this?  

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

Subdirectory and associated file(s) to actual ZFS File system inquiry

[Kenneth J. Kripke]

Thank you to all that responded.  You have given me the necessary
information to complete my tasks 

 

Sincerely; 

 

Kenneth Kripke

k.kri...@comcast.net


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

Subdirectory and associated file(s) to actual ZFS File system inquiry

[Kenneth J. Kripke]

Is there a way to list the associated File System that houses the directory
and an associated file(s)?  

I can get the best guess by doing a D OMVS,F which will display the mount
points for each file system, but, 

Wondered if there might be something available that given a specific file of
interest, it would be able to display 

The actual File System? 

 

Kenneth J. Kripke

 

:  

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 

 


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

SYSTEM REXX use

[Kenneth J. Kripke]

A thank you note to all that responded to my inquiry. 

Thank you for clarifying the use of SYSTEM REXX. 

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

SYSTEM REXX use

[Kenneth J. Kripke]

Hello;

 I am looking at the capabilities of SYSTEM REXX on a Z/OS system.  I am
not familiar with how to invoke it and so forth.  

Can functions be called from a TSO REXX environment, and, if so, how do I
establish a connection to AXR?  

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

SYSTEM REXX

[Kenneth J. Kripke]

Apologies for asking, but, I am attempting to use SYSTEM REXX to test out 
various automation rules.  
I would like to know what is needed to establish the environment to invoke some 
of the functions such as AXRWTO, AXRWTOR, etc. 
I am attempting to issue the calls through standard TSO REXX.  

Sincerely; 

Kenneth J. Kripke
k.kri...@comcast.net

Sent from Mail for Windows


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

BPXBATCH and PGM invocation

[Kenneth J. Kripke]

Thank you to all that had responded.  I was able to accomplish what I wanted
to get done using BPXWUNIX within a REXX.  

The purpose of this exercise is to test Automation rules to bring down
various OMVS processes during a system shutdown for an IPL.   

 

 

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

BPXBATCH and PGM invocation

[Kenneth J. Kripke]

I am trying to execute a unix stored program using BPXBATCH from MVS but it
fails continuously with 

BPXM047I BPXBATCH FAILED BECAUSE SPAWN (BPXISFN) OF
'u///SPWNPGM1' FAILED 

WITH RETURN CODE 0081 REASON CODE 0594003D 

The actual directory paths for this email were x'ed out for confidentiality
reasons.  

I can execute the PGM successfully using ISHELL in TSO.  

JCL of the job follows: 

//  JOB 

//JSTEP  EXEC PGM=BPXBATCH,PARM='PGM ''/u///SPWNPGM1''' 

//STDIN  DD  * 

/* 

//STDOUT DD SYSOUT=* 

Is there some other utility that can accomplish what I am attempting to do?


 

 

Kenneth J. Kripke

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

Re USS ps command

[Kenneth J. Kripke]

To follow up on what the purpose is and intended actions: 

During the course of a system shutdown for an IPL, we would like to identify
active USS processes and the associated user, parent process id, and process
id's.  

We are a Mainview shop with Auto-operator installed.  We have issued and
captured the D OMVS,ALL output, but, we are also looking at maybe using the
ps -o uid,user,ppid,pid,xasid to minimize the amount of information that
needs to be parsed out.  

Thank you also for the tip regarding SDSF PS.  That might also be a
solution.  Regrettably, I have not been able to test the suggestions out
yet.  I am working with a colleague who does have system access, however,
there is a bit of lag time.   

 

 

Sincerely; 

 

Kenneth J. Kripke

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

USS ps command

[Kenneth J. Kripke]

Is there a way to list the PID, PPID, UID, and, ASID associated with a USS
job or task running on z/OS?  

Of primary interest is to obtain the ASID of the Job or STC.  Currently, I
am using BPXUNIX and issuing the call to gather the information on all USS
processes using  

'ps -ef' which does list the PID, PPID, and UID but does not list an
associated ASID.  Is this possible using the ps command? 

 

 

Sincerely; 

 

Kenneth J. Kripke

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

$HASP052 JES2 RESOURCE SHORTAGE OF BERT XX% UTILIZATION REACHED

[Kenneth J. Kripke]

Hello;

 We had an incident where about 8,000 jobs were submitted via a
distributed process.  All the jobs were of the same name.  

It is my understanding that the BERT contains the CAT and JQE as well as the
WSCQ as indicated in a bit indicator.  If the jobs were placed on hold via
the $H GRP,JM=,  I am guessing 

The control blocks will still be built, hence, no benefit.  Is my assumption
correct?  I would like to pose the question on how others have resolved the
problem.   

 

Sincerely; 

 

 Kenneth J. Kripke 

 

k.kri...@comcast.net <mailto:k.kri...@comcast.net>  


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

System Proclibs, Member management

[Kenneth J. Kripke]

If you have eventAction installed you can track member access.  In the past,
I have used the product to determine which members were being used.  

 

k.kri...@comcast.net 

 


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

Port availability through the Firewall

[Kenneth J. Kripke]

Environment is z/OS 2.4 

Question:  Is there a way to positively verify reachability to a foreign ip
address and port ? 

I have used telnet as well as tracerte ip address (PORT   but I cannot
confirm..It goes through atleast 3 hops and then continues onward with * * *
until the 30 hop limit is exhausted.  

 

Sincerely; 

 

Kenneth J. Kripke

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

Re: Accurate listing of IDRDATA to TRANSLATOR ID's

[Kenneth J. Kripke]

Thank you to Mike Schwab and Peter Farley for your information. 

 

Sincerely Yours; 

 

Kenneth J. Kripke 

k.kri...@comcast.net <mailto:k.kri...@comcast.net> 


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

Accurate listing of IDRDATA to TRANSLATOR ID's

[Kenneth J. Kripke]

Does IBM maintain a list of Translator ID's that corollate to the language
processor/compiler product that produced CSECTS?  Purpose is to identify 

What version of a compiler produced the CSECT.  The goal is to identify
COBOL VS modules when reviewing an AMBLIST LISTIDR output.  

 

Sincerely Yours; 

 

k.kri...@comcast.net  

 


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

Z15 zedc compression and CONNECT DIRECT, MFT compression

[Kenneth J. Kripke]

First off, thank you to all that responded to this inquiry. 

Some additional information: 

On our systems that are still running on the z/14 processor, the triplets,
Offset, Length, and Count are all present in the SMF type 30 record.  

The products in question are using the unauthorized method of zEDC
compression and de-compression.  In order to get the use of the facility, it
was 

Necessary to add FPZ.ACCELERATOR.COMPRESSION Read access the specific
started tasks.  This was necessary in the pre z/15 days.  For SMF type 30
records created on non z/15 processors, 

All 3 fields are filled in with data.  With the compression now incorporated
in the z/15 hardware, we have seen only the Offset and length fields filled
in.  I need to point out that only the un-authorized tasks exhibit this 

Anomaly.  The reference material I have viewed is
https://www-01.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R4sa2313
77/$file/ieac100_v2r4.pdf . 

It's not a big issue, just that how do we know if compression is really
taking place 

 

Sincerely; 

 

Kenneth J. Kripke 

 

 

 


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

Z15 zedc compression and CONNECT DIRECT, MFT compression

[Kenneth J. Kripke]

Hello; 

 We have upgraded from a Z14 to Z15 processor, and, have experienced
something curious regarding the SMF TYPE 30 section being generated for
Connect Direct as well as Tibco's MFT 8.0 file transfer products.  

Both products are enabled to use ZEDC compression, but, when generating SAS
reports from SMF type 30 records, we  see   SMF30USO{Offset to zEDC usage
statistics Section} and the, SMF30USL{Length of zEDC usage statistics
Section}  containing data.  

We do not see the SMF30USN{Number of zEDC usage statistics sections} having
data.  This has been noticed since upgrading from a z14 to a z15 processor.
Has anyone else seen anything like this in their environment running MFT 8.0
or Connect Direct ? 

 

Kenneth J. Kripke

3433 Plumtree Drive

Apt. K

Ellicott City, MD.  21042

Phones:

Land:  410-696-2307

Cell:443-851-1237

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   Preferred 

kennethkri...@gmail.com <mailto:kennethkri...@gmail.com>  

 


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

Re: SMPE ALIAS for a TEXT/PANEL Usermod

[Kenneth J. Kripke]

My apologies for not responding sooner.  

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

 

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

 

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

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

Kenneth J. Kripke

k.kripke#comcast.net 

 


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

SMPE ALIAS for a TEXT/PANEL Usermod

[Kenneth J. Kripke]

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

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



Kenneth J. Kripke

k.kripke#comcast.net 

 


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

Using the EJES REXAPI to extract active JOBNAME, JOBID, and SYSNAME in a JES3 environment

[Kenneth J. Kripke]

I have been trying to use the EJES REXAPI in REXX to get a list of
jobnames/started tasks, the JOBNUMBER, and, the LPAR the task is running on
based on a pattern mask. 

I have tried the several methods, but, could use some assistance with this.
I have not been able to get the LPAR/SYSNAME the task is running on.  

 

Kenneth J. Kripke

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   


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

TIME a data set was created?

[Kenneth J. Kripke]

I don't know if CA-ASM2 through some of its' exits could record the Time a
dataset was created.  I do know that it was capable of recording the
creating job name using some of the 

Reserved fields in the FMT1.DSCB.  

 

k.kri...@comcast.net


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

Connect Direct and FPZ.ACCELERATOR.COMPRESSION.

[Kenneth J. Kripke]

Does Connect:Direct V5.2  and V6.0 Require Read access to the Racf Facility
FPZ.ACCELERATOR.COMPRESSION to use ZEDC compression facilities ? 

 

 

Kenneth J. Kripke

k.kri...@comcast.net <mailto:k.kri...@comcast.net>   

 


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

Copy NON-SMS ZFS file to a pre-allocated SMS

[Kenneth J. Kripke]

I am posting this question to the group on behalf of a colleague who does
not have access to IBM-MAIN 

He is attempting to copy a ZFS file from a NON-SMS managed volume to a
pre-allocated and formatted SMS managed FILE.  

He has attempted to use the DFDSS COPY function, and, he does have Storage
Admin authority, but, his copy fails.  

What settings need to be set and what tools should be used to perform this
sort of task? 

 

k.kri...@comcast.net   


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

Listing Members in Delete Pending Status in a PDSE

[Kenneth J. Kripke]

Is there a way to list the members that are currently in a Delete Pending
State?  

Is DESERV the way to list these items?  I looked at the mapping IGWSMDE and
specifically the SMDE_TOKEN_CONNID field thinking that if there is a token
present, the member is connected, 

But I have not had the opportunity to test this.

 

Sincerely;  

 

Kenneth J. Kripke

 

Kenneth J. Kripke 

k.kri...@comcast.net 


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

PDSE DELETE PENDING

[Kenneth J. Kripke]

The url
https://www.ibm.com/support/pages/pdse-member-pending-delete-processing-over
view  indicates that when executing IEBPDSE with the
PARM='PERFORMPENDINGDELETE,NOANALYSIS' 

Seems to imply that space will be released for deleted members.  We do
routine maintenance on various Linklist datasets and follow-up with an LLA
UPDATE of the respective libraries on all LPARS.  We have not tested the
IEBPDSE PERFORMPENDELETE,NOANALYSIS Yet, but will do so in the near future.
My question:  How does this really work, and, what really has to happen to
reclaim the deleted space.  

Sincerely;  

 

Kenneth J. Kripke

 

k.kri...@comcast.net 

 


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

ADATA RECORD LAYOUTS

[Kenneth J. Kripke]

For the record layouts, see High Level Assembler for z/OS & z/VM & z/VSE
Programmer's Guide, Version 1 Release 6 in Appendix C

kennethkri...@gmail.com  


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

Storage Question

[Kenneth J. Kripke]

If you are an FDR user and have FDREPORT, this will fill the bill.  

 





<  >



 

Ken Kripke

kennethkri...@gmail.com 

 


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

CFSIZER no longer available?

[Kenneth J. Kripke]

Hello;

 I wanted to use the IBM WEB BASED tool CFSIZER at
http://www.ibm.com/systems/support/z/cfsizer/ and specifying SMF.  

After filling in the criteria and depressing the SUBMIT I am directed to
https://www.ibm.com/it-infrastructure/z 

This is a recent change in behavior.  Has this tool been withdrawn?  

 

Sincerely;  

 

Kenneth J. Kripke

k.kri...@comcast.net


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

Best Practices, SMF LOGSTREAMS

[Kenneth J. Kripke]

Hello; 

 I wish to get some input on handling outages for the coupling
facilities when it comes to such activities as an IML to 

Expand the Coupling facility sizes.  We had an episode where the Partition
was reconfigured for more storage which disrupted recording of

The SMF data.  The data was retrieved successfully via the using an IEBGENER
with the SUBSYS=(LOGR,IFASEXIT) parm coded for the input of 

The log stream file.  

In instances such as this, how do other organizations insure no data loss?
I apologize beforehand, but, we are just in the process of putting 

Our SMF data to Log Streams.   Any tips or suggestions in the form of best
practices would be appreciated.   

 

Kenneth J. Kripke 

 

k.kri...@comcast.net 

 


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

Re: Someone just too smart for his or her own good?

[Kenneth J. Kripke]

>dcl sum fixed (7) init (-0.1);/* Packed Decimal? */

 

>for i = 1 to whatever;

>  if a(i) >= 0 then

>sum = sum + a(i);

> 

And there, at least I'd do:

>  if a(i) >  0 then

>sum = sum + a(i);

> 

as long as testing, why bother to add 0?

 

>if substr(unspec(sum), 25, 8) ^= '0d'bx then/* test the sign of the
number? */

>  put data(sum);

> 

Unspec function returns a binary representation 

 

Sincerely;  

 

Kenneth J. Kripke

 

kennethkri...@gmail.com 

 


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

Friday question: ISPF Statistics Manipulation

[Kenneth J. Kripke]

Friday question: ISPF Statistics Manipulation:

A product that tracks and controls access to members within a PDS is
eventACTION.  

Granted, it doesn't prohibit someone from changing the ISPF stats for a
member, 

But, if the library is controlled, It will prohibit updates unless
authorized.  

It will also track and report accesses and the nature of access.  

 

Sincerely;  

 

Kenneth J. Kripke

 

k.kri...@comcast.net 

 


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

Subject: Member search in multiple PDS

[Kenneth J. Kripke]

If you have Innovation Data Processing's products installed, specifically,
FDREPORT, 

A report can be generated based on a XDSN= dsn mask, and, then in the REPORT
section, you can specify DIRISPF to list the members, who updated last, etc.


The data can be sorted as well within the program.  

 

kennethkri...@gmail.com 

 


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

RLS implementation for CDS's in DFHSM

[Kenneth J. Kripke]

Thank you to all that have responded to my inquiry. 

 

 

Sincerely;  

 

Kenneth J. Kripke

 

Kenneth J. Kripke 

k.kri...@comcast.net 

 


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

RLS implementation for CDS's in DFHSM

[Kenneth J. Kripke]

This is an inquiry to see if there are shops that have implemented Record
Level Sharing for their CDS's in DFHSM. 

1.   Concerns are how frequent have other shops experienced failures in
the SMSVSAM asid. 

2.   Do you have multiple ARCMDxx members to cover in the event of an
SMSVSAM outage? 

3.   Have you had to go through a recovery scenario due to an SMSVSAM
outage? 

 

 

Sincerely;  

 

Kenneth J. Kripke

 

Kenneth J. Kripke 

k.kri...@comcast.net 

 


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

Re: IPCS BLS18028I message suppression

[Kenneth J. Kripke]

You cannot OUTTRAP Tputs, and, some of the outputs from IPCS utilize TPUTS.


Messages delivered via PUTLINE can be OUTTAP'ed. 

 

 

k.kri...@comcast.net 

 


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

ZOS 2.1 Message Flood Automation in a JES3 environment.

[Kenneth J. Kripke]

First off, thank you to W. Kevin Kelley for your response dated Thursday,
June 12, 2014.  I am guessing that based on your response, 

It is up to automation to inspect the Message Flood Indicator(s) in the WQE.
I am curious exactly what indicates a message is to be suppressed. 

There is the WQESUPB byte,  the WMJMSUPB byte, the WMN1SUPB byte, the
WMN2SUPB byte ?  For non-specific messages in our MPFLIST, 

.NO_ENTRY AUTO(NO),RETAIN(NO),SUP(YES) 

The purpose of these questions is to build a case where we can make an
informed inquiry to our Automation Vendor.  

 

Recap of original discussion: 

 

Environment: ZOS 2.1 with JES3; OPS/MVS automation 

 

Question:  Is there a way to prevent messages being placed on the SSI after

Message Flood Automation has determined the message is not to be queued to a

console and or SYSLOG.  As it stands right now, our automation product,

OPS/MVS still sees the messages even though MFA has suppressed the display

of messages to SYSLOG and consoles.  We have interrogated the flag settings

in IEAVMXIT to check if the messages have been processed by MFA and have

turned on the request delete flags, but, to no avail.  

 

Response: 

Date:Thu, 12 Jun 2014 21:11:22 -0500

From:W. Kevin Kelley wkkel...@optonline.net

Subject: Re: ZOS 2.1 Message Flood Automation

 

If the Message Flood Automation policy for the message is NOLOG, NOAUTO and
NODISPLAY, the message will cease to exist after it returns from the SSI.
The combination of these three is functionally equivalent to setting the
CTXTRDTM bit in an MPF exit. The point is that the message does not cease to
exist until it gets back from the SSI; it is up to every subsystem that
looks at WTOs (WQEs) on the SSI to determine that a message has been marked
for deletion and ignore the message if it so chooses.

 

Not all products receive their messages through the SSI. Some front-end the
WTO SVC which occurs before Message Flood Automation has seen the message.
Such products will be oblivious to any changes made to the message by
Message Flood Automation. Some products receive their messages through the
EMCS interfaces. These products will not see any messages that are deleted
(NOLOG, NOAUTO, NODISPLAY) by Message Flood Automation; they will see any
messages for which the Message Flood Automation policy specifies AUTO (even
if the message is not to be logged and is not to be displayed on an operator
console). 

 

W. Kevin Kelley -- IBM POK Lab -- z/OS Core Technical Development

 

 

 

 

Sincerely Yours; 

 

Kenneth J. Kripke 

 

k.kri...@comcast.net 


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

ZOS 2.1 Message Flood Automation

[Kenneth J. Kripke]

Environment: ZOS 2.1 with JES3; OPS/MVS automation 

Question:  Is there a way to prevent messages being placed on the SSI after
Message Flood Automation has determined the message is not to be queued to a
console and or SYSLOG.  As it stands right now, our automation product,
OPS/MVS still sees the messages even though MFA has suppressed the display
of messages to SYSLOG and consoles.  We have interrogated the flag settings
in IEAVMXIT to check if the messages have been processed by MFA and have
turned on the request delete flags, but, to no avail.  

The mapping macro for the flags is IEZVX100, the Dsect that we have
addressable to is CTXT, and, the fields of interest are

 

45  (2D)BITSTRING1CTXTSFB2 STATUS FLAGS BYTE TWO
  1...     CTXTSRET X'80' MSG TO BE
RETAINED BY AMRF
  .1..     CTXTSAUT X'40' AUTOMATION
SPECIFIED
  ..1.     CTXTSNMD X'20' PRIMARY
SUBSYSTEM
MODIFICATIONS NOT
ALLOWED
  ...1     CTXTSRIS X'10' REISSUED
MESSAGE
    1...   CTXT_PROCESSED_BY_MFA
X'08' Message
Flood
Automation processed
this message
    .1..   CTXT_MSG_TO_BE_DELETED
X'04' Message will
be deleted
    ..1.   CTXT_WTOR_MONITORED_BY_AUTOR
X'02' WTOR is
being
monitored by
Auto-Reply
processing

 

49  (31)BITSTRING1CTXTRFB2 REQUEST FLAGS BYTE

TWO

   1...     CTXTRDTM X'80' DELETE THE

MESSAGE (NO HARDCOPY

AND NO DISPLAY)

 

I set the CTXFRB2 flag to Delete, but, to no avail.  I know that Automation
packages can choose to ignore this setting, which appears to be the case in
our environment.  

Is anyone else using Message Flood Automation, and, have you been successful
in preventing messages being picked up by your automation packages?  

 

Kenneth J. Kripke 

k.kri...@comcast.net 

 


   


 

 

Sincerely Yours; 

 


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

DB2 subsystem availability

[Kenneth J. Kripke]

Hello;

 Is there a way to determine if a DB2 or any subsystem is truly
available?  I know how to sweep the SSCT entries to see if they are defined,
but, 

Is there a way to see if the subsystem is truly alive and can process
requests?

 

Kenneth J. Kripke 

k.kri...@comcast.net 


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

Re: DB2 subsystem availability

[Kenneth J. Kripke]

Thank you to all that have responded.  

What I am attempting to accomplish.  

I wish to perform a pre-emptive check on the availability of a DB2 subsystem
on another sysplex prior to shipping a batch job over to that 

Plex.  Yes, I could code a small SQL QUERY and check for the SQLCODE
returned, but, I wanted to know how something like MSI can show that a
subsystem is defined, but, is not active.  

Special Thanks to Wayne Driscoll.  I will test this out, but, it looks like
the solution I am seeking.   

 

Ken Kripke 


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

Replacement for LISTDSI for multivolume datasets searched

[Kenneth J. Kripke]

These are ALC macros, but, since you have the disk volsers, they can be
used.  

From the manual DFSMSdfp Advanced Services, Document Number SC26-7400-10

Look at OBTAIN and CVAF. 

K. Kripke

kkri...@mindspring.com

 

  

 

 

 

 


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

Anyone know how to copy a PDS directory as a flat file?

[Kenneth J. Kripke]

Ref:  z/os V1R13.0 DFSMS Using Data Sets, SC26-7410-11

This has the structure of a PDS Directory Block.  

Since you will be most likely be using QSAM to process, the first half word
will contain the maximum number of bytes used in the directory block.  You
won't see the COUNT and KEY fields of the DIRECTORY.  

Next will come the member NAME, ttr, C field, and, the number of TTRN's.
You will want to AND out the C field.  Then multiply the number of ttrn's by
2 to convert to bytes.  

This will be your increment to the next entry into the Directory block.  I
don't know if the directory block is marked with XL4'F' as a member
name or not to denote the logical end.  This will have to be verified.  

At any rate, if your goal is just to get a list of the members contained in
a PDS or PDSE, I think this will work.  I have some code that pretty much
does this in ALC to read and process a PDS, and, it works.   

 

K. Kripke 

kkri...@mindspring.com

 


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

ADDRESS LINKMVS - +IRX0250E System abend code 047, reason code 00000000

[Kenneth J. Kripke]

Cut and Paste from the manuals: 

z/OS V1R12.0 TSO/E REXX Reference

SA22-7790-09 

 

 

. Linking to and attaching programs 

You can use the LINK, LINKMVS, and LINKPGM host command environments to link
to unauthorized programs. For example: 

 

 ADDRESS LINK program p1 p2 ...

 

You can use the ATTACH, ATTCHMVS, and ATTCHPGM host command environments to
attach unauthorized programs. For example: 

 

 ADDRESS ATTACH program p1 p2 ...

 

For more information about linking to and attaching programs, see Host
command environments for linking to and attaching programs in topic 2.5.9.

 

 

12.2 Exec processing routines - IRXJCL and IRXEXEC

 

 

This topic provides information about the IRXJCL and IRXEXEC routines, which
you can use to run REXX execs. You can use IRXJCL to run a REXX exec in MVS
batch from JCL. You can also call IRXJCL from a REXX exec or a program that
is running in any address space to run an exec. 

 

You can call the IRXEXEC routine from a REXX exec or program that is running
in any address space to run an exec. IRXEXEC provides more flexibility than
IRXJCL. With IRXJCL, you can pass the name of the exec and one argument on
the call. Using IRXEXEC, you can, for example, pass multiple arguments or
preload the exec in storage. 

 

The following topics describe each routine. If you use either IRXJCL or
IRXEXEC to run a REXX exec in TSO/E foreground or background, note that you
cannot invoke the REXX exec as authorized. 

 

Note: To permit FORTRAN programs to call IRXEXEC, TSO/E provides an
alternate entry point for the IRXEXEC routine. The alternate entry point
name is IRXEX.


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

ADDRESS LINKMVS - +IRX0250E System abend code 047, reason code 00000000

[Kenneth J. Kripke]

DATA AT PSW  0001CE48 - 58101000  0A6B5023  

Data shows a MODESET SVC which does require authorization.  

Check the AUTHPGM specifications in IKJTSOxx in SYS1.PARMLIB 

Probably need an entry there for IEHPROGM.  

 

K. Kripke 

kkri...@mindspring.com 

 


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

CBT site issues?

[Kenneth J. Kripke]

Hello, 

 I tried to access http://www.cbttape.org/ and I receive the following

You see this page because there is no Web site available at this address:
http://www.cbttape.org .

Is anyone else experiencing this? 

 

kenneth_kri...@att.net 

 


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