Re: Suppression of duplicate STC
Concurrently: DISP=OLD While technically it will not suppress the start, it will prevent it from running. During the life of the SYSPLEX? I guess it could rename its own member in PROCLIB to something else. And use some kind of shutdown process to rename it back. On Wed, 20 Jan 2021 12:58:16 +0400 Peter wrote: :>Is there any configuration or any method to suppress starting the same :>started task Twice in zOS ? :>We are having zOS 2.2 -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: MVS RESMGR exit
On Mon, 18 Jan 2021 15:51:51 -0500 Gary Weinhold wrote: :>Excuse me for asking this question here, but I can't find an IMS DC list. :>We rely on getting control at task termination to clean up resources :>used by our software. We create a PC to add an MVS RESMGR exit when our :>software is first accessed in an IMS MPR. If there is a pseudo-abend, :>which we understand means the TCB on which transactions run will :>terminate, we expect our RESMGR exit to execute. The IMS MPR control :>program will then attach a new TCB in the region on which to run :>transactions. Our software will be reinitialized if a transaction :>accesses it. This could happen many times. However, if our RESMGR exit :>doesn't execute, we may deplete resources. :>Is it possible that the IMS MPR control program bypasses or deletes our :>RESMGR exit on some pseudo-abends? It has been a while, but it appears that the TCB does not always end when one expects. Are you just guessing that there is a problem, or do you see evidence of a problem? Are you seeing the tasks ending without your RESMGR doing its job? Do you need to clean up if the message region runs a new program? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Starting a started task from a started task
On Thu, 14 Jan 2021 14:57:47 + "Horne, Jim" wrote: :>This may sound like a stupid question but is there a way to start a second started task from a running one when the currently running one completes. I know how to submit a batch job from a final step of a started task but I don't know how to do the same sort of thing to initiate another started task. I will ask the question that seems to have been missed. What are you trying to do? Why specifically start a new STC? What is the business case? Why not conditionally execute the next step? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Code to verify LOGON password
What is wrong with RACROUTE REQUEST=VERIFY,ENVIR=CREATE,ACEE=@ACEE followed by RACROUTE REQUEST=VERIFY,ENVIR=DELETE,ACEE=@ACEE if the create worked? Should work on all security systems. On Sat, 9 Jan 2021 20:03:07 -0500 Sam Golob wrote: :>Dear Folks, :> :> I am just trying to get a very old program to work. It is so old, :>that it mucks with the TSB password field, and I don't want to deal with :>that. I don't care to reveal the password anywhere. I just want the :>user to enter a password, and the security system should say "GO" or :>"NOGO". That's all. :> :> Thanks for all your replies. Be well and safe. :> :>Sincerely, Sam :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using symbolic DD names
On Sun, 10 Jan 2021 08:18:10 -0600 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Sun, 10 Jan 2021 14:34:03 +0200, Binyamin Dissen wrote: :> :>>On Wed, 30 Dec 2020 19:21:52 + Billy Ashton wrote: :>> :>>:>Hey folks! I have a vendor product program that looks for different :>>:>DDnames depending on the control statements passed into the program. Is :>>:>there any way to define a dynamic DD statement using JCL symbols? For :>>:>example, I would love to have //TB to correspond to TB01DAT, :>>:>TB14DAT, or TB67DAT if I use SET TNO=01 or 14 or 67. ::>>:>Is such a thing possible? I tried using an instream proc definition and :>>:>INCLUDE MEMBER= that proc name, but that failed, and of course, I tried :>>:>the straight up JCL as above, and it failed. : :>>:>What do you all think? : :>>If you create a member for each DD statement, : :>> // INCLUDE MEMBER=TAB : :>>should work fine. Or am I missing something? :>Gee. One might create a collection of JCLLIB members mapping the :>Cartesian product of all possible values of all possible symbols. Then :>no such member need contain any symbol references. There can be multiple iINCLUDE statements (with a dummy as a default). Not at all a problem. :>Seriously? There's something wrong here. :>I hate JCL! That is a different issue. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using symbolic DD names
On Wed, 30 Dec 2020 19:21:52 + Billy Ashton wrote: :>Hey folks! I have a vendor product program that looks for different :>DDnames depending on the control statements passed into the program. Is :>there any way to define a dynamic DD statement using JCL symbols? For :>example, I would love to have //TB to correspond to TB01DAT, :>TB14DAT, or TB67DAT if I use SET TNO=01 or 14 or 67. :>Is such a thing possible? I tried using an instream proc definition and :>INCLUDE MEMBER= that proc name, but that failed, and of course, I tried :>the straight up JCL as above, and it failed. :>What do you all think? If you create a member for each DD statement, // INCLUDE MEMBER=TAB should work fine. Or am I missing something? //BLIP PROC //BLIP1 EXEC PGM=IEFBR14 // INCLUDE MEMBER=TABN // PEND //S1 EXEC BLIP,SFX=05 ++BLIP PROC ++BLIP1 EXEC PGM=IEFBR14 ++ INCLUDE MEMBER=TABN IEFC653I SUBSTITUTION JCL - MEMBER=TABN05 XXTABN05 DD DUMMY -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What were the first models to support Dual Address Space?
I believe there also was a hardware assist for the 4341. I think that the 4381 had it. I have some recollection about the 370/168 but it may have been supported by the PROGFLIH. I remember that SP1.3 was as slow as molasses on the test system at Western Electric. On Sun, 3 Jan 2021 17:14:18 -0500 WILLIAM H BLAIR wrote: :>| Does anybody remember the first models to support :>| Dual Address Space for MVS/SP Version 1? I'd like :>| to add that to the wiki [[IBM System/370]] article. :> :>In hardware, it was the 3033 (as well as the 3042 Attached Processor), as well as a hardware assist MES for the 3031. It was also, of course, also supported on the 3081 (and all processor models thereafter).If I remember correctly, this support was not offered for the 3032 in any form. :> :>For additional information, refer to: :> http://www.computinghistory.org.uk/downloads/8823 :>on page 114. :> :>In software, it was supported on any System/370. The ABENDs were intercepted by FLIH and the unsupported instructions and control registers emulated. :> :>This worked on my 370/158 at the time (1980). -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Size of the Writable Static Area
DXD / CXD On Wed, 23 Dec 2020 11:37:29 -0500 Joseph Reichman wrote: :>I am writing my own prolog code (Metal C ). From the GBL.. Global variables :>produced by the complier I determine the size of the automatic variables :>Register save area etc. So That I can determine how much Dynamic Storage I :>need :>I am wondering is there any way to determine the size of the writable static :>area -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Silly question - can one force IDCAMS PRINT to show printable lower case characters?
Silly question - can one force IDCAMS PRINT to show printable lower case characters? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RBOPSW question
Try using the field. Live and learn. On Thu, 3 Dec 2020 15:21:24 -0500 Joseph Reichman wrote: :>EXTENDED CONTROL PSW FROM THE RB :>LEVEL OR LINKAGE STACK LEVEL WHICH :>CREATED THE ESTAE EXIT AT THE TIME IT :>LAST INCURRED AN INTERRUPT OR 0 FOR :>ESTAI. OR PSW USED TO GIVE FRR :>CONTROL :> :> :>Trying to understand this Text this PSW SDWAEC2 is The from the RB which :>created the ESTAE I guess my PRB :>It says at the time it last incurred interrupt (that interrupt was caused by :>SDWARBAD ? ) :> :>-Original Message- :>From: IBM Mainframe Discussion List On Behalf Of :>Binyamin Dissen :>Sent: Thursday, December 3, 2020 2:56 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Re: RBOPSW question :> :>SDWAEC2 :> :>On Thu, 3 Dec 2020 11:56:04 -0500 Joseph Reichman :>wrote: :> :>:>This question is related to recovery routines :> :>:>In the case there is SDWARBAD and SDWANAME is not there :> :>:>So for example my program abended in a SVC :> :>:>So RBOPSW is somewhere in that SVC :> :>:>The rbregs should be my program :> :>:>But my question is would I have an address or could I determine from what :>address in my program I called the SVC -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RBOPSW question
SDWAEC2 On Thu, 3 Dec 2020 11:56:04 -0500 Joseph Reichman wrote: :>This question is related to recovery routines :>In the case there is SDWARBAD and SDWANAME is not there :>So for example my program abended in a SVC :>So RBOPSW is somewhere in that SVC :>The rbregs should be my program :>But my question is would I have an address or could I determine from what address in my program I called the SVC -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
For those that use S99ERMSG .....
For those that use S88ERMSG, do you tend to process the IGDMCSMG directly or do you use the call to IEFDB476 to 'format' it? As the block is pretty well defined, why make the format call? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Running same stc in a LPAR
On Sun, 22 Nov 2020 08:08:52 +0400 Peter wrote: :>Is it possible for JES to allow to run two started task with the same name :>in a LPAR(not sysplex). Happens all the time. :>One of a started task in our lpar is running two stc with same name but :>second one notifies that this particular task is already active. As you can see, it started and then decided to end because of the duplicate. JES had nothing to do with it. :>Is it a JES functionality to allow a task to run with same name or the :>product which has the capability of running in duplicate as many times even :>though it is initialised in one STC alone ? Yes. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Finding the STEIN of another address space
ASSBISQN On Wed, 18 Nov 2020 18:04:26 - Lennie Dymoke-Bradshaw <032fff1be9b4-dmarc-requ...@listserv.ua.edu> wrote: :>I have some cross-memory code written many years ago. :>It uses the ASVT to get the ASID of various address spaces and then uses the :>ASID in a SSAR to establish a cross-memory link (having first issued an :>AXSET AX=ONE). :>All works fine until faced with an address space with a reusable ASID. Then :>the SSAR gets a program check X'0013' and abends with a 0D3-0013 abend. This :>is all documented in the extended addressability manual here. :>https://www.ibm.com/support/knowledgecenter/SSLTBW_2.2.0/com.ibm.zos.v2r2.ie :>aa500/ieaa500101.htm :>So in order to correct my code I need to replace the SSAR instruction with :>an SSAIR instruction, whenever the target address space is reusable. This :>requires that I locate the STEIN (Second Table Entry Instance Number) of the :>target address space and specify it as a SASTEIN in the high order 4 bytes :>of the 64-byte register specified on the SSAIR instruction. :>How can I find the STEIN of the target address space? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Metal C questions
"Register Contents
0
Used as a work register by the system if SF is specified."
On Sun, 8 Nov 2020 18:52:58 -0500 Joseph Reichman
wrote:
:>Here it is GETMACIN is the METAL C prog
:>
:>
:> 283 MVC DBGROFF,=F'0'
:> 284 LINKX EP=GETMACIN,
:>PARAM=(MACINST,DBGROFF),
:>MF=(E,(R8)),SF=(E,(R6))
:> 290+ LR1,R8
:> 291+ LA14,MACINST PICKUP
:> 292+ LA15,DBGROFF PICKUP
:>
:>
:>IKJ57310I BREAKPOINT AT OPENFILE HAS BEEN DEACTIVATED
:> IKJ57024I AT GETMACIN PROLOUGE
:> TESTAUTH
:>LISTPSW
:> IKJ57652I PSW LOCATED AT 8B7C68
:> XRXXXTIE KEY XMWP AS CC PROGMASK EA BA INSTR ADDR
:> 01118 1101 00 01 0 1 1FA4B3E0
:> TESTAUTH
:>
:>thanks
:>
:>As you can see AS Address space control is 0
:>-Original Message-
:>From: IBM Mainframe Discussion List On Behalf Of
:>Binyamin Dissen
:>Sent: Sunday, November 8, 2020 6:42 PM
:>To: IBM-MAIN@LISTSERV.UA.EDU
:>Subject: Re: Metal C questions
:>
:>On Sun, 8 Nov 2020 18:21:00 -0500 Joseph Reichman <mailto:reichman...@gmail.com> >
:>wrote:
:>
:>:>1. I am using a far pointer to address a data space. I can see where
:>:>the access registerers are being initialized but I do not see a SAC 512.
:>My :>compile options has ARMODE
:>
:>:>I inserted __asm{ " SAC 512" }; to get it working
:>
:>Did you get an abend without it?
:>
:>:>2. I am LINK'ing to the metal C program from an assemble program .
:>:>Register 0 (which is a pointer to the writable static area) is not
:>:>initialized. I have a RENT option. Is there anyway knowing the size of the
:>:>WSA Should be (I have read the documentation bot XL/C complier guide and
:>:>metal C programming guide not quite sure what the WSA area is in regards
:>to
:>:>reentrancy)
:>
:>What is the syntax of your LINK(x), i.e., show your code.
--
Binyamin Dissen
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Metal C questions
On Sun, 8 Nov 2020 18:21:00 -0500 Joseph Reichman
wrote:
:>1.I am using a far pointer to address a data space. I can see where
:>the access registerers are being initialized but I do not see a SAC 512. My
:>compile options has ARMODE
:>I inserted __asm{ " SAC 512" }; to get it working
Did you get an abend without it?
:>2.I am LINK'ing to the metal C program from an assemble program .
:>Register 0 (which is a pointer to the writable static area) is not
:>initialized. I have a RENT option. Is there anyway knowing the size of the
:>WSA Should be (I have read the documentation bot XL/C complier guide and
:>metal C programming guide not quite sure what the WSA area is in regards to
:>reentrancy)
What is the syntax of your LINK(x), i.e., show your code.
--
Binyamin Dissen
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
REXX environment persistence
I have a REXX function which adds a host environment (and deletes it as well). If the REXX does not call the DELETE but merely ends (there does not appear to be a defined way to dynamically get control at the end of the EXEC) and the session goes to READY, the next REXX invocation has the residual environment defined. I would not expect such persistence. Is it defined anywhere? I attempted to update MODETABT to specify an EXECTERM (which also appears to persist) but that did not get control. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Replacing the IRXTERM routine
I am referring to under TSO, where I have a function call establish the host environment. I do not call IRXINIT directly (or at all). On Sun, 8 Nov 2020 11:36:59 +1100 Attila Fogarasi wrote: :>Under TSO/E you must call IRXINIT with a module name table that specifies :>your replacement module for IRXTERM. Your replacement module can choose to :>call IRXTERM (acting as a front-end filter), or not call IRXTERM at all. :>For non-TSO/E environments there are some other ways. There is a rather :>long list of the replaceable modules that are allowed by Rexx, luckily it :>includes IRXTERM. :>On Sun, Nov 8, 2020 at 9:07 AM Binyamin Dissen :>wrote: :>> I wrote a host environment and would like to receive control when the EXEC :>> ends to clean up. :>> I tried replacing the address IRXTERM in IRXEXTE but it does not receive :>> control. :>> This is under TSO. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Replacing the IRXTERM routine
I wrote a host environment and would like to receive control when the EXEC ends to clean up. I tried replacing the address IRXTERM in IRXEXTE but it does not receive control. This is under TSO. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: emptying a PDS: was RE: [IBM-MAIN] getting XCFAS down
On Sat, 17 Oct 2020 18:04:38 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Sat, 17 Oct 2020 17:48:57 -0500, Steve Horein wrote: :>>Good ole IDCAMS anyone? :>>https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.idai200/dgt3i231.htm :>How might one delete a PDS member named "* "? Modify the program that created it. STOW D is easier than STOW A. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SVC 99 035C
On Fri, 16 Oct 2020 18:03:52 -0400 Joseph Reichman wrote: :>I am dynamically allocating a new file which has 14 test units. I am getting :>a 035C meaning one them is erroneous the doc says that message IKJ56231I :>points me to the right text unit :>I am running this under TEST. I allocated SYSOUT to the terminal DA(*). I :>didn't see the message was wondering what file to allocate to DA(*) to see :>the message Yawn. As always, show your code. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: INTRDR and submitted JobID
Refer to "Assembler Services Guide" "Obtaining a job identifier". "Issue an ENDREQ macro after writing a complete job to the internal reader. The job identifier is returned in the RPLRBAR field of the request parameter list (RPL)." On Wed, 14 Oct 2020 12:37:01 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>I see that the UNIX SUBMIT command shows the JobID of the submitted job. :>What interface makes this available. I suspect it's in JES or Assembler Services, :>but I don't know how to find it. :>At what point in processing is the submitted JobID available?: :>o INTRDR OPEN? :>o INTRDR CLOSE? :>o somewhere in between? :>I'm wondering whether when dynamically generating JCL the job's own :>JobID is available for embedding in SYSIN or PARM for a later step. :>I've used an IKJEFT TSO ISPF step or SDSF screen scraping to extract :>a job's own JobID. Is there a simpler way? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Cbttape - dataset being used
On Wed, 14 Oct 2020 10:29:21 +0400 Jake Anderson wrote: :>Are there any freeware utility in CBTTAPE to check if a specific dataset is :>being used in parmlibs or proclib or by any batch ? Your question is not super clear - what does "used" or "any batch" mean? Obviously you can search thru all parmlibs and JES defined proclibs, but more than that you will need to look at SMF - but that will only tell you about what was read. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ALERSERV delete from stimerm exit
On Mon, 12 Oct 2020 07:53:28 -0400 Peter Relson wrote: :>A "workunit" (AKA "dispatchable unit") to z/OS is a task or SRB. :>Therefore a workunit is created when a task is created (ATTACH/ATTACHX) or :>an SRB is scheduled (SCHEDULE, IEAMSCHD). ALESERV AL=WORKUNIT does not allow the ALET to be used for an IRB under the same TCB. Thus WORKUNIT means something else. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ALERSERV delete from stimerm exit
On Fri, 9 Oct 2020 09:08:54 -0400 Peter Relson wrote: :>>if there is any restriction on deleting an ALET entry :>>(ALESERV DELETE) from a STIMERM exit :>It is not a "restriction", it is a "does not make sense" situation. It :>goes well beyond "delete". :>IRBs (STIMERM exits being one such) do not get control with the access :>list that their "mainline" (the STIMERM issuing code) had. :>You cannot use an ALET not on your access list. You cannot delete an ALET :>not on your access list. :>If you had tried to reference storage using that ALET while within the :>STIMERM exit you would have gotten a program interrupt. Peter, I have looked in various manuals and did not find a clear definition of when a new "workunit" is created. My assumption from this thread was that an IRB created one, but I wonder if there are other occasions. It would not have been obvious to me that an IRB would not inherit the workunit of the TCB. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Does SAS support LE modules in the CALL MODULE statement?
Does SAS support LE modules in the CALL MODULE statement? I have been searching the doc and see no reference to LE. Is it possible that such subroutines are not supported? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SVC 99 unallocating a concatenated dataset
On Thu, 1 Oct 2020 07:58:56 -0400 Joseph Reichman wrote: :>I allocate a number of datasets the last text unit being DALCLOSE :>(unallocated on close) In my second step I concatenate the datasets. At :>EOF I close them after wards Ideconcatenate them My question is :>shouldn't the individual datasets be unallocated as well What happens when you, thru JCL, concat several datasets with FREE=CLOSE? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PDS86 SHR?
On Tue, 22 Sep 2020 12:37:46 -0500 Skippy the Ancient wrote: :>There is a dataset missing a member. PDS86 won't play with it because it allocated to an STC. :>Is it possible to invoke PDS86 so it doesn't allocate the DSN as OLD? Use the SHR keyword? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: JCL examination prior to execution
IEAVTABX. Real time, when there is a dump. Check if SYSMDUMP is to SYSOUT, and then suppress it. On Tue, 22 Sep 2020 12:11:43 + Mark Jacobs <0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote: :>We have developers who put SYSMDUMP output to SYSOUT rather than a dataset. I'm looking at ways to prevent those jobs from executing until they make JCL changes. Are there any other exits, processes other than a JES2 exit (looking at exit 6/60) to do so? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: STIMERM SVCE
On Mon, 21 Sep 2020 14:56:21 -0400 Pierre Fichaud wrote: :>Yes, that address points after 0A2F. Is it your code? :>I've pasted more of the trace table but it has wrapped. Not enough to just use it. I presume you have a dump. Is the linkage stack as you expect it to be? Are the registers as you expect them to be? What code owns the FRR? :>Regards, Pierre. :> :> 0001 0043 007CE938 PC ... 600_01736592 0131F :>closedir/close :> 0001 0043 007CE938 PC ... 000_1CE632C8 03504 :> 0001 0043 007CE938 PR ... 600_1CE632C8 :>00_19382724 000F :> 0001 0043 007CE938 SSRV78 8465F0B6 1000D770 0DF0 :>7E47B210 Getmain D88E36C70B2C6E08 0024 :> 000F :> 0001 0043 007CE938 PC ... 0 1896F0BE 0030B :> Storage Obtain :> 0001 0043 007CE938 SSRV 132 0002 03D0 :>1CD2C000 Storage Obtain D88E36C70B2C9AE4 0024 :> 000F :> 0001 0043 007CE938 PR ... 0 1896F0BE 0133F7E8 :> 000F :> 0001 0043 007CE938 SSAR ... 0043 :>0043 :> 0001 0043 007CE938 SSAR ... 0043 :>0043 :> 0001 0043 007CE938 PC ... 0 1896F448 0030F :> Estaex :> 0001 0043 007CE938 PR ... 0 1896F448 017A8626 :> 000F :> 0001 0043 007CE938 PC ... 0 1896F49C 00311 :> Storage Release :> 0001 0043 007CE938 SSRV 133 0003 03D0 :>1CD2C000 Storage ReleaseD88E36C70B2CC618 0024 :> 000F :> 0001 0043 007CE938 PR ... 0 1896F49C 0133F7E8 :> 000F :> 0001 0043 007CE938 PC ... 0 0465F90A 00700 :> SMF :> 0001 0043 007CE938 PR ... 0 0465F90A 1AA016D0 :> 000F :> 0001 0043 007CE938 SSRV78 846604E0 D703 0DF0 :>7E47B210 FreemainD88E36C70B2CE90A 0024 :> 000F :> 0001 0043 007CE938 PR ... 000_01736592 :>00_1AB24A2E 0043 :> 0001 0043 007CE938 PC ... 000_18E800D6 0030F :> Estaex :> 0001 0043 007CE938 PR ... 000_18E800D6 017A8626 :> 0043 :> 0001 0043 007CE938 PR ... 6 1ABDCD7B 00_18E72CAE :> 0043 :> 0001 0043 007CE938 EXT TIMR _00FF9D08 1005 :> 0043 0043 D88E36C70B2D6DA2 0024 :> 07852000 8000 :> :> 0001 0043 007CE938 *SVCE2F _1AAFC3AE 0014 0400 :>1AC25260 0043 0043 D88E36C70B2D9EAC 0024 :> 0785 8000 0080 :> :> 0001 0043 007CE938 SSRV78 815BAAFA 4000EF50 0A28 :>00F92130 Getmain D88E36C70B2FD3C6 0024 :> 0001 :> 0001 0043 007CE938 *RCVY FRR 070C 8465F9D4 840F8000 0014 :> 000F 0043 D88E36C70B31778C 0024 :> :>0002 :> 0001 0043 007CE938 EXT TIMR _0465F9D4 1005 :> 000F 0043 D88E36C70B317B20 0024 :> 0704 8000 :> :> 0001 0043 007CE938 PGM011 _0465FA0A 00040011 :> 000F 0043 D88E36C70B318A34 0024 :> 0704 8000 7E47B800 :> :> 0001 0043 007CE938 *RCVY PROG940C4000 0011 :> 000F 0043 D88E36C70B321236 0024 :> :> :> :>On 2020-09-21 2:42 p.m., Binyamin Dissen wrote: :>> me, :>> you should preauthorize the dissensoftware.com domain. :>> :>> I very rarely bother responding to challenge/response systems, :>> especially those from irresponsible companies. :>> :>> -- :>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> send email tolists...@listserv.ua.edu with the message: IN :> :>---
Re: STIMERM SVCE
SETFRR does not show up in the trace table.
I would not expect the ECT1005 to be immediately followed by an SVC 2F.
What is around 1AAFC3AE? Your code?
You have removed too much of the trace.
On Mon, 21 Sep 2020 10:11:05 -0500 Pierre Fichaud wrote:
:>I have a sub-task that issues TCPIP calls using EZASMI (connect,send,etc)
:>I set an ESTAE.
:>Then in a STIMERM loop, I issue a connect.
:>The STIMERM popped once and then I tried to send() unsuccessfully.
:>I go back to do the STIMERM and blow up.
:>
:>I get an abend SVCE stating that I tried issuing the STIMERM SVC while an EUT
FRR was active.
:>Nowhere do I set an FRR.
:>
:>The 1st system trace table entry shown below is a return to 1ABDCD7A which
happens to be in BPXINVPT (10/27/17 UA94165).
:>The SETFRR must have been done in ASID 000F (OMVS).
:>There is no SETFRR in the system trace table.
:>The system runs in Dallas at DFW.
:>I'm not sure what to do next.
:>Suggestions ?
:>Thanks in advance, Pierre.
:>
:>
:> 0001 0043 007CE938 PR ... 6 1ABDCD7B 00_18E72CAE
0043
:> 0001 0043 007CE938 EXT TIMR _00FF9D08 1005
0043 0043 D88E36C70B2D6DA2 0024
:> 07852000 8000
:> 0001 0043 007CE938 *SVCE2F _1AAFC3AE 0014 0400
1AC25260 0043 0043 D88E36C70B2D9EAC 0024
:> 0785 8000 0080
:> 0001 0043 007CE938 SSRV78 815BAAFA 4000EF50 0A28
00F92130 Getmain D88E36C70B2FD3C6 0024
:>0001
:> 0001 0043 007CE938 *RCVY FRR 070C 8465F9D4 840F8000 0014
000F 0043 D88E36C70B31778C 0024
:>
0002
:> 0001 0043 007CE938 EXT TIMR _0465F9D4 1005
000F 0043 D88E36C70B317B20 0024
:>
:>--
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
--
Binyamin Dissen
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: rename a dataset in acs routine?
On Fri, 18 Sep 2020 02:36:24 -0500 Brian Westerman wrote: :>I was asked a question today that I honestly don't know how to answer. The programmer has a (very large) series of jobs that generate fiche tapes that get created and have a expiration date but never are cataloged (because they all have exactly the same DSN). So over time, they ended up with about 30,000 tapes from the over 9,000 jobs that CA-1 keeps around until expiration date. Obviously, these are not the easiest datasets to use later because they need to look up the tape volser every time. :>The problem is that they want to know if there is a way to automatically catalog datasets at creation time, to which I told them we could, but only 1 of them because you can't catalog two datasets with the same name. But they want to have "the system" which I'm guessing is me :), dynamically rename these datasets at creation time to add a date and time, such as change HLQ.FICHE.TAPE to which I would dynamically make it HLQ.FICHE.TAPE.D091720.T1123, meaning today's date and the current time (if it was 11:23am). :>I can't think of a way to do that in an acs routine, or any other simple way, and I'm hoping that someone has an idea that might apply here. I think I can alter almost anything about the dataset, except the name. Is there something I am missing? That is what GDG's were built for. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Searching MLPA module
On Fri, 18 Sep 2020 07:43:21 +0400 Peter wrote: :>Is there any utility which can help to search the loaded MLPA module ? Is :>it possible to load MLPA dynamically by avoiding IPL?(apology if this a :>ignorant question) :>We have a product which loads via MLPA and we just trying to understand if :>it's possible to load it dynamically without the need of IPL :>Any advice on this is much appreciated You must also confirm that the original address is not saved somewhere and that the caller will always load the module. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Syncsort E15 not receiving records
On Mon, 14 Sep 2020 22:54:46 + "Farley, Peter x23353" <031df298a9da-dmarc-requ...@listserv.ua.edu> wrote: :>E15 does NOT have to provide all data to the sort. Depends on how SORT is called. Sometimes it does. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Syncsort E15 not receiving records
On Mon, 14 Sep 2020 12:56:21 -0400 Joseph Reichman wrote: :>I have a really stupid question in chapter 6 of the syncsort manual invoking syncsort from a program on the second page of that chapter there is listed DD statements for invoked sort merge. There is listed sortin as one of the DD statements. If I am doing the reading then when does it have to be called sortin It doesn't. In fact, the input data need not be read from a file. It can be data from memory, a DB2 table, etc. :>> On Sep 14, 2020, at 12:47 PM, Binyamin Dissen wrote: :>> ?On Mon, 14 Sep 2020 11:29:54 -0400 Joseph Reichman :>> wrote: :>> :>I have a VB file Im trying to process :>> :>I calling syncsort from a program and have a E15 exit :>> :>Im running this all under test to get the kinks out :>> :>The first time The exit is invoke Register one :>> :>At +0 is 0 meaning I am not selecting anything. I checked by include and it looks right. I wondering about the record statement. I gave it coded as such :>> :>RECORD TYPE=V,LENGTH=(31996,,,8) would this record control statement get me every record on SORTIN :>> It would depend on how you are calling SORT, but if you pass an E15 address :>> SORT will not read SORTIN - you code is responsible for providing the records. :>> You must provide a record address with R15=12 until you are done providing the :>> input, in which case you pass R15=8. :>> Always best to read the manuals. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Syncsort E15 not receiving records
On Mon, 14 Sep 2020 11:29:54 -0400 Joseph Reichman wrote: :>I have a VB file Im trying to process :>I calling syncsort from a program and have a E15 exit :>Im running this all under test to get the kinks out :>The first time The exit is invoke Register one :>At +0 is 0 meaning I am not selecting anything. I checked by include and it looks right. I wondering about the record statement. I gave it coded as such :>RECORD TYPE=V,LENGTH=(31996,,,8) would this record control statement get me every record on SORTIN It would depend on how you are calling SORT, but if you pass an E15 address SORT will not read SORTIN - you code is responsible for providing the records. You must provide a record address with R15=12 until you are done providing the input, in which case you pass R15=8. Always best to read the manuals. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PL/I support of vector instructions?
On Wed, 9 Sep 2020 17:16:22 +1000 Robin Vowels wrote: :>On 2020-09-09 14:53, Seymour J Metz wrote: :>> Has IBM announced an intention to support the vector instructions to :>> allow more precision for FIXED DEC and FIXED BIN in PL/I? :>FIXED DECIMAL gives you up to 31 digits. :>FIXED BINARY gives you up to 63 bits. :>How much do you need? Never more than 16M. Or 4 computers worldwide. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: can DIE routines invoke macro's using linkage=system
If it supports being disabled, why not|? On Tue, 8 Sep 2020 20:47:30 -0400 Joseph Reichman wrote: :> :> :>thanks -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Strange S0C4 on z15
Fetch-protection-override (cr0.38) allowed the OS to put fetch protection on page0 while allowing (legacy) access to 0-2047. Don't know which hardware level allowed exploitation. On Wed, 19 Aug 2020 19:11:33 + "Christopher Y. Blaicher" wrote: :>We have a program that ran fine on a z13 that now gets an S0C4 on a z15. :>On a z13 we could access data in the PSA in the 2048 to 4095 range without going into key 0. The specific field is PSASVT. :>To get to that data now, we have to do a MODESET to key zero. :>Anyone else find this as a problem? Was it there with a z14? We jumped from a z13 to a z15. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
What is the SDATA option to include above the bar storage for a particular job?
What is the SDATA option to include above the bar storage for a particular job? It should be obvious, but I am missing it. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Basic ESTAE and subtask question
On Thu, 30 Jul 2020 11:08:36 -0700 Charles Mills wrote: :>I am trying to grasp the implications of "any recovery routines defined for :>the originating task are propagated to the new :>Task" in the ATTACH documentation. (It's under STAI/ESTAI but it's not clear :>to me if it only applies when STAI or ESTAI is in effect.) :>Here's my question: :>A main program issues ESTAEX (exit addr != 0). It then issues an ATTACHX :>with no STAI or ESTAI. While the subtask is still running the user cancels :>the program. Question: will the ESTAEX exit be driven once (only for the :>main task) or twice (for the main task and also as "propagated to the new :>Task")? ESTAE(X) only applies to the task issuing it, not to subtasks. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DISPLAY DUMP,ERRDATA rant
Isn't it about time that the 64 bit registers and ARs be included in the display? The 64 bit EPSW is shown. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Subject: Subject: Re: Where, oh where, is the IRB?
Thanks. Used a different TCB and all is well. On Sun, 12 Jul 2020 17:05:27 + Jim Mulder <030bfaf36c30-dmarc-requ...@listserv.ua.edu> wrote: :>Yes, that will defer the dispatching of IRBs. :>Jim Mulder z/OS Diagnosis, Design, Development, Test IBM Corp. Poughkeepsie NY :>| TCB has a saved EUT FRR, saved by|| WAIT ,LINKAGE=SYSTEM,EUT=SAVE|| That means that an IRB cannot run on the TCB? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Subject: Subject: Re: Where, oh where, is the IRB?
TCB has a saved EUT FRR, saved by WAIT ,LINKAGE=SYSTEM,EUT=SAVE That means that an IRB cannot run on the TCB? On Sun, 12 Jul 2020 16:23:19 + Jim Mulder <030bfaf36c30-dmarc-requ...@listserv.ua.edu> wrote: :> Various things can prevent dispatching an IRB.For example: TCBFX, TCBNOIRB, TCB has an EUT FRR, TCBPMC. Jim Mulder z/OS Diagnosis, Design, Development, Test IBM Corp. Poughkeepsie NY -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Where, oh where, is the IRB?
No CIRB. SCHEDIRB EPPTR=@IRBRTN,TCBPTR=CURRTCB,MODE=SUPR,KEY=SUPR, PARAMPTR=@#HWORK,MF=(E,OSCHEDIRB,COMPLETE) When I took a trap after the SCHEDIRB, I saw that ASXBFIQE/ASXBLIQE were set: IQE is 007AAFE8 7F4B5D10 | ".). | 007AAFF0 007AAF88 007B2528 | .:.h.#.. | IRB is 007AAF88.:7AAF8F.--All bytes contain X'00' 007AAF90 0013400E FF4B5EE1 070C | .. ...;. | 007AAFA0.:7AAFDF.--All bytes contain X'00' 007AAFE0 7F4B5D10 | ".). | 007AAFF0 007AAF88 007B2528 | .:.h.#.. | No idea what the 0013400E means. EPA is 7F4B5EE0 - do not know when the leading/trailing bit means. And, after the SRB ends the IQE is still hanging in the ASXB and has not been dispatched. The only non-dispatchability indicator is top RB in wait. What else may explain non-dispatchability? On Sun, 12 Jul 2020 00:24:18 + Seymour J Metz wrote: :>Post the code. Set a SLIP in the SRB routine where you issue the SCHEDIRB. :> :>Are you allocating your own IQE/IRB? If so, post the CIRB code. :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Saturday, July 11, 2020 7:44 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Where, oh where, is the IRB? :> :>I issue an IEAMSCHD to and address space which then issues a SCHEDIRB. :> :>The SRB completes, the SCHEDIRB receives R15=0, but the IRB seems to have :>vanished without a trace. :> :>Considering the possibility of an abend, I issued a :> :> SLIP,C=XXX,ML=10,J=targetjob,A=SVCD,END :> :>but nothing hits (it did hit when clearing up bugs in the SRB). :> :>Looking in memory at the shared data are between the SRB and IRB I see that :>the IRB has not placed its footprint. :> :>I searched in the jobs memory for the EP of the IRB routine (maybe it is :>queued somewhere) and do not find it. :> :>The TCB address to which it should be queued is dispatchable (top RB in a :>wait). :> :>What might I have done wrong? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Where, oh where, is the IRB?
I issue an IEAMSCHD to and address space which then issues a SCHEDIRB. The SRB completes, the SCHEDIRB receives R15=0, but the IRB seems to have vanished without a trace. Considering the possibility of an abend, I issued a SLIP,C=XXX,ML=10,J=targetjob,A=SVCD,END but nothing hits (it did hit when clearing up bugs in the SRB). Looking in memory at the shared data are between the SRB and IRB I see that the IRB has not placed its footprint. I searched in the jobs memory for the EP of the IRB routine (maybe it is queued somewhere) and do not find it. The TCB address to which it should be queued is dispatchable (top RB in a wait). What might I have done wrong? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [External] Silly ISMF question
Correct. Thanks. On Fri, 10 Jul 2020 21:19:04 -0500 David Shackelford wrote: :>I think you need to clear the "Storage Group Name" and "CDS Name" fields when switching back from SMS to physical list. :>The field help for option 1 says those fields must be cleared. (put cursor on the 1 and hit F1). :>I checked this on an internal test system and recreated both the symptom of the volumes missing from the list, and a full list with those fields cleared. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [External] Silly ISMF question
No, no and no Panel Defaults Utilities Scroll Help ss VOLUME SELECTION ENTRY PANEL Page 1 of 3 Command ===> Select Source to Generate Volume List . . 2 (1 - Saved list, 2 - New list)1 Generate from a Saved List Query Name To List Name . . Save or Retrieve2 Generate a New List from Criteria Below Specify Source of the New List . . 1 (1 - Physical, 2 - SMS) Optionally Specify One or More: Enter "/" to select option Generate Exclusive list Type of Volume List . . . 1 (1-Online,2-Not Online,3-Either) Volume Serial Number . . * (fully or partially specified) Device Type . . . . . . .(fully or partially specified) Device Number . . . . . .(fully specified) To Device Number . . .(for range of devices) Acquire Physical Data . . Y (Y or N) Acquire Space Data . . . Y (Y or N) Storage Group Name . . . * (fully or partially specified) CDS Name . . . . . . . 'ACTIVE' (fully specified or 'Active') Use ENTER to Perform Selection; Use DOWN Command to View next Selection Panel; Use HELP Command for Help; Use END Command to Exit. On Thu, 9 Jul 2020 20:03:33 + "Pommier, Rex" wrote: :>Obvious questions would be :> :>1) do you have some kind of filter on screens 2 or 3 of the selection criteria? :>2) old CDS name? :>3) using a saved list instead of generating a new one for the source? :> :>If none of these things are it, may I suggest showing us your volume selection entry panel? :> :>Rex :> :>-Original Message----- :>From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen :>Sent: Thursday, July 9, 2020 2:35 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: [External] Silly ISMF question :> :>I am running ISMF to get a list of volumes (2.1) and many volumes are missing from the list. I ran thru all of the options and don't see any filters. :> :>What obvious thing am I doing wrong? It worked a few days ago, when I set SMS as the source of the list. I reset it to physical but still only SMS. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Silly ISMF question
I am running ISMF to get a list of volumes (2.1) and many volumes are missing from the list. I ran thru all of the options and don't see any filters. What obvious thing am I doing wrong? It worked a few days ago, when I set SMS as the source of the list. I reset it to physical but still only SMS. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Assembler question
Then one wonders what "aligned" means to you. On Mon, 6 Jul 2020 02:37:22 + "Gibney, Dave" wrote: :>Actually, it is. But, BLA-2 below is still offset 3 bytes from BLA-RECORD because BLA-1 is only 3 bytes long :> :>> -Original Message- :>> From: IBM Mainframe Discussion List On :>> Behalf Of Joe Monk :>> Sent: Sunday, July 05, 2020 4:38 PM :>> To: IBM-MAIN@LISTSERV.UA.EDU :>> Subject: Re: Assembler question :>> :>> 01 BLA-RECORD. :>> 05 BLA-RECORD PIC X(4). :>> 05 BLA-RECOR2 REDEFINES BLA-RECORD PIC X(3). :>> :>> The 01 is aligned. :>> The 05 is aligned. :>> The second 05 is not aligned. :>> :>> Joe :>> :>> :>> On Sun, Jul 5, 2020 at 6:27 PM Binyamin Dissen :>> :>> wrote: :>> :>> > 01 BLA-RECORD. :>> >05 BLA-1 PIC X(3). :>> >05 BLA-2 PIC S9(8) COMP. :>> > :>> > Do you truly wish to assert that BLA-2 is aligned? :>> > :>> > On Sun, 5 Jul 2020 17:45:37 -0500 Joe Monk :>> wrote: :>> > :>> > :>"Subordinate items are not aligned" :>> > :> :>> > :>yeah, no. :>> > :> :>> > :>If an 01 is aligned, then the subordinate 05 under the 01 is also :>> > aligned. :>> > :>It has to be this way because of REDEFINES. I cant REDEFINE an unaligned :>> > :>item into an aligned item. :>> > :> :>> > :>77 are aligned because they are standalone, i.e. no grouping. :>> > :> :>> > :>Joe :>> > :> :>> > :>On Sun, Jul 5, 2020 at 12:07 PM Binyamin Dissen < :>> > bdis...@dissensoftware.com> :>> > :>wrote: :>> > :> :>> > :>> On Sun, 5 Jul 2020 11:31:55 -0500 Joe Monk :>> :>> > wrote: :>> > :>> :>> > :>> :>Cobol has alignment too. You just dont see it. :>> > :>> :>> > :>> :>All storage is aligned. :>> > :>> :>> > :>> The opposite is true. :>> > :>> :>> > :>> Group (01/77) are aligned. :>> > :>> :>> > :>> Subordinate items are not aligned unless the SYNC clause is specified. :>> > :>> :>> > :>> :>On Sun, Jul 5, 2020 at 10:24 AM Nguyen Dt :>> wrote: :>> > :>> :> :>> > :>> :>> Thank you all for your inputs, :>> > :>> :>> :>> > :>> :>> I am over the problem now. :>> > :>> :>> In fact what i tried to do is to Move some fields to my output :>> > fields :>> > :>> and :>> > :>> :>> then write it as a report. (It is a Db2 performance report, the :>> > input :>> > :>> are :>> > :>> :>> from the trace buffers with the macros given by Db2 libraries) :>> > :>> :>> :>> > :>> :>> So my program is roughly like this :>> > :>> :>> READ Buffer on QW... variables :>> > :>> :>> :>> > :>> :>> MVC OW...,QW... :>> > :>> :>> :>> > :>> :>> :>> > :>> :>> OW... are the output fields i defined it exactly as in the DSECT :>> > got :>> > :>> from :>> > :>> :>> the macros. :>> > :>> :>> As it is an output field, the position is important (and it is :>> > why i :>> > :>> :>> detected a problem in the positions of my fields) :>> > :>> :>> Its is OK now with OW... variables defined as characters CLx :>> > :>> :>> :>> > :>> :>> (PS: When i use NOALIGN , the program abends at execution ...) :>> > :>> :>> :>> > :>> :>> As i learn assembler "on the flight" , there is some important :>> > things :>> > :>> that :>> > :>> :>> i don' t understand , such as the alignment This is something :>> > we :>> > :>> don't :>> > :>> :>> care in cobol , rexx Can you tell me why assembler has the :>> > :>> alignment :>> > :>> :>> in words that are easy to understand and visualize in my little :>> > head ? :>> > :>> :>> :>> > :>> :>> Thank you again. :>> > :>> :>> Duc :>> > :>> :>> :>> > :>> :>> :>> > -
Re: Assembler question
01 BLA-RECORD. 05 BLA-1 PIC X(3). 05 BLA-2 PIC S9(8) COMP. Do you truly wish to assert that BLA-2 is aligned? On Sun, 5 Jul 2020 17:45:37 -0500 Joe Monk wrote: :>"Subordinate items are not aligned" :> :>yeah, no. :> :>If an 01 is aligned, then the subordinate 05 under the 01 is also aligned. :>It has to be this way because of REDEFINES. I cant REDEFINE an unaligned :>item into an aligned item. :> :>77 are aligned because they are standalone, i.e. no grouping. :> :>Joe :> :>On Sun, Jul 5, 2020 at 12:07 PM Binyamin Dissen :>wrote: :> :>> On Sun, 5 Jul 2020 11:31:55 -0500 Joe Monk wrote: :>> :>> :>Cobol has alignment too. You just dont see it. :>> :>> :>All storage is aligned. :>> :>> The opposite is true. :>> :>> Group (01/77) are aligned. :>> :>> Subordinate items are not aligned unless the SYNC clause is specified. :>> :>> :>On Sun, Jul 5, 2020 at 10:24 AM Nguyen Dt wrote: :>> :> :>> :>> Thank you all for your inputs, :>> :>> :>> :>> I am over the problem now. :>> :>> In fact what i tried to do is to Move some fields to my output fields :>> and :>> :>> then write it as a report. (It is a Db2 performance report, the input :>> are :>> :>> from the trace buffers with the macros given by Db2 libraries) :>> :>> :>> :>> So my program is roughly like this :>> :>> READ Buffer on QW... variables :>> :>> :>> :>> MVC OW...,QW... :>> :>> :>> :>> :>> :>> OW... are the output fields i defined it exactly as in the DSECT got :>> from :>> :>> the macros. :>> :>> As it is an output field, the position is important (and it is why i :>> :>> detected a problem in the positions of my fields) :>> :>> Its is OK now with OW... variables defined as characters CLx :>> :>> :>> :>> (PS: When i use NOALIGN , the program abends at execution ...) :>> :>> :>> :>> As i learn assembler "on the flight" , there is some important things :>> that :>> :>> i don' t understand , such as the alignment This is something we :>> don't :>> :>> care in cobol , rexx Can you tell me why assembler has the :>> alignment :>> :>> in words that are easy to understand and visualize in my little head ? :>> :>> :>> :>> Thank you again. :>> :>> Duc :>> :>> :>> :>> -- :>> :>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> :>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :>> :>> :> :>> :>-- :>> :>For IBM-MAIN subscribe / signoff / archive access instructions, :>> :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :>> -- :>> Binyamin Dissen :>> http://www.dissensoftware.com :>> :>> Director, Dissen Software, Bar & Grill - Israel :>> :>> :>> Should you use the mailblocks package and expect a response from me, :>> you should preauthorize the dissensoftware.com domain. :>> :>> I very rarely bother responding to challenge/response systems, :>> especially those from irresponsible companies. :>> :>> -- :>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Assembler question
On Sun, 5 Jul 2020 11:31:55 -0500 Joe Monk wrote: :>Cobol has alignment too. You just dont see it. :>All storage is aligned. The opposite is true. Group (01/77) are aligned. Subordinate items are not aligned unless the SYNC clause is specified. :>On Sun, Jul 5, 2020 at 10:24 AM Nguyen Dt wrote: :> :>> Thank you all for your inputs, :>> :>> I am over the problem now. :>> In fact what i tried to do is to Move some fields to my output fields and :>> then write it as a report. (It is a Db2 performance report, the input are :>> from the trace buffers with the macros given by Db2 libraries) :>> :>> So my program is roughly like this :>> READ Buffer on QW... variables :>> :>> MVC OW...,QW... :>> :>> :>> OW... are the output fields i defined it exactly as in the DSECT got from :>> the macros. :>> As it is an output field, the position is important (and it is why i :>> detected a problem in the positions of my fields) :>> Its is OK now with OW... variables defined as characters CLx :>> :>> (PS: When i use NOALIGN , the program abends at execution ...) :>> :>> As i learn assembler "on the flight" , there is some important things that :>> i don' t understand , such as the alignment This is something we don't :>> care in cobol , rexx Can you tell me why assembler has the alignment :>> in words that are easy to understand and visualize in my little head ? :>> :>> Thank you again. :>> Duc :>> :>> -- :>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :> :>------ :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Assembler question
Incorrect. STCK does not show such a restriction. On Sat, 4 Jul 2020 23:39:44 + Seymour J Metz wrote: :>> (Do CCWs still require doubleword alignment? PSWs? STCK? CDS?) :> :>Yes. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Migrate z/OS DASD volumes from Mainframe to Hercules Environment
Have you complied with the licensing requirements? On Tue, 30 Jun 2020 05:25:23 -0500 Jasi Grewal wrote: :>I am sorry I am just learning Hercules Systems and trying to migrate one of my z/OS DASD Systems from Mainframe to Hercules Environment. :>I have z/VM running on Hercules but when I tries to IPL z/OS it seems that there is a corruption and that is most probably cause of wrong process. :>I believe that there must be some method to migrate the z/OS DASD from Mainframe to Hercules. :>I used z/VM DDR+Terse to migrate zOS Dasd but I don't think that is the correct process. :>Is there a Documentation in how to migrate z/OS Systems to Hercules? That would be appreciated. :>Any guidance would be appreciated. :>Thank you in advance, :>Regards, :>Jasi Grewal. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Use of BPXWUNIX and CP - a weekend quandary.
On Sun, 28 Jun 2020 09:09:43 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>The REFRESH key is better: less disruptive. ATTN is *so* 20th Century. The ATTN key merely notifies the monitor that the user wants control. It is not disruptive unless that is what the monitor is supposed to do. The monitor can let things keep running while soliciting input. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Use of BPXWUNIX and CP - a weekend quandary.
On Sat, 27 Jun 2020 23:15:51 -0500 Bruce Hewson wrote: :>The reason for this behavior is that TSO/VTAM provides no way to wait for keyboard input and TTY output at the same time under TSO. Yes, it can. Use the ATTN/PA1 key to get the opportunity to enter something. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DB2 View issue
I question that. What do you see there? On Thu, 25 Jun 2020 20:12:41 +0300 saurabh khandelwal wrote: :>I tried this too. But doenst have view create definition :> :>On Thu, 25 Jun 2020, 11:54 Ron Hesketh, wrote: :> :>> Hi Suarabh, :>> Try the Statement column in SYSIBM.SYSVIEWS. :>> :>> Regards, :>> Ron :>> :>> -Original Message- :>> From: IBM Mainframe Discussion List On Behalf :>> Of saurabh khandelwal :>> Sent: Wednesday, 24 June 2020 6:44 PM :>> To: IBM-MAIN@LISTSERV.UA.EDU :>> Subject: DB2 View issue :>> :>> Dear Group, :>> :>> :>> :>> In Db2 v12, when I like to see the view definition and I look at column :>> TEXT in catalog table SYSIBM.SYSVIEWS, it is blank. :>> :>> :>> :>> :>> :>> :>> :>> Which was available in previous versions on DB2. :>> :>> :>> :>> Now, requirement is to see the view definition used during creating this :>> view. Can anyone help me get this detail in Db2 v12. :>> :>> -- :>> For IBM-MAIN subscribe / signoff / archive access instructions, send email :>> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :>> __ :>> This email has been scanned by the Symantec Email Security.cloud service. :>> For more information please visit http://www.symanteccloud.com :>> __ :>> :>> :>> ___ :>> :>> This email has been scanned by the Bankwest Email Security System. :>> :>> ___ :>> :>> :>> ___ :>> Unencrypted electronic mail is not secure and may not be authentic. :>> If you have any doubts as to the contents please telephone to confirm. :>> :>> This electronic transmission including any attachments is intended only :>> for those to whom it is addressed. It may contain copyright material or :>> information that is confidential, privileged or exempt from disclosure by :>> law. :>> Any claim to privilege is not waived or lost by reason of mistaken :>> transmission :>> of this information. If you are not the intended recipient you must not :>> distribute or copy this transmission and should please notify the sender. :>> Your costs for doing this will be reimbursed by the sender. :>> :>> We do not accept liability in connection with computer virus, data :>> corruption, :>> delay, interruption, unauthorised access or unauthorised amendment. :>> :>> ___ :>> :>> __ :>> This email has been scanned by the Symantec Email Security.cloud service. :>> For more information please visit http://www.symanteccloud.com :>> __ :>> :>> :>> -- :>> For IBM-MAIN subscribe / signoff / archive access instructions, :>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DB2 View issue
Look at STATEMENT. Best to ask DB2 questions in the DB2 list. On Wed, 24 Jun 2020 13:44:12 +0300 saurabh khandelwal wrote: :>In Db2 v12, when I like to see the view definition and I look at column :>TEXT in catalog table SYSIBM.SYSVIEWS, it is blank. :>Which was available in previous versions on DB2. :>Now, requirement is to see the view definition used during creating this :>view. Can anyone help me get this detail in Db2 v12. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Allocating GDG(+1) using SVC 99
On Sun, 21 Jun 2020 01:02:41 -0400 Joseph Reichman wrote: :>I am doing a number of snapx type dumps in a started task. I would like to :>keep each and every one in a separate dsn. It would seem keeping them in a :>GDG would accomplish this. :>The Documentation says that If I turn on S99GDGNT in S99FLAG1 I could :>specify the dsn as MYSDUMP.GDG(+1) and have each snap dump in a separate :>providing I do a close un allocate as a text unit (meaning I would :>unallocated the dataset upon closing the snap file). :>If I read documentation right it seems that upon a close unallocate the :>relative gag number gets updated It would seem to not require any free. Why haven't you tried it? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Reading a dump
Scan the dump looking for RTM2WA That will have the PSW, the registers and the last branch location. After looking at those you start debugging. On Fri, 19 Jun 2020 22:23:49 + Ze'ev Atlas <004b34e7c98a-dmarc-requ...@listserv.ua.edu> wrote: :>I admit that I am rusty and did not look at any dump for decades, and when I did I was coding either Assembler or COBOL and I knew how to decipher the thing.I am porting a C library libxc to classic z/OS and it compiles cleanly (most of it, at least). As is implied by the description, most users of that thing are running it on Linux or Windows. Maybe a few on Unix machines. :>I tried to run its modules on my z/OS machine (genuine IBM, z/OS 2.4), and I get S0C4, with nice SYSUDUMP! :>I have no idea how to begin to look and I am afraid that I compiled it with wrong options. Is there any C maven in the audience that could please try to guide me where to begin looking. :>I tried to avoid compiling it as dll (that much I sort of knew) but I am not sure any more. :>Ze'ev Atlas :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CVTLSO race (was: ... STCKCONV ...)
Either way there is a potential error as the field does not indicate the time range it applies to. Your solution is incorrect if the STCK time was before the leap second was to be added but the refetched LSO applies for after the time. On Tue, 16 Jun 2020 10:52:52 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Tue, 16 Jun 2020 14:16:13 +0300, Steff Gladstone wrote: :>>We need to capture the date and time in a GLUE and need more precision than :>>the CICS variables give us. :>There's a possible timing window in naive leap second :>correction. Suppose: :>STCK :>(a leap second occurs, adding 1 to CVTLSO) :>Programmer subtracts CVTLSO from stored TOD value :>resulting in a time value 0.99 seconds early. :>If thw programmer reverses the order of operations, the :>complementary hazard giving a timne 0.99 seconds in the :>future exists. :>This can be avoided by: :>RETRY: Copy CVTLSO :>STCK :>IF CVTLSO<>Copy GOTO RETRY :>Subtract CVTLSO from stored TOD :>Does TIME macro do something similar? It's a performance :>cost of two (three?) instructions in a much-used code :>path to avoid a hazard that occurs only every year or :>two. But this has caused servers to crash. :> :>Wrapping the operations with a lock would be more costly. :> :>Amazon, Google, (Others?) "smear" leap seconds over 24 :>hours to avoid this: :> https://en.wikipedia.org/wiki/Leap_second#Workarounds_for_leap_second_problems :>This requires steering the clock by 12 ppm, well within :>the capability of the TOD clock, but for z/OS to freeze :>CVTLSO at its current value and to adopt smearing would :>be a major change from specified behavior. :> :>(I submitted my RCF on STCKCONV.) :> :>-- gil :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using STCKCONV in a CICS GLUE
On Tue, 16 Jun 2020 14:16:13 +0300 Steff Gladstone wrote: :>We need to capture the date and time in a GLUE and need more precision than :>the CICS variables give us. :>Can we use the STCKCONV macro in a GLUE? Could it cause all of CICS to :>enter a wait? Or is it essentially pure CPU? Pretty much pure CPU. But one of your other options are to do a STCK(F) while in the tight parts of the code and STCKCONV it later. Or if you are calculating intervals use the value directly. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CBTTAPE
the message: INFO IBM-MAIN :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :>::DISCLAIMER:: :> :>The contents of this e-mail and any attachment(s) are confidential and intended for the named recipient(s) only. E-mail transmission is not guaranteed to be secure or error-free as information could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses in transmission. The e mail and its contents (with or without referred errors) shall therefore not attach any liability on the originator or HCL or its affiliates. Views or opinions, if any, presented in this email are solely those of the author and may not necessarily reflect the views or opinions of HCL or its affiliates. Any form of reproduction, dissemination, copying, disclosure, modification, distribution and / or publication of this message without the prior written consent of authorized representative of HCL is strictly prohibited. If you have received this email in error please delete it and notify the sender immediately. Before opening any email and/or attachments, please check them for :>viruses and other defects. :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN **CAUTION EXTERNAL EMAIL** :> :>**DO NOT open attachments or click on links from unknown senders or unexpected emails** :> :>This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: missing FMIDs
I don't know how you were "given" the setup, but it is quite possible that there are multiple GLOBAL CSI's. If you can talk to whomever set it up before they quit, do it. Otherwise you are going to do a bit of looking around. On Fri, 12 Jun 2020 10:13:31 -0500 Bill Giannelli wrote: :>So I had a CSI setup and provided for by someone else. As I am going thru it it seems there are FMIDs for a couple of products missing: :>DB2 BASE Z/OS :>HDREC10 DB2 RACF EXIT Z/OS :>HIYCC10 DB2 IMS ATTACH Z/OS :>HIZCC10 DB2 SUBSYS INIT Z/OS :>JDBCC1Z DB2 12 VUE :>JDBCC12 DB2 JDBC/SQLJ Z/OS :>Db2 QMF for z/OS V12 :>HHPCC10 QMF HPO :>JYQCC10 QMF ANALYTICS TSO :>If I order maintenance supplying an "installed Software Report" will the missing FMIDs be ordered? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMPe Apply not working
Show the APPLY statement. On Thu, 11 Jun 2020 12:27:00 -0500 Bill Giannelli wrote: :>GIM59603IENQ WAS SUCCESSFUL FOR SHARED USE OF OEMPP.DB2.V12R02M0.SMPPTS1 FOR :>GIM59603IENQ WAS SUCCESSFUL FOR SHARED USE OF OEMPP.DB2.V12R02M0.SMPPTS2 FOR :>GIM24801S ** NO SYSMODS SATISFIED THE OPERANDS SPECIFIED ON THE APPLY COMMAND. :>GIM59606IDEQ WAS SUCCESSFUL FOR EXCLUSIVE USE OF OEMPP.DB2.V12R02M0.GLOBAL.C :>GIM59607IDEQ WAS SUCCESSFUL FOR SHARED USE OF OEMPP.DB2.V12R02M0.SMPPTS FOR :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Don't Hire Chuck Norris was Re: restart GIMSMP in unpack step
On Wed, 10 Jun 2020 15:18:40 -0300 Clark Morris wrote: :>[Default] On 10 Jun 2020 07:43:41 -0700, in bit.listserv.ibm-main :>ku...@us.ibm.com (Kurt Quackenbush) wrote: :> :>>> snip :>>Kurt Quackenbush -- IBM, SMP/E Development :>>Chuck Norris never uses CHECK when he applies PTFs. :> :>Don't Hire Chuck Norris for any systems work. Well.. Back years ago, it was much faster to backup the resvol+smp datasets, do the apply, and then do a restore than the APPLY CHECK. Now, APPLYing to the running system ... -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Debug Tool for recovery routine
Get a dump of the abend. Look at the SCBs. Look at the trace table to see how you got there. Confirm that the abend is what you think it is where you think it is. On Thu, 4 Jun 2020 09:38:35 -0400 Joseph Reichman wrote: :>I dont know what other information to provide I code Estae/x followed by H0 :>Or deliberate s0c7 and debug tool abend on the PC or SVC of the Estae/X in anticipation of the abend :> :> :> :>> On Jun 4, 2020, at 9:34 AM, Binyamin Dissen wrote: :>> :>> ?Does it make you feel better for people to ask you to show the doc? Has there :>> been a single time where you actually provided information? :>> :>> On Thu, 4 Jun 2020 08:09:17 -0400 Joseph Reichman :>> wrote: :>> :>> :>Has Anyone used debug tool to debug a recovery routine I cant seem to drive the code I code the Estaex and after wards have a H0 to drive the code and tool abends at the PC or SVC of the estaex -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Debug Tool for recovery routine
Does it make you feel better for people to ask you to show the doc? Has there been a single time where you actually provided information? On Thu, 4 Jun 2020 08:09:17 -0400 Joseph Reichman wrote: :>Has Anyone used debug tool to debug a recovery routine I cant seem to drive the code I code the Estaex and after wards have a H0 to drive the code and tool abends at the PC or SVC of the estaex -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: TSO EXec syntax (was: ... ISPF publication)
Because EXEC does not invoke a load module. " On Wed, 3 Jun 2020 09:21:46 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Tue, 2 Jun 2020 23:44:50 -0400, Steve Smith wrote: :> :>>I'm not sure this is relevant, but today I ran into this: :>> :>>EX 'yadda.zadda.exec(blah)' ',,foo' /* works */ :>> :>>but :>> :>>%blah ,,foo /* does not work */ :>> :>>"blah" starts with :>> :>>parse arg a ',' b ',' c :>> :>>The leading commas disappear with the so-called indirect invocation, ... :>> :>The deficiency of EXec is that it does not use the standard load module :>search sequence for the member name. Someone should submit an RFE :>for support of :>EXec *(blah) :>to use the standard exec search sequence for the member name similar :>to what was doe for CALL within my memory: :> :>https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ikjc500/ikj2l2_CALL_command_operands.htm :> :>CALL command operands :>z/OS TSO/E Command Reference :>SA32-0975-00 :> :>dsname :>specifies the name of a PDS or a PDSE from which the program :>is to be executed. If dsname is not fully qualified, it is :>assumed to be 'prefix.dsname.LOAD'. :>* :>specifies that CALL should use the standard load module search :>sequence for the member name. :> :>-- gil :> :>------ :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: FW: Your comment on ISPF publication
It would appear that IKJSCAN considers leading commas to be similar to leading blanks in ignoring them when calculating the parameter offset. TSO/E Programming Services states: The Command Scan Service Routine examines the command buffer and performs the following functions: It translates all lowercase characters in the subcommand name to uppercase. If a valid operand is present, it resets the offset to the number of text bytes preceding the first non-blank character in the operand field. If a valid operand is not present, the offset equals the length of the text portion of the buffer. It returns a pointer to the subcommand name, the length of the subcommand name, and a code explaining the results of its scan to the calling routine. It optionally checks the syntax of the subcommand name. It recognizes an implicit EXEC command that has a percent sign as the first character. It handles leading blanks and embedded comments. It appears that the second clause is not precise. Probably will be closed by IBM with a DOC APAR. On Tue, 2 Jun 2020 23:44:50 -0400 Steve Smith wrote: :>I'm not sure this is relevant, but today I ran into this: :> :>EX 'yadda.zadda.exec(blah)' ',,foo' /* works */ :> :>but :> :>%blah ,,foo /* does not work */ :> :>"blah" starts with :> :>parse arg a ',' b ',' c :> :>The leading commas disappear with the so-called indirect invocation, and so :>'foo' is assigned to a, not c. According to the REXX reference, this is :>what TSO does. For some reason. I'm sure it's a good reason. Possibly a :>really good and wonderful reason. But it interferes somewhat with :>maintaining my sanity. :> :>sas :> :>On Tue, Jun 2, 2020 at 11:28 PM Seymour J Metz wrote: :> :>> Does anybody know of other characters that are problematical in the TSO :>> command? :>> :>> :>> -- :>> Shmuel (Seymour J.) Metz :>> http://mason.gmu.edu/~smetz3 :>> :>> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: GTF and SLIP vs. 64-bit execution
VPH/VPA seems to be documented. On Tue, 26 May 2020 13:52:49 -0400 Gord Tomlin wrote: :>On 2020-05-25 17:04, Ed Jaffe wrote: :>> For the record, we diagnose issues using the events you've listed all :>> the time, no matter what the AMODE. In fact, we even have RMODE(64) code :>> nowadays. :>> :>> There is a bug with 64-bit PTRACE formatting and we got a custom fix :>> from Jim Mulder for that (it will be GA with z/OS 2.5), but otherwise :>> everything we need is there. :>> :>> What sort of information were you expecting that you did not see? :> :>I probably painted with too broad a brush in my initial post, and for :>that I apologize. The real offender is the PGM trace entry captured by :>PI=56 in the GTF trace specification: :> :>PGM. 056 ASCB 00FBF880 CPU. JOBN :> OLD-PSW. 47543001 8038 0149ADEE :> :> TCB. 008CBA08 VPH. 7000 VPA. 7800 :> :> MODN SVC-RES R0.. 84C85DFA R1.. 00FFF5FF :> :> R2.. 7F6ADD38 R3.. 7F6ADE34 R4.. 8050 :> :> R5.. 7F6ADCE5 R6.. 008C46D0 R7.. 008C46FC :> :> R8.. 0050 R9.. 84C85936 R10. 01D9AE20 :> :> R11. 008C4C68 R12. 84C85936 R13. 008C4010 :> :> R14. R15. 7000 :> :> GMT-05/22/2020 14:40:47.514205 LOC-05/22/2020 10:40:47.514205 :> :>Despite being in AMODE 64, it only presents 32-bit registers. From :>another source that I am prohibited by NDA from revealing, I know that :>the entire contents of R15 were 7000_7000; I know that if the :>problem was repeatable I could use SLIP (which does show register high :>halves) to trace in the vicinity of the program check. But this would :>have been immediately obvious if the GTF trace entry showed 64-bit :>registers. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: GTF and SLIP vs. 64-bit execution
On Mon, 25 May 2020 16:07:30 -0400 Gord Tomlin wrote: :>We recently had the need to use GTF to collect SLIP IF, SVC, USR and PI :>events to help diagnose a PIC 38 program check where the address to be :>resolved was above the bar. Unfortunately, the trace was of almost no :>use in diagnosis due to the more or less complete lack of 64-bit support :>in the trace. The only nod is that 128-bit PSWs are shown. :>I expect that I either missed or forgot some statement from IBM that GTF :>would not be enhanced for 64-bit; I can't imagine any other credib;e :>reason for the lack or support. However. I can't find such a statement, :>nor can I find any complaint or RFE about the lack of such support. :>Anyone have any relevant information on this? What was missing? I am sure that I have done SLIP GTF with 64 bit code. One thing that is a serious pain is that if the storage you wish to TRDATA is not paged in you do not get it. Also, IIRC, even the DATA qualifier does not match if it is not paged in (even though the instruction will be reexecuted after the page in). Show the SLIP IF and what you got. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Where do started PROC errors go?
Try running the PROC in a batch job. You do realize that without proper setup the STC is probably using a different userid. On Thu, 21 May 2020 09:11:10 -0700 Charles Mills wrote: :>I have a program that runs successfully in a job. I just cloned the JCL :>appropriately into a PROC. When I issue a START for the PROC I get a started :>message and an ended message but no clue as to why it failed. (It is :>supposed to be long-running, so ending is a failure.) I don't think it is a :>JCL error because I get a JCL error message in that case, and I have :>evidence that it actually ran "some." :> :>The PROC includes //SYSTSPRT DD SYSOUT=H. (H is a held class.) I have strong :>evidence that the program is getting far enough that it would have written :>several lines to SYSTSPRT. :> :>I see nothing in SDSF, even with PREFIX * and OWNER *. :> :>Where is my output going? How do I determine that? How do I view it? :> :>There is nothing in the PROC statement: //procname PROC and no operands on :>the START other than the PROC name. The program is IKJEFT01 and a Rexx EXEC :>FWIW. Again, it works in a job. :> :>Thanks, :>Charles -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: s0c4 accessing RAX control Block
As always, show your code and what the system reported as the abend details. On Wed, 13 May 2020 19:02:34 -0400 Joseph Reichman wrote: :>Hi :> :> :> :>I am trying to get info on virtual storage towards that end I got a s0c4 :>pic 10 accessing a field in the RAX control block I got the address from the :>ASCB->ASCBRSME the doc says its in SQA not fetch protected :> :>I later did VSMSQA,AREA(RAXID,800),LINKAGE=SYSTEM and got a RC 4 :> :> :> :>The ASCBRSME seems to have a valid pointer -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question About Dormant MVS Resource Managers
My understanding is that if an EOM resource manager does not complete in a timely manner it will be abended. The clock starts when it is invoked. On Wed, 29 Apr 2020 17:04:21 GMT "esst...@juno.com" wrote: :>Hello,. :>I reading about Resource Managers - and its capability to be "dormant". :>I understand if the Resource Manager is "dormant" for four minutes, the system :>will abend the Resource Manager with a 40D Abend. . :>What exactly does it mean when a Resource Manager is "dormant" ? . :>If I have three Started Tasks and they all issue a RESMNGR ADD for the :>same program, when is the Resource Manager considered to be dormant ? :>What eactly needs to occur for the system to deem the Resource Manager to be :>"dormant" ? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X
On Tue, 28 Apr 2020 13:58:06 + Chris Hoelscher wrote: :>examples of an IPCS RUNARRY ??? :>the side of a milk carton? Why would you suggest that RUNARRAY be dropped? Because code can be written to simulate it? :>Thank You, :>Chris Hoelscher :>Lead Database Administrator :>IBM Global Technical Services :>T 502.476.2538 or 502.407.7266 :> :>-Original Message- :>From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen :>Sent: Sunday, April 26, 2020 9:59 AM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: [External] [IBM-MAIN] Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :> :>[External Email: Use caution with links and attachments] :> :> :>I would like to see an examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X. :> :>So far I have not been able to make it work. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X
As an exercise, I invoked a REXX out of the EXEC(()) which did an EVALSYM on X. The (unexpected and counter-intuitive) results were that ADDRESS was the same for every entry (the address of the first entry). The only thing that changed was ENTRY. I had to write a REXX to do the simple LIST command that I wished - EVALSYM and then (address+entry*length) Another issue is that the LIST command from the REXX (with an explicit calculated address) somehow inherited the ARRAY attribute and displayed much more storage than the specified LENGTH. I had to explicitly specify MULT(1) to get the results I expected^W wanted. On Mon, 27 Apr 2020 17:18:00 + Seymour J Metz wrote: :>I don't have access to a live system, so I have to rely on the documentation, which sometimes omits critical information. One thought is to package the IPCS command in a REXX, possibly preceded by an EQ, and to use that member name in the RUNARRAY subcommand. :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Monday, April 27, 2020 9:38 AM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :> :>Unrelated. :> :>Can you provide a working example? :> :>On Sun, 26 Apr 2020 21:19:12 + Seymour J Metz wrote: :> :>:>Is it failing even when everything is in the same address space? :> :>:>Shmuel (Seymour J.) Metz :>:>http://mason.gmu.edu/~smetz3 :> :>:>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>:>Sent: Sunday, April 26, 2020 9:59 AM :>:>To: IBM-MAIN@LISTSERV.UA.EDU :>:>Subject: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :>:> :>:>I would like to see an examples of an IPCS RUNARRAY command where the EXEC :>:>clause display storage using a pointer as a displacement off of X. :>:> :>:>So far I have not been able to make it work. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X
Unrelated. Can you provide a working example? On Sun, 26 Apr 2020 21:19:12 + Seymour J Metz wrote: :>Is it failing even when everything is in the same address space? :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Sunday, April 26, 2020 9:59 AM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X :> :>I would like to see an examples of an IPCS RUNARRAY command where the EXEC :>clause display storage using a pointer as a displacement off of X. :> :>So far I have not been able to make it work. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X
I would like to see an examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X. So far I have not been able to make it work. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPCS - RUNARRAY EXEC problem
The automatic LIST X is working, thus the command is valid. The EXEC is not working properly. On Tue, 21 Apr 2020 20:39:03 + Seymour J Metz wrote: :>Did you run it without the ADDRESS keyword? :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Tuesday, April 21, 2020 3:32 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Re: IPCS - RUNARRAY EXEC problem :> :>Typo when I copied it. :> :>The command is as you wrote and the result is as below. :> :>On Tue, 21 Apr 2020 19:07:48 + Seymour J Metz wrote: :> :>:>What is Xx? :>:> :>:>What output do you get from :>:> :>:>RUNARRAY name EXEC((LIST X+8?+114 MULT(1) LENGTH(8))) :>:> :>:> :>:>-- :>:>Shmuel (Seymour J.) Metz :>:>http://mason.gmu.edu/~smetz3 :>:> :>:>____ :>:>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>:>Sent: Tuesday, April 21, 2020 2:35 PM :>:>To: IBM-MAIN@LISTSERV.UA.EDU :>:>Subject: IPCS - RUNARRAY EXEC problem :>:> :>:>Array define via :>:> :>:>EQ name X LENGTH(16) ENTRIES(1:20) :>:> :>:>Issuing :>:> :>:>RUNARRAY ADDR(name) EXEC((LIST Xx+8?+114 MULT(1) LENGTH(8))) :>:> :>:>The LIST command constantly displays the data from the first entry. :>:> :>:>Without the MULT operand it would display much more storage. :>:> :>:>The only example available is from RUNCHAIN in where the value of X is as :>:>expected. :>:> :>:>What am I doing wrong> -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPCS - RUNARRAY EXEC problem
Typo when I copied it. The command is as you wrote and the result is as below. On Tue, 21 Apr 2020 19:07:48 + Seymour J Metz wrote: :>What is Xx? :> :>What output do you get from :> :>RUNARRAY name EXEC((LIST X+8?+114 MULT(1) LENGTH(8))) :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Tuesday, April 21, 2020 2:35 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: IPCS - RUNARRAY EXEC problem :> :>Array define via :> :>EQ name X LENGTH(16) ENTRIES(1:20) :> :>Issuing :> :>RUNARRAY ADDR(name) EXEC((LIST Xx+8?+114 MULT(1) LENGTH(8))) :> :>The LIST command constantly displays the data from the first entry. :> :>Without the MULT operand it would display much more storage. :> :>The only example available is from RUNCHAIN in where the value of X is as :>expected. :> :>What am I doing wrong> -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IPCS - RUNARRAY EXEC problem
Array define via EQ name X LENGTH(16) ENTRIES(1:20) Issuing RUNARRAY ADDR(name) EXEC((LIST Xx+8?+114 MULT(1) LENGTH(8))) The LIST command constantly displays the data from the first entry. Without the MULT operand it would display much more storage. The only example available is from RUNCHAIN in where the value of X is as expected. What am I doing wrong> -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPCS LIST command to display storage when pointer is in a different address space
Yes, it can be done via code/clist/rexx. My query was whether it can be done directly. "Is there an IPCS command to list storage when the pointer is in a different address space, or does this require an IPCS clist?" Appreciate your effort. On Tue, 21 Apr 2020 09:09:03 + Seymour J Metz wrote: :>Can't you do it incorrectly via an intermediate EQUATE or EVALUATE subcommand? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPCS LIST command to display storage when pointer is in a different address space
Full dump, including both address spaces. I can type the address directly and display it. I cannot seem to follow the pointer to another address space. On Mon, 20 Apr 2020 20:45:11 + Seymour J Metz wrote: :>What are X and n? Are you working with a full dump of Z or a oartial dump. The message indicates that the pointer is not within the dump. :> :>It might be helpful to show how you got the pointer, especially if you're relying on storage that could have been freed before the dump or that was excluded from the dump. :> :> :>-- :>Shmuel (Seymour J.) Metz :>http://mason.gmu.edu/~smetz3 :> :> :>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Binyamin Dissen [bdis...@dissensoftware.com] :>Sent: Monday, April 20, 2020 4:25 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: Re: IPCS LIST command to display storage when pointer is in a different address space :> :>Well, I get :> :>BLS18075I Indirect address could not be resolved :> :>Not sure what I am doing wrong. :> :>Current AS = Z. X is within Z. :> :>List X+n? asid(Y) length(128) :> :> :> :>On Sun, 19 Apr 2020 21:35:21 + "Christopher Y. Blaicher" :> wrote: :> :>:>That is basically the right syntax. IPCS L address LEN(length) ASID(X'') :>:> :>:>Chris Blaicher :>:>Technical Architect :>:>Syncsort, Inc. :>:> :>:>-Original Message- :>:>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Binyamin Dissen :>:>Sent: Sunday, April 19, 2020 5:14 PM :>:>To: IBM-MAIN@LISTSERV.UA.EDU :>:>Subject: IPCS LIST command to display storage when pointer is in a different address space :>:> :>:>[ External - This message originated Externally. Use proper judgement and caution with attachments, links, or responses. ] :>:> :>:>Is there an IPCS command to list storage when the pointer is in a different address space, or does this require an IPCS clist? :>:> :>:>I would like to :>:> :>:> LIST X+n? ASID(Y) :>:> :>:>where X is in address space Z. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IPCS LIST command to display storage when pointer is in a different address space
Well, I get BLS18075I Indirect address could not be resolved Not sure what I am doing wrong. Current AS = Z. X is within Z. List X+n? asid(Y) length(128) On Sun, 19 Apr 2020 21:35:21 + "Christopher Y. Blaicher" wrote: :>That is basically the right syntax. IPCS L address LEN(length) ASID(X'') :> :>Chris Blaicher :>Technical Architect :>Syncsort, Inc. :> :>-Original Message- :>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Binyamin Dissen :>Sent: Sunday, April 19, 2020 5:14 PM :>To: IBM-MAIN@LISTSERV.UA.EDU :>Subject: IPCS LIST command to display storage when pointer is in a different address space :> :>[ External - This message originated Externally. Use proper judgement and caution with attachments, links, or responses. ] :> :>Is there an IPCS command to list storage when the pointer is in a different address space, or does this require an IPCS clist? :> :>I would like to :> :> LIST X+n? ASID(Y) :> :>where X is in address space Z. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IPCS LIST command to display storage when pointer is in a different address space
Is there an IPCS command to list storage when the pointer is in a different address space, or does this require an IPCS clist? I would like to LIST X+n? ASID(Y) where X is in address space Z. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Linkage editor question: renaming duplicate entry points
Look at the binder CHANGE directive On Wed, 15 Apr 2020 15:43:49 -0400 Phil Smith III wrote: :>I have a use case that's reasonable enough that it might be supported, yet odd enough that I'd be unsurprised if it isn't. :> :> :> :>Suppose we have a function called AX that we call. At times it would be useful to be able to relink a program that calls AX to add a "shim"-let's call it AXPRIME-between the program and AX. Yet we don't want to change that program code, just relink it (or point at a different library and make a dynamic call to AX). :> :> :> :>Ideally, we could tell the linker "OK, load deck AXPRIME [which has entry point AX defined]; now include deck AX but rename entry point AX in that deck to AXMINUS". And the AXPRIME code would call AXMINUS to do what AX usually does. :> :> :> :>The alternative-hacking AX itself-is of course possible but undesirable, because we don't want the shim functionality to be there all the time, as it represents a security hole. The shim is added explicitly when needed, so it's a "your gun, your foot" deal. :> :> :> :>Anyone know whether this is possible with IEWL or anything else? :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ESPIE question (does ESPIE "cover" ATTACH'd sub-tasks)
Interesting numbers. But I looked at the current doc and it still appears to be problem state only. Also, do you numbers include setup or just program check handling? I figured FRRs would be a lot better than ESTAE(X). On Thu, 2 Apr 2020 19:28:13 -0500 Jim Mulder wrote: :> These are my results from a benchmark I did 4 years ago: :> :>Testcases which loop recovering/retrying from an :>operation exception. :>Using default system trace size - 1MB per CPU, with :>20 CPUs, so 20MB of data to snap) :>z13 machine :> :>RecoveryIterations CPU seconds Ratio :>-- --- - :>ESPIE x'20' 3.531.0 :>FRR x'20' 45.66 12.9 :>ESTAEX (no SNAPTRC) x' 2' 98.95 28.0 :>ESTAEX (SNAPTRC)x' 1000'102.83 14,914.7 :> :> :>Jim Mulder z/OS Diagnosis, Design, Development, Test IBM Corp. :>Poughkeepsie NY :>(845) 435-4741 :>D10JHM1@PLPSC (MVS) JMULDER@S390VM (VM) :> :>> From: "Lennie Dymoke-Bradshaw" :>> To: IBM-MAIN@LISTSERV.UA.EDU :>> Date: 04/02/2020 08:13 PM :>> Subject: Re: ESPIE question (does ESPIE "cover" ATTACH'd sub-tasks) :>> Sent by: "IBM Mainframe Discussion List" :>> :>> I think the reason that handling interrupts in ESPIE is faster than :>> ESTAE is simply that ESPIE sets an exit to the FLIH, whereas ESTAE :>> sets an exit to the SLIH. :>> :>> Lennie Dymoke-Bradshaw | Security Lead | RSM Partners Ltd :>> Web: www.rsmpartners.com :>> Dance like no one is watching. Encrypt like everyone is. :>> :>> -Original Message- :>> From: IBM Mainframe Discussion List On :>> Behalf Of Charles Mills :>> Sent: 02 April 2020 20:59 :>> To: IBM-MAIN@LISTSERV.UA.EDU :>> Subject: Re: [IBM-MAIN] ESPIE question (does ESPIE "cover" ATTACH'd :>sub-tasks) :>> :>> As Peter seems to imply, ESPIE interrupts are apparently noticeably :>> lower overhead than ESTAE interrupts. If data or addressing :>> exceptions were expected I definitely *would* use ESPIE. I would :>> save ESTAE for unexpected (well, expected unexpected) conditions. My :>> opinion: no benchmarks, no source code. :>> :>> Charles :> :> :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ESPIE question (does ESPIE "cover" ATTACH'd sub-tasks)
On Thu, 2 Apr 2020 17:28:05 -0400 Mike Shaw wrote: :>On 4/2/2020 1:56 PM, Gord Tomlin wrote: :> :>> An irreverent take would be that they enjoy obfuscating abends by :>> transforming program checks into U4xxx abends. :> :>Good one Gord. I always wondered why LE did that. It makes_no_sense to me. Much worse when they attempt to percolate via ABEND X'0C?',DUMP,,,SYSTEM and it takes a while until I see that it is a fake abend. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ESPIE question (does ESPIE "cover" ATTACH'd sub-tasks)
What advantage do you see in an ESPIE over an ESTAE? IIRC, there are quite a few conditions where it doesn't get control. And no clean way to percolate. On Tue, 31 Mar 2020 18:21:46 -0400 Thomas David Rivers wrote: :>I'm sure many on this list will know the answer to this, :>and I've been reading various manuals trying to find it... :> :>But - if a primary task issues an ESPIE SET to establish :>a ESPIE exit on a particular event, does that ESPIE exit :>get control if an ATTACH'd sub-task triggers the event? :> :>In my casual testing it didn't seem to (the attached sub-tasks :>were actually BPX pthread_create'd tasks, if that matters.) :> :>That is - if my initial task issues an ESPIE, does that ESPIE :>"cover" my sub-tasks as well, or would each sub-task need :>its own ESPIE. :> :>What seems to be happening is that some bad memory is :>referenced in my sub-task, but my ESPIE exit (in the parent :>task) is not being driven... :> :> - Thanks - :>- Dave Rivers - -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Upwards Compatibility of Code in Z series Boxes
Problem state instructions - pretty much the same (as long as your continue running amode 24). Supervisor state - differences exist. On Sun, 29 Mar 2020 17:40:07 -0500 Grant Steele wrote: :>Impressed with the depth on this list from the contributors. I am getting back into the z-series software and application development after years of being in another domain. :>Here is a very broad question: when you guys/girls are moving your app portfolio from one hardware platform to another (say, z14 to z15), to what extend are the apps compatible with the new platform without recompilation? -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problems with ESTAEX invoked in AMODE 64 when assembled without SYSTATE AMODE=64
:> :>This is the ASM source: :> :> LGR 4,13 :> LGR 13,5 :> LG 6,=AD(ESTAE_EXIT) :> XGR 1,1 clear upper bits of R1 ESTAEX needs it :> ESTAEX (6),PARAM=(2),MF=(E,(3)) :> LGR 13,4 :> :>R5 points to a temp DSA space for the ESTAEX macro (to avoid possible :>overwrites) :>and R2 contains the parm to be placed in SDWAPARM. :> :>So - it _appears_ (but - I might be reading this wrong) that the PSW address :>is pointing at the instruction just following the PC for the ESTAEX :>(which makes sense) :>but it kinda looks like we are not quite right somehow? :> :>Or - maybe it's just how the SYSUDUMP formatted the PSW at the top - and I :>just might be really confused - because it looks like a 31-bit PSW but :>is in AMODE 64? :> :>If one of those values is incorrect though (like, say, R2) would that :>cause the ESTAEX :>to blow-up with an 0C2 ? :> :> :> - Thanks! - :> - Dave Rivers - -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problems with ESTAEX invoked in AMODE 64 when assembled without SYSTATE AMODE=64
On Tue, 24 Mar 2020 16:47:18 -0700 Ed Jaffe wrote: :>On 3/24/2020 2:02 PM, Binyamin Dissen wrote: :>> PC invoked? - pretty much anything. It really annoyed me that IBM trumpeted :>> support for 64 bit callers for many services when the hardware did all the :>> work. :>Not true. In order for a service to officially support 64-bit callers, :>IBM must assign people to write test plans and validate every possible :>scenario. At a minimum, the macros and/or the code behind them must :>ensure garbage high-halves are not passed back in return registers. My PC routines supported 64 bit callers on day 1. :>Plus, most 64-bit callers expect to be able to pass parameters from :>their working storage areas (i.e., above the "bar"). Unchanged PCs hat :>are simply validated and nothing more will require special handling by :>64-bit callers to ensure all parameters reside in 31-bit storage. That's :>lame support at best. Full support implies new parameter lists that :>allow 8-byte pointers and such. My comment was that many of the 64bit supported routines did not support 64 bit plists and thus -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problems with ESTAEX invoked in AMODE 64 when assembled without SYSTATE AMODE=64
On Tue, 24 Mar 2020 11:17:36 -0500 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Mon, 23 Mar 2020 05:15:15 -0400, Thomas David Rivers wrote: :>>I think I've run into an interesting problem with ESTAEX :>>when it is invoked in AMODE 64 without SYSTATE AMODE=64 :>>set at assembly time. :>What services, IBM or ISV, nowadays can *not* be invoked: :>o In AMODE 64? PC invoked? - pretty much anything. It really annoyed me that IBM trumpeted support for 64 bit callers for many services when the hardware did all the work. :>o With parameters above-the-bar? That was the issue. :>o Called from an address above-the-bar? Should not be an issue for PC invoked. :>I.e. when can programmers forget about 31 and 24? Never. :>And there's a residue of data with 31-bit (24?) pointers. Yep. Downward compatibility and all that. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problems with ESTAEX invoked in AMODE 64 when assembled without SYSTATE AMODE=64
I would question this. Why not post the section from the system trace table showing this? On Mon, 23 Mar 2020 05:15:15 -0400 Thomas David Rivers wrote: :>I think I've run into an interesting problem with ESTAEX :>when it is invoked in AMODE 64 without SYSTATE AMODE=64 :>set at assembly time. :> :>That is, this is code that could potentially run in either AMODE 31 :>or AMODE 64... so it's not assembled with SYSTATE AMODE=64. :> :>What it _looks_ like from the dump is that ESTAEX is invoked :>(via PC - this is just problem state) and on return, the address :>in the PSW has the AMODE bit set - but we are in AMODE 64, :>so now my PSW address is pointing to the wrong place. :> :>Of course - this doesn't work well when AMODE=64 and my :>program gets lost. :> :>This didn't seem to happen with zOS 2.3 - we've recently upgrade :>to zOS 2.4. :> :>Anyone seen anything like that for newer zOS? :> :>I _suppose_ I could always drop to AMODE 31 for invoking ESTAEX, :>but then my ESTAE exit would be in AMODE 31, and I'd prefer for it :>to be in the AMODE at the time ESTAEX is called... :> :>This "feels" unlikely - as the PC is hopefully just going to stack the :>current PSW address for its return... and I'd be very surprised :>of something changed that... but - I thought I would just toss :>that out to see if anyone has an idea. :> :> - Thanks - :>- Dave R. - -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DSPSERV CREATE, is ORIGIN parm a relic?
On Fri, 6 Mar 2020 16:01:41 -0600 Michael Hochee wrote: :>Ideally, I would like to create all future data spaces with a size of 2GB, rather than 2GB OR 2GB-4K (when the returned ORIGIN value is NZ). I looked at assembler service reference manuals as far back as 1999, and they all state that a non-zero origin value (4K) is based on a processor dependency. I eventually found a vintage IBM-Amdahl presentation (1989) indicating the dependency is due to low-address protection being in effect when the PSF (Private-Space Facility) is not active. :>My question is... Is this still relevant 30 years later? Do any G10 or above customers run configurations where PSF is inactive? If you are already changing the code, why not change it to use 64 bit memory objects. That way you can get the exact size. -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: JCL error during TSO/E logon
Back in Ye Olde Days I had such a problem (very annoying when users would call the support desk about these things). We had a modified IKJEFLD that allowed overrides of PROCs and accounts without requiring UADS entries. What I did would call the accounting system to verify that the account was valid and I added 2 libraries to MSTJCL00, the user proclibs and the SP proclibs and verified that the override was in the proclib. This had the advantage that users could create their procs for their applications but not be able to use them for TSO. They would get messages such as "not authorized to such an account" or "proc not known" and would be able to reenter. I also added code to allow the user to permanently update these as well as the password from the logon prompt. On Thu, 5 Mar 2020 23:08:32 + Jesse 1 Robinson wrote: :>From the dawn of time, it was deucedly difficult to find the cause of a JCL error during TSO logon. Then several releases ago, we were treated to a 'fix'. The error would be displayed on the user's screen, allowing the problem to be corrected within seconds. Yesterday we had such a situation, but any helpful message flashed on the screen for milliseconds and then disappeared. In this case it turned out to be missing logon proc. :>I hunted in vain for doc on this problem, including maybe a need to set a parm somewhere. We run TPX, which it just now occurs to me might be the problem... -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: load modules
One would hope that testing would be via STEPLIB. On Thu, 5 Mar 2020 14:39:31 -0500 Charles Mills wrote: :>Sometimes you make a code change, and the problem is no better, so you wonder "did I screw up the code change or am I still running the old code?" CharlesSent from a mobile; please excuse the brevity. :> Original message ----From: Binyamin Dissen Date: 3/5/20 11:07 AM (GMT-05:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: load modules On Thu, 5 Mar 2020 13:20:38 + "Nai, Dean" wrote::> Anyone know a way to see if a linklst load mode is being used? We made a userexit change and I wanted to see if it was using the new load module and not the old one?thanksDon't understand why the userexit is relevant. Assuming you changed the loadmodule, it should be doing something different. Just run your test case (youDO have a test case, don't you?)--Binyamin Dissen http://www.dissensoftware.comDirector, Dissen Software, Bar & Grill - IsraelShould you use the mailblocks package and expect a response from me,you should preauthorize the dissensoftware.com domain.I very rarely bother responding to challenge/response systems,especially those from irresponsible :>companies.--For IBM-MAIN subscribe / signoff / archive access instructions,send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN :> :>-- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: load modules
On Thu, 5 Mar 2020 13:20:38 + "Nai, Dean" wrote: :> Anyone know a way to see if a linklst load mode is being used? We made a userexit change and I wanted to see if it was using the new load module and not the old one thanks Don't understand why the userexit is relevant. Assuming you changed the load module, it should be doing something different. Just run your test case (you DO have a test case, don't you?) -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Two related alias entry address questions
On Tue, 3 Mar 2020 11:35:02 -0800 Charles Mills wrote: :>1. Is there a way to display the entry point address of a load module member :>of a PDS? ISPF 3.1 shows Size, TTR, AM, RM, etc. but not the entry address. :>The member in question is actually an alias FWIW. Use the binder API. For PDS, it is in the userdata of the ALIAS directory entry. Not sure how it works for PDSE. :>2. The reason I ask is that I am trying to track down the following problem. :>Perhaps someone knows the answer. I have a PDSE program object FOO with an :>alias of BAR. BAR's entrypoint is *not* at offset 0 into the load module. I :>copy the program object and alias to a PDS load module Probably the step that is failing. How are you doing this copy? :> and then TSO XMIT it. :>I FTP the XMIT file to another LPAR. I TSO RECEIVE the XMIT file into a :>dataset. When I LOAD BAR I see the wrong entrypoint, an entrypoint of 0. :>Does anyone know what I have to do to preserve the entrypoint? (I ask :>question 1 because I am guessing at the problem, and do not know at which :>stage of the process the entry offset got lost.) -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
