Re: Assembler - Authorized program debug

2021-02-25 Thread Tom Brennan
Is the TSO TESTAUTH command still around? I have to admit I can't remember ever trying it. My debugging method of such code typically consisted of multiple temporary WTO's to let me know where the program was at before it failed, and also display fields or registers I was interested in.

Re: Assembler - Authorized program debug

2021-02-25 Thread Don Poitras
In article <9007603817792033.wa.nitzibmgmx@listserv.ua.edu> you wrote: > On Thu, 25 Feb 2021 23:57:08 -0600, Ravi Gaur wrote: > > >Writing and debugging an assembler code which has MODESET instruction to > >change key and while debugging it via IDF or Debug tool both abend with > >S047(APF)

Re: Assembler - Authorized program debug

2021-02-25 Thread Barbara Nitz
On Thu, 25 Feb 2021 23:57:08 -0600, Ravi Gaur wrote: >Writing and debugging an assembler code which has MODESET instruction to >change key and while debugging it via IDF or Debug tool both abend with >S047(APF) issue. Anyone know a way to debug facility for code without using >IDF/Debug tool?

Assembler - Authorized program debug

2021-02-25 Thread Ravi Gaur
**Positing in Assembler group as well** - However given the activity thought to put it in IBM-Main as well. Writing and debugging an assembler code which has MODESET instruction to change key and while debugging it via IDF or Debug tool both abend with S047(APF) issue. Anyone know a way to

Re: Testing a New Dataset for SMS processing via TSO or ISPF?

2021-02-25 Thread kekronbekron
Believe this can be done via the ACS test in ISMF. - KB ‐‐‐ Original Message ‐‐‐ On Thursday, February 25, 2021 10:21 PM, Lionel B Dyck wrote: > Is there a TSO command, or ISPF command/service, that can be provided a > dataset name and have it return if the dataset is SMS managed or

Re: Colours on screen (mainframe history question)

2021-02-25 Thread Warren Brown
I remember this activity . . .  On Thursday, February 25, 2021, 08:28:06 PM EST, g...@gabegold.com wrote: In 1971, Mitre (DC-area non-profit think tank for government -- had a 2250 connected to OS/360, which included native device support for it. When we installed VM circa 1972, I

Re: Colours on screen (mainframe history question)

2021-02-25 Thread g...@gabegold.com
In 1971, Mitre (DC-area non-profit think tank for government -- had a 2250 connected to OS/360, which included native device support for it. When we installed VM circa 1972, I got to make it work under CMS (component of VM). VERY fortunately someone at University of Grenoble (France) had

Re: Compiling CICS COBOL 6 Programs with No EXEC CICS Commands

2021-02-25 Thread Frank Swarbrick
Are you asking about the calling program or the called program? I think the called program, but not sure. A called program that does not contain any EXEC CICS commands can be compiled with either DYNAM or NODYNAM, in general. If the called program calls another program (the only case where

Re: Sharing data sets VSAM VB

2021-02-25 Thread Jeremy Nicoll
On Thu, 25 Feb 2021, at 21:10, Paul Gilmartin wrote: > On Thu, 25 Feb 2021 14:56:36 +, Jeremy Nicoll wrote: > >... Better, use several trailing steps and conditional jcl ... > > > That's *so* 20th Century. Better, wrap the payload in a Rexx > program that can do a SELECT on the

Compiling CICS COBOL 6 Programs with No EXEC CICS Commands

2021-02-25 Thread esst...@juno.com
Hello, . We are beginning to migrate our CICS V5.4 COBOL programs to COBOL 6. . I need some clarification on compiling CICS COBOL 6 Programs without a Translator. These programs DO NOT contain any EXEC CICS commands and are invoked via a CALL statement and NOT an EXEC CICS LINK. . In this

Re: Sharing data sets VSAM VB

2021-02-25 Thread Paul Gilmartin
On Thu, 25 Feb 2021 14:56:36 +, Jeremy Nicoll wrote: > >> signal on NOVALUE >> do CheckRC = 1 >> Address TSO “LISTBC” >> If rc == 0 then Address tso “submit *” >>Else address SYSCALL sleep 10 >> End CheckRC >> Oops! I left an endless loop. I leave the termination

Re: Testing a New Dataset for SMS processing via TSO or ISPF?

2021-02-25 Thread Massimo Biancucci
Lionel, it seems you're looking for something that calls SMS and asks for future allocation. There's a request in ISMF panel 7 (Automatic Class Selection) and 4 Test that simulate the allocation and gives back the response. I don't know (I suppose yes) if it's possible to call the service from a

Testing a New Dataset for SMS processing via TSO or ISPF?

2021-02-25 Thread Lionel B Dyck
Is there a TSO command, or ISPF command/service, that can be provided a dataset name and have it return if the dataset is SMS managed or not? I know LISTDSI will do this for existing datasets but I'm looking for how to do this for a new dataset that has not been allocated yet. Thanks

Re: Sharing data sets VSAM VB

2021-02-25 Thread Jeremy Nicoll
On Thu, 25 Feb 2021, at 14:34, Paul Gilmartin wrote: > On Thu, 25 Feb 2021 09:02:38 -0500, Joseph Reichman wrote: > signal on NOVALUE > do CheckRC = 1 > Address TSO “LISTBC” > If rc == 0 then Address tso “submit *” >Else address SYSCALL sleep 10 > End CheckRC > > Have

Re: [External] Re: NO MAIL

2021-02-25 Thread Pommier, Rex
Call me snarky then, because I purposely left the multiple iterations of the instructions when I responded. Rex -Original Message- From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin Sent: Thursday, February 25, 2021 8:41 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [External]

Re: NO MAIL

2021-02-25 Thread Paul Gilmartin
On Wed, 24 Feb 2021 22:26:53 +, Gibney, Dave wrote: >Should be three instances of the instructions ... > Why not prune them? One is enough; three times is Snarky! -- gil -- For IBM-MAIN subscribe / signoff / archive access

Re: Sharing data sets VSAM VB

2021-02-25 Thread Joseph Reichman
Thank you so much > On Feb 25, 2021, at 9:34 AM, Paul Gilmartin > <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > On Thu, 25 Feb 2021 09:02:38 -0500, Joseph Reichman wrote: > >> I am running all of this from Rex building JCL searching files there are a >> huge number of files

Re: Sharing data sets VSAM VB

2021-02-25 Thread Paul Gilmartin
On Thu, 25 Feb 2021 09:02:38 -0500, Joseph Reichman wrote: >I am running all of this from Rex building JCL searching files there are a >huge number of files so I break them up into different jobs > >What I am going to try is do >Checkrc: >Address TSO “LISTBC” > >If rc == 0 then go >

Re: Sharing data sets VSAM VB

2021-02-25 Thread Joseph Reichman
Work for the IRS don’t know if it’s available Will try to find out > On Feb 25, 2021, at 9:12 AM, David Spiegel wrote: > > Hi Joseph, > You could also interrogate the job (provided that your employer has an SDSF > licence) via the SDSF API. > > Regards, > David > >> On 2021-02-25 09:02,

Re: Sharing data sets VSAM VB

2021-02-25 Thread David Spiegel
Hi Joseph, You could also interrogate the job (provided that your employer has an SDSF licence) via the SDSF API. Regards, David On 2021-02-25 09:02, Joseph Reichman wrote: I am running all of this from Rex building JCL searching files there are a huge number of files so I break them up

Re: Sharing data sets VSAM VB

2021-02-25 Thread Joseph Reichman
I am running all of this from Rex building JCL searching files there are a huge number of files so I break them up into different jobs What I am going to try is do Checkrc: Address TSO “LISTBC” If rc == 0 then go Address tso “submit *” Else Sleep(10) Goto checkrc End

Re: Sharing data sets VSAM VB

2021-02-25 Thread Paul Gilmartin
On Wed, 24 Feb 2021 21:48:54 -0600, Joel C. Ewing wrote: > >.., most job schedulers have ways to inhibit conflicting jobs from >running in parallel, like defining a single resource required ... > A scheduler seems overkill. DISP=MOD should suffice. -- gil