Don't know how super-efficient it is, but use DCOLLECT input (or FDREPORT
extract if you have FDREPORT), then in Rexx under IKJEFT01
Read a record
set dataset_name_variable to the DSN
If you're worried about uncataloged also set unit and volume variable
ALLOC FI(X) DA(dataset_name_variable) SHR
I'm sure this has been asked and answered somewhere in the dusty archives of
this list, but I honestly couldn't figure out a way to formulate a search for
it that would return mostly useful information
Does anyone know the historical/technical reason for some products, (at our
shop
According to IEZCIB, STOP is x'40', MODIFY is x'44' and START is x'04':
CIBVERB DSC - COMMAND VERB CODE
CIBSTART EQU X'04' - COMMAND CODE FOR START
CIBSTCOM EQU X'08' - COMMAND CODE FOR STC COMMUNICATION @G860P2G
CIBMODFY
We're scheduling our second round of NON-concurrent TS7740 maintenance, and so
far we've had no other kind.
If there are others on the list who have IBM TS7740: are you always asked to
take your box offline for maintenance or is it just these two latest software
changes?
The user ID is not sufficient because of user ID propagation. We want to
segregate scheduler-submitted production work; production work
created/submitted by users; and 'other'. Unfortunately, some jobs in the
scheduler were 'grandfathered' in without review, and use IEBEDIT or IEBGENER,
etc.
Is there any formal process for making enhancement requests for SCRTTOOL?
Since it is not officially a component of any IBM software I am not sure it
falls within SHARE's requirements process.
A previous post this month about finding missing intervals makes me think that
it would be nice if
Yes, it is official IBM software but because it isn't supported by the usual
development team and management structure.
There are a few IBM pieces of software that are used by many customers but are
in this 'grey' area - SCRTTOOL is one, another is the set of tape tools that
are downloaded.
I don't think you want to sell this as 'mainframe'. I think you want to sell
this as 'Enterprise class, cost-saving, Linux virtualization box'... the
server folk have already attached negative connotations to the 'mainframe' word
in management's mind. Presenting the cost savings (especially
A couple of questions I haven't seen yet
1. Was the original FTP done in binary or text mode?
2. Do the corrupted records make any sense as EBCDIC characters when you
browse/view the corrupted file?
This smells like an issue we had once, someone FTPed a PC file with some option
set that caused
Do they all fail at offset 0 or just AMATERSE?
Do you have any exits or vendor products that monitor program use - including
things like Omegamon? Have they been upgraded to levels compatible with 2.1 ?
I ask because I experienced a similar thing during an OS upgrade (not to 2.1
...) where
SMS data class can not only affect space settings, but also whether SMS
compression is used, whether space constraint relief is used during allocation,
etc. While the x37 products are good, there's a lot that can be done with
just SMS.
IDCAMS PRINT (infile/indataset) HEX will do a hex-only dump of a dataset. The
options are CHAR/DUMP/HEX with DUMP being the default.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
First: You catalog all of your tape datasets I hope.
Second: No one mentioned the 'TI' (Tape Inquiry) command shipped with later
versions of CA-1? It can be used as a line command in ISPF 3.4 and gives you
information about those datasets and some info about the volumes.
Third: I wrote a
You can run Subcapacity Planning Tool (SCPT) to help prepare for subcapacity
reporting.
You can, I believe, run the Subcapacity Reporting Tool (SCRT) even if you don't
submit the report.
There is a section of the SCRT spreadsheet report that show the Product Max
Contributors - but note that
Of course, if you have an automated operations tool, then instead of SEND issue
a WTO and let the tool do things when the message appears.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
Example JCL for the TRENDS situation used to keep a history. This shop elected
not to use GDGs. The EREP9000 contains two control statements but I don't
think they've been touched in over 15 years (they are listed after the JCL)
A lot of those values are in RMF type 70 records. If you don't need to
"sample" and you don't want to run a command all the time, then implement an
IEFU83(and 84?) exit to examine the value, possibly finding a way to issue SEND
when approaching the defined capacity value. I say "possibly"
Did not see this caveat, and I had some big troubles from this, so I have to
mention this:
IF you allocate an INTRDR under TSO, you need to find a way to limit how many
concurrent users use it. Unless things have changed since I retired, internal
readers are _not_ an unlimited resource,
Yes - exactly - we had a talk with the hogsters, but that after-the-fact
action really doesn't calm down managers who are freaking out because work
can't be submitted while it's happening. We ended up, I think, ensuring that
the maximum number of internal readers was greater than the maximum
Does the tape subsystem have physical tape cartridges? If so, then tape
mounts are probably a big part of the time involved. I can only speak to the
IBM TS 7700 I last used before I semi-retired, which had high-capacity tape
cartridges.
1. Scratch tapes are 'fast ready' (I think that's the
Another reason to go to SMP/E packaging from a customer perspective is that
SMP/E packaging underlies ZOSMF and CA MSM management of software and fixes.
We hadn't used ZOSMF before I semi-retired, but I had used MSM and there are
time savings among other advantages.
Apologies - I had overlooked the configuration.
Have you looked at individual volume timings? Are some as quick as their
original dump and some not or are all of the restores a lot longer?
How many tape drives were used for the DUMP? How many for the restore?
The BUFNO= is only needed if you did _not_ increase the block size of your TMC
(available in latest releases, along with other improvements to the TMC
including uptime improvements like allowing online extension of a TMC in use by
multiple systems.. Thanks, CA! - I'm retired and only
I was responsible for an IBM/Florida DOT-modified version of the JES2 RJE
Workstation program, which ran on a 4341 in South Florida. The workstation
code was modified to support reading round-hole Remington Rand cards on a 2540
(?) reader with column binary. The round hole cards used to be
Probably too late to help now, but SMFPRMxx members do allow comments, and when
we created our TYPE( ) parameters we created comments for each non-IBM pne out
to the right
For example
...
250, /* IBI Products */
I was at SHARE and attended a session about the new HTTP client service - a
callable service built into the BCP to allow programs to be HTTP clients and
retrieve information over the HTTP protocol.
I thought of another useful service that could use some of the same components
of the HTTP
I've written code (a few years ago) to chase the TIOT to determine if there's a
DD name present, but it occurred to me that it's a pretty common thing to do,
so I wonder is there now a callable service to determine if DD 'some_dd_name'
is present ?
Thanks for the info... Using a RESTFUL interface is probably the way to go for
the use cases I had in mined - primarily having an automated operations tool
send notifications to support personnel. We used to have a way to do it for
pagers but never got one built when cell phones became the
After discussion at SHARE, I created an RFE (back in March... sorry for the
late notice, but life happened and I forgot about it) to add support for the
SMPP (Short Message Peer-to-Peer) protocol, for outbound messages. This is the
protocol used to communicate the the servers that support the
Levi, Ray, and Shoup's product VPS (Virtual Print) has a component named DRS
which does what I think you want - it captures print that CICS or IMS thinks is
going to LU1/LU3, and puts the info on the spool. VPS could then print it.
CASI has a product named CICS2PDF which can create output as
I've created an FTP client report in comma-delimited format from SMF 118s (yes,
I know they should be capturing 119s but they aren't yet, and this isn't about
that).
To make the IP address readable, I used an edit on each byte of the address and
the SQZ function to put them back together.
IF the batch job is scheduled, and IF you have an automated operations tool,
and IF your scheduler has an external command interface, THEN:
What we (in Pecan/Beta42/ASG Workload scheduler) was define a variable (example
$CICS1), and make a predecessor for the batch job with the value $CICS1 =
Someone wants a WTO that shows SMF70LAC (the 4-hour rolling average of MSUs
value) every time the RMF type 70 is written. IEFU8* is the best exit point
to do that, as near as I can tell, however what I don't know is whether type
70s are written the "normal" way, via branch-entry, or via
There's a system where their 4-hour rolling average maximum is always during
their batch window, when they routinely reach their defined capacity limit,
which in turn affects what they pay in a chargeback system.
Because of scheduling dumbness (another story) they have several gaps in their
I would like to add one other advantage that I took advantage of. When you
define your hipersocket network, you can define a very large MTU size for the
hipersocket network. This can eliminate a lot of segmentation/re-assembly
overhead because the data transmission is broken up into fewer
Did you determine what the problem was?
My input would have been to compare Syncsort default parameters in case someone
forgot to migrate them to the new release.
--
For IBM-MAIN subscribe / signoff / archive access
Do these chpids connect to any fiber switches not controlled by you? I got
called very early one morning due to a bunch of channel errors. At the data
center where I worked, fiber switches were not owned by our group. The
brainiacs who did own responsibility for the switch decided to take
I see and understand some people's desire to directly allocate in KB, MB, GB
(or, coming soon to an array near you, probably TB, and PB).
What I like about AVGREC is the ability to allocate in _records_, eliminating
tedious space calculations when I have a good estimate of the size of a
SMF type 26 (job purge) has the submitting user ID - but _not_ task
identification (job name/job id/reader time). We have for some reason jobs
submitted by the scheduler which run IEBEDIT to "submit" another job and that
job in turn "submits" another - all with user ID propagation. They are
Bringing this back up again because I still haven't found the answer yet. Are
SMF type 70s written by RMF via branch-entry, requiring me to use IEFU85 exit
point to examine them, or can I use just IEFU83 or IEFU84 ?
--
For
I think I want to set up a data class without compression, and assign certain
data sets to it. I was _hoping_ that I could override the SMS compression via
TRTCH=NOCOMP so that I could show people the difference in CPU time with and
without SMS compression.
I will go ahead and create the
We have a job which creates "tape" files in TMM (Tape Mount Management) via SMS
redirection. The data class assigned to the output dataset has SMS tailored
compression turned on. I would like to see how much that compression is
costing in CPU time by running the job without compression.
It's been a few years (retired / consulting now) since I had the duty of
looking at EREP records but as with what many others have said, it's about what
seems "normal" in your environment, although I've had instances of 0C4 that was
occuring regularly, though handled by the piece of software in
I know I am late to this, but I see no BLOCK CONTAINS 0 RECORDS in the COBOL.
I'm not totally current on COBOL releases, but
A) is that still required to use block size from the JCL
B) is it even relevant in this instance - COBOL will use the block size value
of the dataset that's input, yes?
I think it'd be interesting. It's been a while since I had access (now retired
/ consulting) but the HMC allowed you to pull up something (a spreadsheet if I
recall) of kWH by some interval, so you could (probably only on z13 and above)
have some real data. I don't know if they ever
z/OS 2.2 has a set of callable routines that provide HTTP client capabilities.
I saw a presentation at SHARE San Antonio. I think it is part of the 'web
enablement toolkit' - see this link
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.ieac100/ieac1-cwe-http.htm
Forgive me if I posted this before... If so, life intervened and I don't
remember.
Is there a list documenting which ISVs participate in Subcapacity Reporting and
which will supply an ISVLIB file for such use?
I know CA Common Services will, if you set the option, produce type 89 records
but
I can vouch for 'modern CA1' - I went through merging tape databases for
several LPARs into one shared tape database, then after that was able to do
maintenance taks without outage.
re: BSAM vs. VSAM vs. whatever.It would be nice if products which used
"databases" used a standard API
I am not sure why you want to capture this with Rexx, but I will second the
idea of using the SPIN= keyword to spin off log entries on a regular interval.
If you just want to capture to disk, you can use one of the products mentioned,
or if you don't have such a product, you can create an
This is, actually, a request for records - I was using the 1-byte average
record size because I thought the original poster wanted to allocate in
megabytes. If you want to request records and you know the LRECL or the
average LRECL, use AVGREC=U/K/M, and SPACE=(avgLRECL,(pri,sec)) where
AVGREC=M,SPACE=(1,(1,1)) allocates one MB with a 1MB secondary extension in
JCL.
AVGREC(M) AVBLOCK(1) SPACE(1,1) will do the same thing in TSO.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
I believe there is a DB2 JDBC driver. How, exactly, you get it installed and
running under CICS should be documented by IBM.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
I'm catching up late here, but in connection with the original poster's
statement, couldn't the health check "go hunting" and report the offenders?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
These are on z/OS in Unix Systems Services, the logs for the IMWHTTPD web
server. I tried without DCB but I believe some DCB must be supplied , as
someone said the access method will deal with the Unix-to-record stuff. I
thought my LRECL was 290, but things did not work until I increased it.
it appears to be 'V' but I don't see where I could get BLKSIZE from
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
I want to do some simple reporting on my HTTP logs (httpd-log.MMMdd). I'm
coding PARSE= to get the information I want, and I think I understand that
part, but when I run my job SORT complains about RECFM, LRECL, or BLKSIZE.
Viewing the logs, it looks like the record length is 290 (that's
If you need to publish calendar information for others to use, I suggest using
your PC/Mac calendar tool and publishing the calendar in .ics format
(icalendar, RFC 5545). In Outlook you can publish to a WebDAV server or export
to a file (or share via e-mail).Put that file on your web
Unless things have changed, a 26K CI size is better than 32K because two CIs
fit on a track. If I'm understanding this application it:
1. reads everything from the first file
2. for each record in the first file, it attempts to do a random read to find a
match in the second file
3. IF it
Has anyone documented the JOBGROUP interaction with existing schedulers?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
When I last worked on this, we used CA-1's catalog retention (RETPD=99 if I
recall) for the GDGs, but because of the 255-entry GDG limit we had to do some
'merge jobs' to combine various archive "tapes" (ours were redirected to disk
by Tape Mount Management) so we could have a year or two
I created an SHARE requirement (if you're a member you can find it at this
link: https://www.share.org/p/is/vi/iid=154=12 ) about this, but I'd love
to hear some discussion so I'm posting here too. My idea is that when IBM
offers some new "outboard" capability such as zEDC, they need to
According to the message the IGGCL0FM-2 shows the DADSM Scratch status code.
According to DFSMS DFP Diagnosis, this status code could mean:
2 (X'02')
One of the following conditions occurred:
- The data set could not be scratched because the console operator or TSO/E
terminal operator did not
I tried this, and ended with S001-1 abend
//SORTEXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTWK01 DD UNIT=DASD,SPACE=(CYL,(500,500))
//SORTIN DD PATHOPTS=ORDONLY,
Maybe I had LRECL too small? LRECL=512,BLKSIZE=32760 worked
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Let me add to my post - if you read abut SMF CI Size in member ACHAP03 of the
MXG source/documentation library, you will see a very good discussion of the
trade-off between DASD space and CISIZE in MANx datasets. Apparently SMF
doesn't do VBS in the MANx datasets in the same way "regular" VBS
Do you have MXG? They have a program, ANALSMF, which will analyze your current
SMF. In general, what I've done and which seemed to help:
Set MANx CISIZE to half track (26624).
In your IFASMFDP JCL to dump a full MANx dataset (we use IEFU29 to issue a
start for SMFDUMP JCL to dump one
First let me state we are copying the hardcopy log to disk in two ways:
1. External writer proc, SLOGWTR, which writes to a GDG
2. OPLOGCPY job which copies from system Logger OPERLOG to disk
I haven't convinced others to rely on OPERLOG yet :-(.
In any case, I have a small issue.
Let us not forget one of the fun cases: exit code which exists, but because of
external circumstances, is ineffective: for example account number checking
when the idea of chargeback has been dropped and the check now allows anyone to
use any code, or an exit which uses RACF to check on
I haven't seen the Apache web server mentioned for some reason. I haven't used
Apache but on the previous Domino-based web server you could write a Rexx CGI
(Common Gateway Interface, not Computer Generated Images) program that could
be invoked via URL and retrieve whatever you want. When I
I moved a lot of tape datasets to SMS managed disk, also, but one group of
application people fought the idea of using unique, catalog-able names for
their datasets. Pure laziness - they didn't want to go through the work of
making the changes and testing. They did eventually have to do it
I would have assumed that "SELECT WHEN" would be processed into different
things internally than "IF/THEN/ELSE", but your evidence would imply
otherwise... it implies that "SELECT WHEN" is perhaps pre-processed into
"IF/THEN/ELSE" statements before "compiling". Either that, or someone tried
I don't understand why the OP wants to receive it to USS and then copy it to an
MVS dataset when they could run FTP under TSO and receive the XMI file directly?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
I seem to be finding different answers on this.
A vendor used to ship some files as PDSes with RECFM=FB and LRECL=80 (BLKSIZE
23440). User-customized members at this shop were put in a different PDS,
with the same attributes, and concatenated in cataloged procedures, ahead of
the vendor's
I believe concatenation now uses the largest blksize, not the first one. Not
sure about LRECL
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO
Not the simplest, but
Write an IEFUJV exit. When you find EXEC on a statement, and you cannot find
PGM= on that statement, you have a proc. Write a simple SMF record with a user
record type (128 -> 255) .
Post process with SORT to summarize usage counts.
This won't pick up JCLLIB, etc.
Is there an exit that can "see" these messages? Maybe an MPF exit? If so, you
could always write an exit to echo the messages to some routing code that
doesn't go to the console, process it with automation, and hopefully prevent
it from going to your operlog or syslog.
If you do find out what they did to resolve it, would you please post it here
for the education of all?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message:
I have created a SHARE requirement for this (which I think was submitted to
RFE) _and_ an RFE ( 133491 ) to write IEFC001I and IEFC002I information to SMF.
If voting is still open and this information is important to your shop, please
vote. My suggested solution was to make any solution
If this is running in batch, can you make the ID have PROTECTED status, as long
as the ID is propagated from something that submits the job?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
For a number of years I've let the catalog and/or SMS supply the unit, but
I've supplied unit count (ex: UNIT=(,3) ) to overlap I/O and mount processing.
I even use it with virtual tape systems that have physical tape backup -
because it can allow a recall of a virtual volume to be done
You can do this with ISPF in batch, and Rexx. I've used this when I had to
change the one thing in hundreds of PDS members. Of course you have to balance
your development and debugging time versus just doing repetitive edits via
RCHANGE (PF6)
To invoke ISPF in batch. Note BDISPMAX
These may be dumb questions but:
1) I'm assuming you connected to the remote application first? Else how could
it connect without the IP address somehow?
2) Why isn't the remote application content with the host/domain name (since IP
addresses _can_ change)?
3) Why isn't the remote
Yes, I've looked at Scott Barry's presentation. It tells me a lot of good info
about zEDC measurements, and it does document compression information in type
14/15 but it appears as though IBM didn't provide any measurement of CPU used
by SMS compression. I guess the fallback is to try to run
These are all good questions - in this instance I don't know the internals of
the product that might be creating these long names. It's a 'developer
studio' type of product which runs on Windows and communicates to a started
task from the same vendor which can also run on other platforms such
Not worried about the efficiency of compression. The issue is showing to
someone the CPU saved by using zEDC instead of SMS compression. IBM's zBNA
tool estimates it, and we may just use that, but I was hoping someone had a way
to measure the CPU used just for SMS compression in a job,
"the big diversion"?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Figuring that this is 'working as designed', I have started a SHARE
requirement, where discussion could take place. My suggested improvment is
that for multi-unit, multi-volume datasets (and I realize this probably mostly
applies to tape) a consolidated list of volumes for the concatenated
I'm curious about how many here run ASG's Workload Scheduler, which was
Beta-42, and before that was created by Pecan. The shop I'm working for still
runs it and is still happy with it for years though they've asked me at times
to do some specialized reporting about tasks and schedules (which
As mentioned before, I've created a SHARE requirement and an RFE to have the
system record the information from the IFC001I (cataloged procedure was
expanded from... msg) and IFC002I (INCLUDE was expanded from... msg) message in
an SMF record.If this would be important or useful to your
Can you, if you automate the message, in that automation code issue something
that gets invoked after on a timer basis? If so you can issue a message 'n'
minutes after the mount message. I know AF/Oper from IBM/Candle has that
capability but I don't know much about OPS/MVS.
I don't know of a list to discuss PComm but if these printers support IP
printing (either direct socket or LPD protocol) - and most do these days - you
can define the IP address or host/domain name in something like VPS or
Infoprint and eliminate the need for the 3270 printer emulation session
Is there a way to use long alias names in PDSE for members that are not program
objects? I've seen symbolic links to a PDSE (or am I seeing one for each
member?); we're asking if we do that to share a _data_ PDSE with tools that
only understand directories, can we create names longer than 8
Skip - we run IEAMDBLG to offload OPERLOG to sequential datasets, named with
the date, once a day. You could offload your three systems to temporary
sequential datasets and combine them via SORT (DF/ or Sync) into something
sorted by date and time. One caveat - even if you use
If those quotation marks are part of the output of the Rexx routine, that's the
issue. E-mail program would not treat those lines as the commands they purport
to be, because the lines don't begin with a recognizable command they begin
with a string that consists of the double quote PLUS the
I can't remember if I posted this before, but it's come up again so I'm asking.
Is there any way, short of running a job with SMS turning compression, and
running it a different time with compression off, to measure the CPU time used
by SMS compression for a dataset? I know I can get zEDC CPU
I don't think we had the number of volumes Skip has, but we did several
migrations using short-term leases of FDRPAS and they all went extremely well;
the great thing about FDRPAS is that you don't need to do most of it during
"down time".
I don't check this list regularly but I think you slightly misunderstood. I'm
not looking for who is using what procedure _library_. I'm looking for the
use of individual members. RACF doesn't (unless it happened in a recent
release and I missed it) allow us to audit individual members of
We submit a batch job with two steps: first step IEFBR14 with the dataset name
allocated DISP=OLD, second step IDCAMS to do ALTER dsname NEWNAME(newdsname).
The job ENQs on the dataset name so new TSO allocations for it fail, and the
job waits until all TSO users using it have freed it or
Maybe it's because you have start date in the DATE parameter? In the
documentation at there are specific rules about ignoring the start date when
using ARCHIVE or DELETE
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.ieag200/dumplopt.htm
There are these statements
Do any of you run FOCUS for Mainframe from IBI? If so, do you also license
their FOCLOG feature to record information about what programs (called
focexecs) have run and what resources they used?
[Without that log, it's pretty opaque - you can see in SMF that FOCUS was run
as a batch
1 - 100 of 128 matches
Mail list logo
