Arye Shemer wrote:
Real good stuff,
although I hoped for some pure and natural Assembler macro or
calling routine solution.
If you just want Assembler code to perform the basic arithmetic
of converting a z/OS UNIX file timestamp to a displayable date
and time, you can look at the source code
Dave Day wrote:
The SVC in question has but one purpose. To generate a system trace
table entry. The code within the SVC clears r15, and then branches r14.
Nothing more.
Then why not use SVC 50 (x'32')?
Cheers,
Greg
Juergen Keller wrote:
I wonder what the TERMINAL-command is for.
The TERMINAL SCRSIZE setting controls how TSO line-mode
terminal housekeeping is performed. Fullscreen applications
are free to use an available screen size different from the
one used by line-mode TSO. Of course, many fullscreen
Tony Harminc wrote:
On 7 October 2011 16:34, Shmuel Metz (Seymour J.)
shmuel+ibm-m...@patriot.net wrote:
(snippage)
How do you direct the output of TPUT to another user from an
unauthorized program?
Same way it's worked since 1970 or so - issue your TPUT with TJID= on
it. In newer OS
Rick Fochtman wrote:
Received from another list:
--
To those who new him:
Gilbert Sain-Flour passed away last night in Montauban France.
He will be missed.
Carlos Aguilera Sr,
Sad news
Steve Comstock wrote:
The real issue is what LE uses to switch AMODE when the
setting is AMODE31(OFF); it may be more than just a BASSM
or SAMxx. I don't really know, but I somehow expect overhead
and complexity in that scenario (COBOL interacting with non-LE
Assembler, as specified in the
Walt Farrell wrote:
The system will do the checks for you at OPEN time, and any check your
application makes may get the wrong answer in some set of circumstances. In
my opinion it's usually poor application design to make a dsname check. You
really should let the system do it for you, as it's
Paul Gilmartin wrote:
This standard procedure is of little avail to the user who can't
get past the I/O error to issue the SAVE and END commands. Surely
issuing GTTERM would be a reasonable component of recovering from
a terminal I/O error.
When running pre-z software the TSO LOGON RECONNECT
Ed Gould wrote:
Just a point of curiousity Skip. Was it done by IBM Maintenance or done
locally?
I believe that IEFBR14 has always been in both SYS1.LPALIB
and SYS1.LINKLIB for MVS. It has certainly always been there
since MVS 3.8, and as a result of this thread I just checked and
it is in
I suppose one reason you might want to use REVED (the
alias of REVIEW which makes the default action edit instead
of browse) is if the data being edited is too big to fit in your
region.
REVED will hold the data being edited in a data space which
can grow to 2GB in size subject to local limits
I always thought that the system took a copy
of the pre-OPEN DCB, and restored it after
CLOSE, with the possible exception of DCBBUFCB.
After an OPEN and CLOSE of an EXCP DCB, the
bits in DCBBFALN which flag the presence of a
DCBE address in DCBDCBE have been zeroed.
Assuming my observations are
Gilbert Saint-Flour wrote:
Mike Wood said :
check the value of DCBTIOT which is increased each time QSAM/BSAM
start to read the next concatenated DD
Considering the future, and, hopefully, EAV being more prevalent
in future, a better choice than DCBTIOT is to use DSABTIOT.
Is that due to
Mike Wood wrote:
Considering the future, and, hopefully, EAV being more prevalent in future,
a better choice than DCBTIOT is to use DSABTIOT.
Once the DCB is open, issue GETDSAB LOC=ANY,DCBPTR= ...
and use the DSABTIOT change to detect the concatenation change after each GET.
Mike Wood
Ed Finnell wrote:
In a message dated 6/25/2010 5:31:07 P.M. Central Daylight Time,
rfocht...@ync.net writes:
with Bruce Leland, the original author, for about 25 years.
Author(s) Mike Smith and Bruce Leland.
Big bloke with the red hair? Steve Smith. Most of the original
ISPF
Frank Swarbrick wrote:
On 5/20/2010 at 2:22 AM, in message
29s9v5lniuvtpalf97r7chtu7ogfmj7...@4ax.com, Binyamin Dissen
bdis...@dissensoftware.com wrote:
snippage
Submit a requirement.
No doubt. I'm just amazed that such a requirement wasn't submited 30 years
ago.
Frank
30 years
Mark Zelden wrote:
The records were written, just without (some of?) the CPU related data.
MVS 3.8 had sequential SMF data sets (SYS1.MANX and SYS1.MANY
with DCB=(DSORG=PS,RECFM=VBS,LRECL=1000,BLKSIZE=1000)
even though some records - from MF/1 for example - could be longer
than 1000 bytes).
The
Paul Gilmartin wrote:
Greg Price's tests seem to disagree with CC on this point. But
it's possible my description was insufficiently clear, and Greg
may have swapped the function of the alias and primary names.
Yep, that's what happened. I took WOMBAT as the real name
and FRED and JOE as
Paul Gilmartin wrote:
Suppose that (necessarily different) data sets in the programmer's
STEPLIB concatenation contain:
load module FRED with ALIAS WOMBAT
load module JOE with ALIAS WOMBAT
and the programmer issues:
LOAD FRED
LOAD JOE
As the esteemed Mr. C has
Bernd Oppolzer wrote:
I have the following problem:
a piece of software that I'm not allowed to change due to legal reasons
walks through the LLE list to look for a specific module.
Any chance of purging the module from the LLE chain (via
DELETE I'd expect) and then issuing a LOAD so that
Charles Mills wrote:
Is there a way to determine if a DD statement has been allocated DUMMY,
short of SVC 99 info retrieval?
Sometimes I use the minimum call type of the DEVTYPE macro,
and test for zeros being returned, as per the DFSMSdfp
Advanced Services manual.
To be pedantic, I suppose I
zMan wrote:
ISTR it was used by PL/I.
That's what IHASAVER would seem to indicate.
Cheers,
Greg
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET
Paul Gilmartin wrote:
Why re-invent the wheel?
I always thought that this came about because
CICS was a DOS app later ported to MVS.
This CICS smarts for managing virtual tasks and
not really OS waiting until there was absolutely
nothing else to do meant that CICS apps got
great throughput
John P Kalinich wrote:
PDSLOAD from the CBT (file 093) can handle LRECL =256.
Regards,
John K
John,
ITYM PDSLOAD can handle any LRECL allowed for unspanned
fixed-length and variable-length records, although the sequential
input file must have a minimum LRECL of 80 whether F(B) or V(B).
Years ago (circa 2000) I used Gilbert's IKJEFLN2 exit to
great advantage to reconnect to lost sessions that were
not deemed disconnected by VTAM.
TSO/E (and even old TSO I believe) will happily tell any
apps that ask about the current screen geometry.
Initialized and running fullscreen apps are
Woops!
Sorry, wrong list.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
On Wed, 7 Oct 2009 13:56:48 -0500, Jan Vanbrabant wrote:
But I couldn't dig up what I was looking for:
will one of the reports display the CPU usage within each module?
Jan,
None of the reports you listed will show CPU consumption
by program, because that information is not collected.
Reported
john gilmore wrote:
snippage
but in, say. current PL/I the single scheme embodied in
example: procedure(parm) options(main) ;
. . .
declare parm character(*) varying2 parameter
nonassignable ;
. . .
end example ;
is the only one supported,
snip
I believe other
Rick Fochtman wrote:
In case you forgot: regular load modules only contain a note list if
they are in OVERLAY format, which is both archaic and unnecessarily
complicated.
OVERLAY format does use a second entry in the NOTE list, but *all*
PDS load modules have at least one entry in the NOTE
Frank Swarbrick wrote:
Everyone might be interested to know that there are some IMS datasets (I
forget which) that *cannot*
be PDSE. They must be PDS.
Yes, PDSEs do not allow NOTE list TTRs in the directory entry.
This is one reason why regular load modules cannot be
housed in PDSEs.
Rick Fochtman wrote:
I know of a LLA exit written by Greg Price that can help
with module counts.
Thanks for the kind words, Rick. The LLA exit 1 concept is fairly
straightforward (Rob Scott also did it in MXI) but only covers
LLA-managed programs. To capture most program usage reliably
takes
Gilbert Saint-Flour wrote:
I also remember a special version of such a utility that was called IEFBR15.
My version of IEFBR15 just looped.
:)
Cheers,
Greg
--
For IBM-MAIN subscribe / signoff / archive access instructions,
Tom Marchant wrote:
On Mon, 27 Apr 2009 09:59:51 +0300, Binyamin Dissen wrote:
Do all products (HSM, FDR, etc.) use the string MIGRAT as the VOLSER?
FDR does. Actually, it's ABR. ISTR that this behavior is optional, but I
don't recall what is in the VOLSER if the option is not selected.
[EMAIL PROTECTED] wrote:
At this shop that I work with, there was a program that used TCBJPQ as
a ptr to loaded modules
within the address space. One problem though, it was abending since
TCBJPQ was null.
No problem though, I devised a different solution using CSVINFO.
Question, what was
On Fri, 28 Nov 2008 15:02:46 -0800 (PST), [EMAIL PROTECTED] wrote:
Hi
The programs were normal application key 8 programs.
As for the job task, I started at PSA, via PSATOLD, went to TCB, and
TCBJPQ was empty.
TCBLLS was populated though...
Thanks
PSATOLD-TCB
TCBJSTCB-TCB (I think you skipped
Paul Gilmartin wrote:
On Fri, 21 Nov 2008 07:56:01 -0400, Shmuel Metz (Seymour J.) wrote:
Interesting:
o With Peter DiCamillo's X 3270 and a nonstandard screen size
o I make a tn3270 connection to VM
o From there a VTAM connection to z/OS
o I start SDSF from the TSO READY prompt
o Line
Chuck Haatvedt wrote:
Just a bump on this to see if anyone can give me some assistance on this .
thanks,
Chuck Haatvedt
Chuck Haatvedt wrote:
I have written a small COBOL program to call the catalog search
interface module. I pass three attributes to the program
Paul Gillis wrote:
G'day Greg,
Thought I would take the opportunity to run a quick test on a z800. Copying
a 108 track SMF dataset.
1. Using ICEGENER without compression 9 CPU seconds into 108 tracks.
2. Using ICEGENER with compression 30 CPU seconds into 76 tracks.
3. Using ISPZIP
Neal Eckhardt wrote:
I want to browse a UNIX file in ISPF and have the characters display as
ASCII characters, not EBCDIC. I thought I had done this before about half
a decade ago, but I can't seem to find out how I did this. What am I
missing, or is my memory failing me? I'm usually pretty
Hi.
My semi-facetious remark about ZIP archives got me wondering
about what sort of compression ratios users of compressed
extended-format data sets are getting.
Zipping text can get 75% to 90% compression (ie. reducing the
data to 25% to 10% of its size). How's that compare?
Of course, no
Mark Zelden wrote:
On Fri, 5 Sep 2008 18:30:55 +1000, Greg Price [EMAIL PROTECTED]
wrote:
Now all we need is support for ZIP archives.
We or Review? ;-) We already have it with Java - which is free.
Sorry - I wasn't clear. I meant the ISPF Browse (nice) and ISPF Edit
(even nicer
Paul Gillis wrote:
Greg,
I used to get about 80% when zipping SMF data, haven't done that for a while
and never considered the CPU cost as I had to get the data under 2Gb. The
reasons are now obsolete. The zip engine I used on MVS was ISPZIP from ASE.
I may still have the performance
Hunkeler Peter , KIUK 3 wrote:
TSO TELNET is not a TN3270 client, it supoprts only line mode.
I think it's safe to say the the TELNET command accessible from the
READY prompt does support TN3270. At least it is possible to use
it to telnet to another z/OS and get the VTAM logo and logon to TSO
ITURIEL DO NASCIMENTO NETO wrote:
I Don't know if you can get this information from DCBE, but it's
available in
Format1 DSCB.
TMDS1FLAG1,DS1COMPR
JORETBUFNO
Ripper. You know, I looked there but obviously missed it.
I guess it's OBTAIN time.
Thanks,
Greg
Paul Gilmartin wrote:
If some future release (or a USERMOD?) were to remove not just
SYSIKJUA propagation, but to remove the ENQ entirely, might it
then be possible for a user to have concurrent sessions not only
in different LPARs, but even in a single LPAR?
The MULTITSO package in CBT file
Howdy do.
When I have an open SAM DCB (OUTPUT, if that matters) I want to be able
to find out if the data set is a DASD compressed data set. Can this be done?
AFAIK, compressed sequential data sets must be extended-format data sets,
but extended-format data sets do not have to be compressed
LRVH - Load Reversed (Halfword)
So it should load a reversed halfward, right?
Well, sure, it swaps the byte order (compared to their order in storage)
and puts them in register bits 48-63, **BUT** it leaves bits 0-47
UNCHANGED.
Now, that last part is not what LH does, is it?
In my book, that's
McKown, John wrote:
Yes, I'm sure the sign bit is in the middle as viewed in Intel
storage. The point that the OP was making is that the LRVH is misnamed
because it does not touch bits 0-47 of the 64 bit register. It acts more
like an insert than a load.
Exactly right. But thanks to Steve
Bruno's book has been OCRed and can be downloaded from
http://www.prycroft6.com.au/misc/
(currently last item on the page).
At under 4 meg it is a fair bit smaller than Bruno's original scan,
but could not have been created without it. Thanks, Bruno!
Cheers,
Greg
Gary Green wrote:
Tis a real shame... We still run four boxes with various flavors of OS/2.
Hey, aren't you the SMF-for-OS/2 guy?
Hmm, or was that SYSLOG?
Yes, SYSLOG, I think...
:)
Nice work...
Cheers,
Greg
(OS/2 user of years and years ago)
The other point to mention about migrated data sets - even
VSAM components/clusters - is that their MIGRAT catalog
entry is always non-VSAM, which explains why ISPF does
not crank up any dialog related to VSAM deletion.
Cheers,
Greg
P.S. Season's greetings to all.
Paul Gilmartin wrote:
Ummm. Imagine the effect on a dusty JCL deck which said,
DD SPACE=(CYL,100). But perhaps not. ISTM that SMS or DYNALLOC
(or maybe even ISPF) sometimes adjusts my requested SPACE to
account for the difference between 3380 and 3390.
I believe there was a panel in the
Hi.
It is my recollection that when MVS/XA first came out the usual suspect
group of non-VSAM I/O macors (GET/PUT/READ/WRITE/CHECK etc.)
could not be issued when AMODE was 31.
Now-a-daze AMODE can be 31 when issuing these macros, and
this has been the case for years.
My question for those with
Roland Schiradin wrote:
Hi Greg,
OPEN/CLOSE support AMODE 31 since DFP 2.3 (FMID HDP2230)
PUT/GET support AMODE 31 since DFSMS 1.1 (FMID JDZ1110).
This was the first release of DFSMS.
Roland
Hmm, that would seem to put the non-SVC macro upgrade around
the SP4.3 to SP5.1 time frame.
Paul Gilmartin wrote:
On Thu, 14 Jun 2007 20:30:43 -0500, Tony Harminc wrote:
I've looked at this, and it isn't pretty doesn't even begin to describe
it. Unless IBM has severely modularized things since the last non-OCO
version of this stuff, it is full of hardcoded knowledge of not only VTAM
Phil Payne wrote:
Then there was Nestle Frankfurt, who wanted both CPUs to have the same serial
number.
BS3000 was pulled because Fujitsu (deservedly) lost a court case. One of the
settlement
conditions was the withdrawal of BS3000, another was $600 million, if memory
serves. At the
Thompson, Steve wrote:
Folks:
Just in case some of you weren't around in the mid-80s doing development
and the like, IBM decided to go OCO (we will drop the cause of this
decision) and the CEO (Ackers - if I remember the spelling of his name)
promised that nothing would go OCO until it had
Pinnacle wrote:
Tom,
I tested this in the old days of SLED DASD, and the directory was a
keyed track and you COULD NOT store a member in the directory track. It
always took 2 tracks minimum for a PDS (of course, this has not been
true for about 15 years).
Regards,
Tom Conley
In my meagre experience, abends such as EOV which are normally
recoverable in QSAM I/O (which I guess means GET and/or PUT, oh
and PUTX of course but that should be unlikely given that PUTX is an
update-in-place of a successfully read record) become unrecoverable
when the same condition is
Steve,
Too late - check out IHAUDA in SYS1.MODGEN.
Cheers,
Greg
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at
I've heard of that some places are desperate to get every KB
of extended private area they can, but I've never worked at one.
So usually I like to see between 50MB and 200MB of ECSA sitting
around just in case. Then, if an ECSA hog comes along you have
room to move. Such a hog (of varying
Really Jim?
You surprise me.
BTW, Release 40 of REVIEW should be out in a week or two.
:)
GP
Jim Marshall wrote:
Snippage.
You can thank Bill Godfrey for getting everyone
started in many more utlities besides LISTPDS.
Jim Marshall
Is it just me or is the TSO LINK command broken under z/OS 1.7?
LINK * NCAL LIST PR(*) etc
does not seem to give much opportunity to enter control statements.
The TSO HELP for LINK seems to be updated recently, so maybe
they did some work on it.
And some reckon TSO is dead :)
Mind you,
OA13194: TSO LINK COMMAND DOES NOT ALLOW TO ENTER CONTROL STATEMENTS
Of course, I could not find the APAR until I posted the previous message to the
list.
Oh well...
--
For IBM-MAIN subscribe / signoff / archive access
I've found that the PDS command (CBT file 182) does an excellent job
of dumping a bit of data around the found text. Even tells you the
CSECT.
Cheers,
Greg
[EMAIL PROTECTED] wrote:
Hi fellow listers,
I'm trying to find the value listed after the text string REL= in all
load modules in a
Makes me wonder what sort of differences present.
Presumably various CSECT and entry point names match or
you would dismiss the modules as completely different immediately.
Same with CSECT sizes.
I can only think that the CSECT order is different in the two modules.
For programs with a large
[EMAIL PROTECTED] wrote:
Could one use a modest size data set and concatenate it
with itself multiple times?
Yes, that would work.
Could one use EXECIO in a Rexx EXEC, in which case no
source data set whatever is necessary? This depends on
whether EXECIO tolerates DSORG=DA.
Perhaps EXECIO
Know of any good delinkers at cbttape.org?
I think David Noon's delinker in CBT file 90 is pretty powerful,
as long as your not talking about program objects.
I haven't looked into it fully, but you may even be able to get
it to wrap MCS around the object decks. It handles the
various
Years ago I found directing compiler (PL/I and Assembler) work files to
VIO could reduce the elapsed time of a compilation to a fraction of what
it otherwise would be. May not be true now... or systems are so fast it
doesn't matter much anymore.
The big advantage of VIO that I still like is the
Mendelson, Eric wrote:
I need the load module for MINIUNZ used by the Review command
Both MINIZIP and MINIUNZ are in CBT file 135
from http://www.cbttape.org/updates.htm
--
For IBM-MAIN subscribe / signoff / archive access
Miklos Szigetvari wrote:
Hi
Thank you, I would need in machine readable format , I would need them
in a program
Start typing.
(That's what I did.)
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send
IEFACTRT can use a system routine (IEFYS?) - usually link edited
in - to write to the messages data set (where the COND CODE is)
without having to worry about WTO routing codes and SYSLOG
or console effects. That's what most flower boxes use.
Many places use IEFACTRT to issue WTO messages
Ah, yes, how to get an opcode and two Y-format operands
into a single 6-byte instruction :)
Thomas Berg wrote:
Have anyone used the long-displacement facility instructions
(as in consistently do so to reduce base register usage) ?
Are there any pitfalls or limitations that a relatively
Hi. If you do not use the REVIEW TSO command then you can skip this one now.
I'm just wondering if anyone using REVIEW to browse VSAM data sets
has ever had any RLS issues.
Did RLS cause some VSAM read failure by REVIEW?
(Was the RC/REASON reported by REVIEW?)
Did you get any data from the
TISLER Zaromil wrote:
They are functionally equivalent.
If I try IFIND in SDSF under SE or SJ, the cursor jumps to the first
(non-blank?) character in the next line, not to the next occurrence of the
string. if I try IFIND under SB nothing happens (the cursor does not move).
When I fiddled
Shmuel Metz , Seymour J. wrote:
There is no such thing as a fake residual count,
What would you call a value calculated from the BLKSIZE and the count
area and plugged into the CSW field of an IOB? That sure sounds like a
fake residual length to me.
For example, with variable-length
[EMAIL PROTECTED] wrote:
In a recent note, Greg Price said:
Date: Wed, 1 Jun 2005 14:16:51 +1000
Well, here's my theory:
Does this have to be done by theory and/or experiment, or is it made
clear in the documentation?
I believe theory/experiment/doco all agree on how
Bob Wright wrote:
You're welcome. I thought that we'd bumped into something like that in
the course of some service aids development where we had an old DCB that
didn't specify DSORG, leaving that for a DCB OPEN exit to supply. I
have no idea why IEBGENER would be going that route, but
I'd like to cast a vote for JCL PARMs longer than 100 bytes,
using the current scheme simply (?) by increasing the upper
limit.
I agree with protecting APF authorised programs from inadvertent
parameter overrun.
I don't think non-APF authorised programs need this protection,
although I would
78 matches
Mail list logo
