Donald,
If you have IBM File Manager the "View Load Module" function supports CSECT
name filters which will list the load modules in a PDS/E that include
CSECTs that match the CSECT name filters specified. The "View Load Module"
function can be used online in ISPF:
> But is loss of a single recorrd disastrous?
No, I said earlier, this is not banking transactions where a lack of 2-phase
commit risks losing a bunch of money between the cracks.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
No! 96 24-byte *records* per day.
My current vision is to use a UNIX file, write the records every 15 minutes as
they are produced, and do the close/rename/start over once per *month*, on the
first write after midnight on the 1st of every month.
There are two basic reports, a daily report
On Mon, 20 Jun 2022 22:23:45 -0500, Mike Schwab wrote:
>24 byte record would fit 82 records per track.
>http://www.bitsavers.org/pdf/ibm/dasd/reference_summary/GX26-4577-0_3390_Reference_Summary_Jun89.pdf
>
Why are people discussing "tracks" in a thread titled ... Ummm, let me look
above ...
24 byte record would fit 82 records per track.
http://www.bitsavers.org/pdf/ibm/dasd/reference_summary/GX26-4577-0_3390_Reference_Summary_Jun89.pdf
On Mon, Jun 20, 2022 at 10:05 PM kekronbekron
<02dee3fcae33-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hey Charles,
>
> Does the 96-files a day
Hey Charles,
Does the 96-files a day solution not work?
You could cat *-mmdd.txt > mmdd.txt at 00.05 and then delete the 96
files.
You wouldn't have to worry about losing out data in memory if it's written to a
file every 15 min.
It appears to be a pretty basic & simple solution?
- KB
"I think it would be Rexx abuse."
On the border with whether I should laugh for this or not...
- KB
--- Original Message ---
On Monday, June 20th, 2022 at 9:17 PM, Charles Mills wrote:
> I think it would be possible to monitor the console ECB from Rexx, and
> extract any MODIFY text
On 21/06/2022 5:39 am, Charles Mills wrote:
Nay! Rexx passes everything by value, both to internal and to external functions. So
passing will give the assembler code 200 zero bytes to play with but
it will go away on return.
Pass by value doesn't matter. I've done this before and just
On Mon, 20 Jun 2022 14:39:20 -0700, Charles Mills wrote:
>Nay! Rexx passes everything by value, both to internal and to external
>functions. So passing will give the assembler code 200 zero bytes to
>play with but it will go away on return.
>
There might be a *slightly* better alternative.
Nay! Rexx passes everything by value, both to internal and to external
functions. So passing will give the assembler code 200 zero bytes to
play with but it will go away on return.
And it is unnecessary. I know of no need for persistent storage. Perhaps it is
worth persisting the STIMER MF=L
≫ I have a large PDSE loadlib with just under 10,000 members. Most of the load
members are COBOL programs. Some of them were incorrectly linked with a batch
module, called ABCDE and issue the COBOL verb CALL 'ABCDE'.
Donald,
A simple SRCHFOR in batch can give you the desired results
//SEARCH
That was my thought. It will be a lot of listing, but you have a mainframe!
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Steve Smith
Sent: Monday, June 20, 2022 12:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to
Yes
Lionel B Dyck <
Sent from my iPad Pro 10.5
Website: www.lbdsoftware.com
"Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are." - John Wooden
> On Jun 20, 2022, at 2:46 PM, Paul Gilmartin
>
On Mon, 20 Jun 2022 14:28:32 -0500, Lionel B. Dyck wrote:
>Check out the PDS command on cbttape file 182. It has many scan and list
>options.
>
Can it search a PDSE? (Of course it could LOAD each member; searh; DELETE.)
>> On Jun 20, 2022, at 2:25 PM, Itschak Mugzach wrote:
>>
>>
Check out CBT file 321 (COBANALZ). The SYSPRINT output will contain embedded
CSECT information. For a large loadlib like yours the SYSPRINT output will be
pretty voluminous, but relatively easy to search mechanically (I would use an
awk script to do the search, but any search utility you are
Check out the PDS command on cbttape file 182. It has many scan and list
options.
Lionel B Dyck <
Sent from my iPad Pro 10.5
Website: www.lbdsoftware.com
"Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are." - John
You can run AMBLIST against the entire library. Don't know that it should
take so long to filter out what you need to see.
sas
On Mon, Jun 20, 2022 at 2:30 PM Donald Blake wrote:
> I have a large PDSE loadlib with just under 10,000 members. Most of the
> load members are COBOL programs. Some
Assuming the program is in the ESD, and that you have some asm knowledge,
have a look at the IEWBUFF macro. A good starting point is
at SYS1.SAMPLIB(IEWAPFDA). The idea is to loop on each member in the
library, and scan it using the macro services. print a line for each module
having this csect
I created a rexx that can respond to an operator stop command in native rexx.
My colleague still has it available at
https://github.com/wizardofzos/natconf16/blob/master/zos/POCREXXS
It uses some other proof of concepts that might be interesting.
Not sure if it is of use in this case, but I
In NYC in the 1980's the traffic lights were controlled by a room full of IBM
1130 machines, not Univac. No idea what they use today.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Monday, June 20, 2022 7:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Ron,
Use the following control cards. I assumed that if there is a header then it
would be the first record in the file. So we skip the first record irrespective
of header presence and get the values from 2nd record. Since all records have
the patnum and compkey we just need 1 record to build
I have a large PDSE loadlib with just under 10,000 members. Most of the
load members are COBOL programs. Some of them were incorrectly linked with
a batch module, called ABCDE and issue the COBOL verb CALL 'ABCDE'.
I do have the source for all of the COBOL programs, but it is scattered
around a
On Tue, 21 Jun 2022 02:10:13 +0800, David Crayford wrote:
>I think I understand what Charles is doing.
>
>context = copies('00'x,200) <-- state for HLASM program
>wait_time = 30
>
>do forever
> res = console(context, wait_time)
> select
> when res = 'T' then iterate
> when res
I think I understand what Charles is doing.
context = copies('00'x,200) <-- state for HLASM program
wait_time = 30
do forever
res = console(context, wait_time)
select
when res = 'T' then iterate
when res = 'P' then leave
otherwise ...
end
end
On 21/06/2022 1:58
My sincere apologies Kolusu .
I have updated the answers in-line
>> If header comes in to this file for whatever reason we need to skip and
>> then build this filename
Q. How do you distinguish the header ? Any indicator? You don't even show a
sample.
***Header if comes will start
I'll correct my earlier misstatement. You did not say you were the client;
merely "-n-house".
On Mon, 20 Jun 2022 10:41:25 -0700, Charles Mills wrote:
>The ECB is not in the Rexx. It is in MVS-owned storage IIRC.
>
I believe ECBs routinely occupy user-owned storage.
>-Original
That’s beautiful. And a pet peeve of mine.
Sent from Yahoo Mail for iPhone
On Monday, June 20, 2022, 1:47 PM, Tony Harminc wrote:
On Mon, 20 Jun 2022 at 13:34, David Crayford wrote:
>
> I could care less about Python.
Could you care a lot less, or just a little bit less? There is surely
On 21/06/2022 1:47 am, Tony Harminc wrote:
On Mon, 20 Jun 2022 at 13:34, David Crayford wrote:
I could care less about Python.
Could you care a lot less, or just a little bit less? There is surely
quite a range of caring.
Here's a little chart that may help you express how much you care
about
On 21/06/2022 1:47 am, Charles Mills wrote:
As I said in response to an earlier question, I am the master of this
universe.
Good luck to you and have fun :)
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of David
For simple applications, in my experience, Rexx is quicker concept -> running
application than is C++. The client is not always perfectly able to express his
vision, so a quick prototype -> demonstrate -> prototype again cycle is very
advantageous, and Rexx is great for that. If it were a
On Mon, 20 Jun 2022 at 13:34, David Crayford wrote:
>
> I could care less about Python.
Could you care a lot less, or just a little bit less? There is surely
quite a range of caring.
Here's a little chart that may help you express how much you care
about Python or anything else.
The ECB is not in the Rexx. It is in MVS-owned storage IIRC.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Paul Gilmartin
Sent: Monday, June 20, 2022 10:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Some UNIX file usage
On Mon, 20 Jun 2022 10:24:17 -0700, Charles Mills wrote:
>...
>Then the ECB would already be posted and the WAIT ECBLIST would be satisfied
>immediately. It is a consideration for all such routines, and not a big deal,
>unless the coder is stupid enough to reset the ECB before the WAIT,
I could care less about Python. What is disconcerting is why you would
choose REXX/Assembler when you could write the same thing with less code
and complexity using C++ which you already know. Maybe you're just
having fun and there is nothing wrong with that. There is nobody to
review your
I am not the client. I guess the client makes its decisions based on a variety
of factors. I have many skills that are valuable to the client, and I would
guess that "best language for the application in the opinion of a guy on
IBMMAIN" (as opposed to "demonstrably adequate language") is not
On 21/06/2022 1:07 am, Paul Gilmartin wrote:
On Mon, 20 Jun 2022 08:47:49 -0700, Charles Mills wrote:
...
The assembler routine will take as input a delay time in hundredths of a second
(because of STIMER), do a WAIT ECBLIST, and return one of
'T' -- the time expired
'P' -- the operator
> What happens if the operator enters STOP during the (relatively minuscule)
> fraction of time that Rexx, not Assembler is active?
Then the ECB would already be posted and the WAIT ECBLIST would be satisfied
immediately. It is a consideration for all such routines, and not a big deal,
unless
On Tue, 21 Jun 2022 00:58:29 +0800, David Crayford wrote:
>I take it you must be the client?
>
Actually, he said that in the first ply.
>... I can't fathom any client who would be
>stupid enough to allow a vendor to write code in their language of
>
This is becoming excessively ad hominem,
>> Could someone let me know how we can do the same in dfsort ?
Ron,
You have been member on this board for number of years and yet your questions
are incomplete with required details.
So questions for you.
>> If header comes in to this file for whatever reason we need to skip and
>> then
Charles, I take it you heard about System Rexx?
René
> On 20 Jun 2022, at 17:48, Charles Mills wrote:
>
> I *think* it would be possible to monitor the console ECB from Rexx, and
> extract any MODIFY text -- you can do almost anything in Rexx with enough
> C2D()'s -- but multiple levels
On Mon, 20 Jun 2022 08:47:49 -0700, Charles Mills wrote:
>...
>The assembler routine will take as input a delay time in hundredths of a
>second (because of STIMER), do a WAIT ECBLIST, and return one of
>
>'T' -- the time expired
>'P' -- the operator entered STOP
>'F modify command operand' --
I take it you must be the client? I can't fathom any client who would be
stupid enough to allow a vendor to write code in their language of
choice due to their personal skill set. That's technical debt.
On 20/06/2022 11:34 pm, Charles Mills wrote:
Aww David, I respect you more than that
Hello -
We have a input file as follows.
* Top of Data *
.0050425063|..4138|..12211|.. 0|.. 0|.. 0|.. 0|
.0050996097|..4138|..12211|.. 0|.. 0|.. 0|.. 0|
.0009077849|..4138|..12211|..1.50|..1.50|..
> Is it possible to get a SMPe report in order of the date the sysmods were
> applied?
The SMP/E LIST and UNLOAD commands outputs do not sort the currently installed
SYSMODs by APPLY date. You'll have to roll your own by either manipulating and
sorting LIST or UNLOAD output, or using the
Hello
I have got some zVM CP owned Volumes in space efficient volumes due to
which the ZVM LPAR fails with a wait state code of 9050.
Is it possible to move an existing CP OWNED Volume from space efficient
volume to classic DS8K volumes without reinitializing it ?
Peter
I *think* it would be possible to monitor the console ECB from Rexx, and
extract any MODIFY text -- you can do almost anything in Rexx with enough
C2D()'s -- but multiple levels of C2D() does not exactly make for a pretty
application. I think it would be Rexx abuse.
Answering @kekronbekron's
Aww David, I respect you more than that reply.
Of course I could learn to write Hello World in Python more quickly than I can
write this sentence. But what I alluded to is that past experience teaches me
that getting from Hello World to a working system on z/OS is many days of agony.
Charles
Thank you for that explanation. I wasn't able to find anything about it when I
was looking.
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, June
you 'SHOULD' be able to find the error message on IBMLINK, I say should,
that's been my biggest issues so far, these messages provide no help,
that said, in z/OS 2.4 you should not be using /var/zosmf/ the data file
'customer config' is now in the /global/zosmf/ dir, make sure you're
using the
I am in the process of rolling out z/OS 2.4 at my new employer. I inherited my
predecessor's Serverpac install of z/OS 2.4. I pulled down, and applied the
z/OS 2.4 cumulative maintenance (first week of June). The initial IPL's have
all been successful. Yesterday, I noticed the following error
I've used both MQ and Kafka so I'll give a brief overview of the
differences and capabilities.
Kafka is distributed system. It's designed to be scaled horizontally for
both fail-over and throughput. It uses a consensus algorithm similar to
RAFT to elect a leader both initially and in the
Bob Bridges wrote:
>It was at length, wasn't it? Sorry, I just felt I had to explain how I got
>into the weird habit.
Oh, sorry-my "at length" wasn't a snide remark: it was a notation that I was
brutally trimming your post! Trying to find the sweet spot between excessive
quoting (looking at
On the MQ front, I >think< there are customers who are using QREP to do DB2
to DB2 using MQ as the transport, over 1000 KM and getting about 100MB+ of
data a second - with a few second or subsecond response time. So to the
end user it looks like a single system rather than replicated.
The limits
aka Marketechture.
Joe
On Mon, Jun 20, 2022 at 8:45 AM David Crayford wrote:
> Isn’t buzzword a buzzword? There’s some irony there.
>
> > On 20 Jun 2022, at 9:38 pm, Gerhard Adam wrote:
> >
> > discussed as to be non-existent. This sounds like more marketing hype
> perpetrated
>
>
Isn’t buzzword a buzzword? There’s some irony there.
> On 20 Jun 2022, at 9:38 pm, Gerhard Adam wrote:
>
> discussed as to be non-existent. This sounds like more marketing hype
> perpetrated
--
For IBM-MAIN subscribe /
Perhaps no one has :grokked" the difference is because either there isn't one
or because it is so poorly explained and discussed as to be non-existent.
This sounds like more marketing hype perpetrated by individuals that know
buzzwords and little else.
-Original Message-
From: IBM
The CLUSTER support was part of what was supposed to be an over-arching
automation infrastructure that would provide a sysplex-level view of properties
and events for improved business resiliency. I don't think it ever came
together.
Bill Neiman
Parallel Sysplex development
IBM
Thanks. I’ve seen something similar on the ACM
https://dl.acm.org/doi/pdf/10.1145/1476793.1476796
> On 20 Jun 2022, at 8:51 pm, Joe Monk wrote:
>
> https://ntrs.nasa.gov/citations/1969381
>
> Joe
>
>> On Mon, Jun 20, 2022 at 7:00 AM David Crayford wrote:
>>
>> And yet still nobody
https://ntrs.nasa.gov/citations/1969381
Joe
On Mon, Jun 20, 2022 at 7:00 AM David Crayford wrote:
> And yet still nobody seems to have grokked the fundamental differences
> between online systems and event-driven architectures. This is obviously
> not the forum for discussions on
Sounds like a good use case for medivac; a facility without a 24x7 pharmacy
can't provide meaningful 24x7 emergency care. Providing reasonable service to
rural arrays is difficult in a lot of areas, not just medicine, and I don't see
the political will to address it anytime soon.
--
Shmuel
CVS is 24/7 some pharmacies. Especially here in Texas.
https://www.cvs.com/store-locator/cvs-pharmacy-locations/24-hour-pharmacies/Texas/Houston
Joe
On Mon, Jun 20, 2022 at 5:52 AM Seymour J Metz wrote:
> Perhaps some are: CVS isn't.
>
>
> --
> Shmuel (Seymour J.) Metz
>
Event driven architectures have been around for decades. Controlling traffic
lights in the 1960s was event driven.
There are a lot of new software platforms available these days, but the article
did not discuss anything that can't run on a mainframe.
Neither you nor anybody else in this
So you’re assuming “pharmacies are open 24 by 7” as ALL but not SOME? Got it.
But ALL hospital pharmacies ARE open 24 by 7. Actually, it’s why many rural
hospitals are closing. Too expensive to be available 24 by 7 (pharmacy &
hospital) in lesser populated and lesser affluent areas.
Sent from
And yet still nobody seems to have grokked the fundamental differences
between online systems and event-driven architectures. This is obviously
not the forum for discussions on contemporary software architectures. It
always deteriorates into a deluge of boring and undiscerningposts about
how
"pharmacies are open 24 by 7" is not the same as "some pharmacies are open 24
by 7" or "most pharmacies are open 24 by 7". My local CVS closes for lunch
every day. People with medical emergencies are likely to be in a hospital when
they need a prescription filled, so I don't consider the lunch
Are you denying that IFL and REST on mainframes are old hat?
If you're alluding to the cost of specialty issues as opposed to the cost of
non-mainframe platforms, that wasn't an issue that the article raised.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
On 20/06/2022 7:10 pm, Seymour J Metz wrote:
Whoosh!
Is that the tick shaped thing that goes on the side of Nike sneekers?
There is no "traditional transaction processing"; transaction processing is an
open ended paradigm. CICS may have it's limitation, but the fact that it has been around
CVS has 24 hour pharmacies. So does Walgreens and Rite Aid. We have a 24 hour
Walgreens 2 miles from my house. Not all retail pharmacies are open 24 hours,
but there are numerous ones in most cities. But, every hospital has a pharmacy
that IS open 24 by 7. I've worked in health care for about
Before MQ there were QTAM and TCAM.
There have been mainframes running real time applications since the 1960s. Air
traffic control. Airline reservations. Controlling traffic lights (UNIVAC, not
IBM.) These may not be the best examples, but they were the first to come to
mind, and used off the
If I wasn't concerned about an audit trail I'd probably use PDS or StarTool
(whatever the current name), but that's more a matter of taste than anything
else. TMTOWTDI.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe
Whoosh!
There is no "traditional transaction processing"; transaction processing is an
open ended paradigm. CICS may have it's limitation, but the fact that it has
been around for half a century should be enough to demolish the belief that
mainframe=batch.
The availability of, e.g., REST, on
Perhaps some are: CVS isn't.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Bill Johnson [0047540adefe-dmarc-requ...@listserv.ua.edu]
Sent: Sunday, June 19, 2022
No, ANSI stream I/O does not provide for file locking. However, implementations
are allowed to define addtional options and commands for the stream() BIF.
I'm not sure whether file attributes and permissions should be considered to be
part of the I/O infrastructure of a language.
--
Shmuel
You can make that 'about 30 years ago' - time flies while we’re having fun.
René.
> On 20 Jun 2022, at 09:51, Colin Paice wrote:
>
> MQ from IBM developed about 20+ years ago helped get from Batch to real
> time. You put messages to a queue, and it can run IMS transactions
> (including
On 20/06/2022 3:51 pm, Colin Paice wrote:
MQ from IBM developed about 20+ years ago helped get from Batch to real
time. You put messages to a queue, and it can run IMS transactions
(including OTMA), CICS transactions, or even batch!. You can put on one
member in a sysplex and get in another
MQ from IBM developed about 20+ years ago helped get from Batch to real
time. You put messages to a queue, and it can run IMS transactions
(including OTMA), CICS transactions, or even batch!. You can put on one
member in a sysplex and get in another member.
It has single put, and also
On 20/06/2022 08:30, David Crayford wrote:
Python closes files at the end of a with statement scope. It will also close the file cleanly if
an exception is thrown. That's what I call KISS!
Yes. I think I missed O_CREATE. Another +1
My reference to KISS was related to avoiding whatever logic
Python closes files at the end of a with statement scope. It will also
close the file cleanly if an exception is thrown. That's what I call KISS!
with open('file_path', 'w') as file:
file.write('hello world !')
On 20/06/2022 1:47 pm, Peter Sylvester wrote:
Hi,
I remember I did that 25
78 matches
Mail list logo