If something like hyperswap has moved the IODF to another device, then you can
use the IOCINFO "IODFINFO" service and get the information from the IODI
structure that is returned :
IODI_IODFODEVoriginal IODF device
IODI_IODFUCB UCB address of current - (if IODI_IODFUCBINVLD is
I don't have all the technical details, but there tends to be occasional
DASD movement where FDRPAS is used to non-disruptively "move' the contents
of a volume from one unit address to another.
Where I fit in is I have written a (rexx based) automation routine that
displays old/current IPL
IOCINFO IODFINFO=xx
If success and bit IODI_IODFUCBInvld is off, the UCB address is in
IODI_IODFUCB and the device number can be ascertained from that.
Peter Relson
z/OS Core Technology Design
--
For IBM-MAIN subscribe /
Hi Chuck, We have clients who regularly use this function for what you plan on
doing. I'll reach out to the individual who owns the ticket and make sure that
it makes progress. Thanks.
--
For IBM-MAIN subscribe / signoff /
Thanks Rob!
I think it's just ignorance on my part, but I haven't had much luck calling
assembler services from Rexx - only some of those mentioned in the
"Callable Services for High Level Languages". There are a LOT of those
services that look extremely helpful for getting precise information,
Look at the address statement and at the descriptions of the available
environments.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Steve Horein
On Thu, 17 Dec 2020 19:46:13 +, Seymour J Metz wrote:
>Or at least a function to return the current address of a string variable,
>plus some way to control alignment.
>
I've pondered something similar in connection with wishing for a
variant of ATTACH that would leave the subtask running
It is whatever your installation called it!
Which COBOL?
Many installations use something like IGY or IGY630 or IGY.V630 or IGY.V6R3M0
as an HLQ. You could look for those in ISPF 3.4.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
I know of no REXX facility to enumerate environments, but z/OS Version 2
Release 4 TSO/E REXX Reference describes the relevant environment, LINKPGM.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List
On Thu, 17 Dec 2020 18:47:27 +, Seymour J Metz wrote:
>I know of no REXX facility to enumerate environments, but z/OS Version 2
>Release 4 TSO/E REXX Reference describes the relevant environment, LINKPGM.
>
LINKPGM, which is essentially Assembler LINK macro, works well
for such as ICSF; less
Or at least a function to return the current address of a string variable, plus
some way to control alignment.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul
We're happy to announce the creation of the online z/OS DFSMS Community, which
is part of the larger IBM Community! Our community webpage contains blogs to
advertise new function (z/OS Releases and Continuous Delivery), advertise
upcoming events (SHARE, IBM TechU, DFSMS Academies, etc), have
Seems to me you'd get almost all the benefit with little effort to just
write a simple program that LINKMVS could call to LOAD a module. That
would keep it in storage for subsequent calls by LINKMVS, etc. Goes w/o
saying it would need to be marked REUS at least.
If the actual overhead of LINK
I would say either SYS1.SIGYCOMP, or IGY.SIGYCOMP.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
CarlosM Martinez
Sent: Thursday, December 17, 2020 4:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: COBOL LIB
[External Email. Exercise caution when clicking links or
Hello all,
Does anyone know what library the COBOL compiler is in Z/OS 1.0 ?
SYS1.???
Thank you
Carlos Martinez
SUNY Downstate Med. Center
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
On Thu, 17 Dec 2020 15:59:45 +, Seymour J Metz wrote:
>Look at the address statement and at the descriptions of the available
>environments.
>
Is there a Rexx facility to enumerate "available environments"? I suspect not,
but it
would be a good CbtTape.org candidate.
ADDRESS SYSCALL has a
Re: your last point, why can't Rexx also have LOADPGM/LOADMVS along with
LINKPGM/LINKMVS? Load once, call multiple times, ADDRESS DELPGM/DELMVS to
remove from memory.
Just a thought. I once thought of writing a Rex function package to accomplish
the same, but never found the round tuits to
You should have a LOAD() and a DELETE() funtion, not new environments. Also,
you would need new sytax for LINK, ATTACH, LINKMVS, ATTACHMVS, LINKPGM and
ATTACHPGM to specify an entry point address rather than a name.
RFE?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
Well, it's redundant in TSO/E, but in OREXX there are object values as well as
string values; I forgot to change hats.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Carlos,
AFAIK, Easytrieve scripts generate actual object code, not COBOL code, for at
least the versions of which I am aware (versions 4.x, 5.x and 6.x in my
experience all generate object code).
HTH
Peter
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
CarlosM
Assuming that you are licensed for the relevant COBOL compiler, it's not
difficult to do the compiles with ISPF panels, either in foreground or by
submitting batch jobs.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe
And some long-time installations chose decades ago to consolidate program
products into a common product library (to keep SYS1.LINKLIB smaller and allow
products to live together but somewhere off the SYSRES pack(s)) and didn't
migrate away from that "standard" when upgrading over the years.
Carlos
Are you a CICS shop?
Sent from my iPhone
> On Dec 17, 2020, at 16:40, Farley, Peter x23353
> <031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:
>
> Carlos,
>
> AFAIK, Easytrieve scripts generate actual object code, not COBOL code, for at
> least the versions of which I am aware
Just looking for the BATCH compiler for the VENDOR... If we have it.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Lizette Koehler
Sent: Thursday, December 17, 2020 6:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL LIB
What
IBM has an easytrieve replacement that does that.
On Thu, Dec 17, 2020 at 4:27 PM CarlosM Martinez wrote:
>
> Well I am a newbie in Z/OS my expertise is in VSE. But... everything here is
> hold on to your hat... EASYTRIEVE. I have not look at a complete Easytrieve
> compile but doesn't it
What you could do is use
ISRDDN
Once you get the new panel, enter LINKLIST
Then on the command line enter IGY*
If you have authority to the Linklist datasets, you should see where those
modules exist
If you have a vendor providing you with the modules for your CICS system. What
issue are
YES,
we are a CICS shop and I have been here for 2 yrs. And have never seen a cobol
compile. Just EASYTRIEV.
We have a new vendor that wants to compile Cobol . I have set up REXX full
screen mods to do this in VSE via CMS. But here all is in TSO.
Thank you,
Carlos Martinez
SUNY Downstate Med.
If you don't have COBOL developers in house it seems unlikely you would have
purchased the COBOL compiler.
Can't the vendor supply you with binary executables that they have compiled?
From: IBM Mainframe Discussion List on behalf of
CarlosM Martinez
Sent:
So this will depend on what products your shop has licensed.
A Cobol Complier is a licensed product
Talk to you management team I the shop see if you are licensed. If not, then
your vendor will need to find other options.
Lizette
-Original Message-
From: IBM Mainframe Discussion
Do you even have any compiler procs?
Sent from my iPhone
> On Dec 17, 2020, at 16:02, Jousma, David
> <01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
>
> COBOL compiler doesn't come with z/os. It is separately purchased and
> licensed, so since you are asking, you may not have it.
Sorry - some details got dropped
Once the ISRDDN panel is up on the command line enter
M IGY*
See what libraries show up with those modules.
If you do find IGY in the linklst - then you should not need to do anything.
An Object lib should have everything
What issues are you seeing?
Lizette
"Just EASYTRIEV."
You mean SLEAZY-TRIEVE! :)
Joe
On Thu, Dec 17, 2020 at 6:56 PM CarlosM Martinez
wrote:
> YES,
> we are a CICS shop and I have been here for 2 yrs. And have never seen a
> cobol compile. Just EASYTRIEV.
> We have a new vendor that wants to compile Cobol . I have set up REXX
I did use the ISPF panels in TSO it keeps terminating with rc code 20.
PS I knew someone was going to come up with the "SLEZTRIVE thing"
Anyway in VSE we have MSHP I guess I will do a SMP/E listing and see if and
where it lives.
Thank you all,
Carlos
SUNY DOWNSTATE MED CENTER
From: IBM
To the OP: If your COBOL PROC's do not have a STEPLIB pointing to where the
compiler lives, you may be able to find out where it is by using DDLIST (or TSO
ISRDDN if that doesn't work) and then the "LINK" and "M IGYCRCTL" subcommands
to see where in the LINKLIST the main compiler module lives.
COBOL compiler doesn't come with z/os. It is separately purchased and
licensed, so since you are asking, you may not have it.
From: IBM Mainframe Discussion List on behalf of
CarlosM Martinez
Sent: Thursday, December 17, 2020 4:12:28 PM
To:
Well I am a newbie in Z/OS my expertise is in VSE. But... everything here is
hold on to your hat... EASYTRIEVE. I have not look at a complete Easytrieve
compile but doesn't it produce cobol code?
We get our CICS online System compiled and shipped from a vendor and just load
it to a loadlib. I
Isn't EASY it's own language? It definitely doesn't produce Cobol code.
-Ursprungligt meddelande-
Från: IBM Mainframe Discussion List För CarlosM
Martinez
Skickat: den 17 december 2020 23:27
Till: IBM-MAIN@LISTSERV.UA.EDU
Ämne: Re: COBOL LIB
Well I am a newbie in Z/OS my expertise is
Perhaps you're thinking of TELON, from the Easytrieve company Pansophic
(bought by CA in 1991), which does produce COBOL.
On Fri, 18 Dec 2020 at 16:43, Lars Höglund wrote:
> Isn't EASY it's own language? It definitely doesn't produce Cobol code.
>
> -Ursprungligt meddelande-
> Från: IBM
38 matches
Mail list logo