¿ªÔÆÌåÓý

ctrl + shift + ? for shortcuts
© 2025 Groups.io

Re: casic question

 

Short back ground - very :)


MVS like all multi-user O/S's require a user to log in to it using their user name and password.

In the case of MVS it has more than one mechanism that handles this where the first is needed and others subject to MVS system set up:

TSO:?? requires your user ID (up to 8 Chars) and Password (again up to 8 Chars)? - For later versions of the OS these can be longer angain subject to set up.

RAKF (RACF) Requires that any job submitted must have a USER and PASSWORD keywords included.
??? This is because you could run a JCL script etc from another users PDS or a system wide one

Now if you have set up RAKF correctly the you do NOT bother adding the extra keywords USER and PASSWORD as these are supplied by the system during the submission processes i.e., via an TSO EDIT step etc with a SUB(MIT) as against just sending the JCL job via any other method including stored as a PDS member.


Just remember this for any given task there is always six or more ways of doing the same task under a mainframe O/S.


Vincent

Very retired computer person IBM, ICL, multiple mini and micro's included.

On 05/11/2020 13:46, carlos feldman wrote:

thanks for your help.

This worked for me:

//IEBGENE3 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A,
//? ? ? ? ?USER=HERC03,PASSWORD=PASS4U
//IEBGENE3 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.IN.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

Only issue is that the Dataset ended in SYSDA instead of PUB010, but I can manage to copy the dataset.

If I didn't define USER and PASSWORD, the dataset wasn't created;

1 //IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A JOB 53
2 //IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
3 //SYSIN DD DUMMY
4 //SYSPRINT DD SYSOUT=*
5 //SYSUT1 DD *
6 //SYSUT2 DD DSN=HERC03.IN.TXT,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//
IEF197I SYSTEM ERROR DURING ALLOCATION
IEF272I IEBGENE2 IEBGENE2 - STEP WAS NOT EXECUTED.
IEF285I JES2.JOB00053.SO0102 SYSOUT
IEF285I JES2.JOB00053.SI0101 SYSIN
IEF285I SYS1.UCAT.TSO KEPT
IEF285I VOL SER NOS= PUB000.

Thanks again


Re: casic question

 

thanks for your help.

This worked for me:

//IEBGENE3 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A,
//? ? ? ? ?USER=HERC03,PASSWORD=PASS4U
//IEBGENE3 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.IN.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

?

Only issue is that the Dataset ended in SYSDA instead of PUB010, but I can manage to copy the dataset.

If I didn't define USER and PASSWORD, the dataset wasn't created;

1 //IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A JOB 53
2 //IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
3 //SYSIN DD DUMMY
4 //SYSPRINT DD SYSOUT=*
5 //SYSUT1 DD *
6 //SYSUT2 DD DSN=HERC03.IN.TXT,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//
IEF197I SYSTEM ERROR DURING ALLOCATION
IEF272I IEBGENE2 IEBGENE2 - STEP WAS NOT EXECUTED.
IEF285I JES2.JOB00053.SO0102 SYSOUT
IEF285I JES2.JOB00053.SI0101 SYSIN
IEF285I SYS1.UCAT.TSO KEPT
IEF285I VOL SER NOS= PUB000.

?

Thanks again

Carlos

?

?


Re: casic question

 

Carlos,

When replying, please make sure to include what you are replying to...

Joe

On Thu, Nov 5, 2020 at 7:38 AM carlos feldman <carlfelster@...> wrote:
how could I do that ? Remember I'm a beginner here


Re: casic question

 

how could I do that ? Remember I'm a beginner here


Re: casic question

 

¿ªÔÆÌåÓý

You can GET a permission? in RACF..... ?

?

The HLQ ??HERC03 , isn?t defined .

?

°¿¸é¡­.

?

Before your execution change the HLQ to your? USERID

?

-----------------------------------

Marco Antonio Ferreira

Proteus Information Security Services

Mainframe Security Consultant

(:+55 11 98362-2153 ?

marco.silva@...

?

¡°Esta mensagem ¨¦ destinada exclusivamente para a(s) pessoa(s) a quem ¨¦ dirigida, podendo conter informa??o confidencial e legalmente protegida. Se voc¨º n?o for destinat¨¢rio desta mensagem, desde j¨¢ fica notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de qualquer forma, utilizar a informa??o contida nesta mensagem. Caso voc¨º tenha recebido esta mensagem por engano, pedimos por favor que responda esse e-mail informando o acontecido e posteriormente, apague-a.¡±

¡°This message is intended only for the person to whom it is addressed and may contain confidential and legally protected information. If you are not the addressee of this message, from now on you are already notified to abstain to disclose, copy, distribute, examine or, in any way, use the information contained in this message. If you have received this message in error, please answer this e-mail stating what happened and subsequently delete it.¡±

?


?

From: [email protected] <[email protected]> On Behalf Of carlos feldman via groups.io
Sent: quarta-feira, 4 de novembro de 2020 16:30
To: [email protected]
Subject: [H390-MVS] casic question

?

Hi Everyone !

I'm starting to learn about MVS, so I try to import data into MVS, to use as input for some tests, with ISAM and VSAM.

Since it's about 30.000 registers, IND$FILE and FTP fail, so I'll try to read it with a virtual tape.

To read my data I know I need a JCl to copy my dataset, from tape to disk.

So I wrote this JCL, to read a small script, from the card reader, into the disk.

Thing is RAKF, does not allow me to write on disk from card reader jobs. ( But it works OK, from a bach inside my MVS USER)

The messages are as follows:

RAKF0005 INVALID ATTEMPT TO ACCESS RESOURCE

RAKF000A PROD ,IEBGENER,DATASET ,HERC03.INPUT.TXT

IEC150I 913-38,IFG0194C,IEBGENER,IEBGENER,SYSUT2,241,PUB010,

IEC150I HERC03.INPUT.TXT

IEF472I IEBGENER IEBGENER - COMPLETION CODE - SYSTEM=913 USER=0000

The script is:

//IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A
//IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=3350,VOL=SER=PUB010,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

?

Can someone give me a clue on how to proceed ?

Thanks in advance

Carlos


Re: Tur(n)key TK4- clock 1 hour fast-bug?

 

D'oh!?

I had a quick look through PARMLIB, but I missed (PARMTZ). It was set E one hour of GMT, which would match if Volker Bandke set it for Germany, I guess.

Fixed in parmlib, TZOFFSET put back to 0

Thank you :-)

Roops


On Thu., Nov. 5, 2020, 00:05 Kevin Monceaux, <Kevin@...> wrote:
On Wed, Nov 04, 2020 at 11:45:47PM +0000, Rupert Reynolds wrote:

> I have fixed it by changing to TZOFFSET -0100 in tk4-.cnf but this feels
> like a kludge, as the times should match by default.

That always felt like a kludge to me also.? I prefer to keep time zone
adjustments out of my Hercules configuration files and adjust the time zone
in SYS1.PARMLIB(PARMTZ) instead.

> Is it a DST error, perhaps?

No, MVS 3.8J doesn't automatically adjust for daylight saving time.? Its
time zone setting needs to be adjusted when we spring forward or fall back.



--

Kevin



Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.






Re: Tur(n)key TK4- clock 1 hour fast-bug?

 

On Wed, Nov 04, 2020 at 11:45:47PM +0000, Rupert Reynolds wrote:

I have fixed it by changing to TZOFFSET -0100 in tk4-.cnf but this feels
like a kludge, as the times should match by default.
That always felt like a kludge to me also. I prefer to keep time zone
adjustments out of my Hercules configuration files and adjust the time zone
in SYS1.PARMLIB(PARMTZ) instead.

Is it a DST error, perhaps?
No, MVS 3.8J doesn't automatically adjust for daylight saving time. Its
time zone setting needs to be adjusted when we spring forward or fall back.



--

Kevin



Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.


Tur(n)key TK4- clock 1 hour fast-bug?

 

I was just wondering whether anyone hs found the cause of this, and whether it needs fixing.

Windows host with correct time and date, using timezone UTC+00:00 (London time)

I have fixed it by changing to TZOFFSET -0100 in tk4-.cnf but this feels like a kludge, as the times should match by default.?

Is it a DST error, perhaps?

Roops


Re: casic question

 

//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)

Joe

On Wed, Nov 4, 2020 at 1:49 PM Joe Monk via <joemonk64=[email protected]> wrote:
Change the UNIT= TO SYSDA, delete the VOL=SER=.

Joe

On Wed, Nov 4, 2020 at 1:29 PM carlos feldman <carlfelster@...> wrote:

Hi Everyone !

I'm starting to learn about MVS, so I try to import data into MVS, to use as input for some tests, with ISAM and VSAM.

Since it's about 30.000 registers, IND$FILE and FTP fail, so I'll try to read it with a virtual tape.

To read my data I know I need a JCl to copy my dataset, from tape to disk.

So I wrote this JCL, to read a small script, from the card reader, into the disk.

Thing is RAKF, does not allow me to write on disk from card reader jobs. ( But it works OK, from a bach inside my MVS USER)

The messages are as follows:

RAKF0005 INVALID ATTEMPT TO ACCESS RESOURCE

RAKF000A PROD ,IEBGENER,DATASET ,HERC03.INPUT.TXT

IEC150I 913-38,IFG0194C,IEBGENER,IEBGENER,SYSUT2,241,PUB010,

IEC150I HERC03.INPUT.TXT

IEF472I IEBGENER IEBGENER - COMPLETION CODE - SYSTEM=913 USER=0000

The script is:

//IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A
//IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=3350,VOL=SER=PUB010,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

?

Can someone give me a clue on how to proceed ?

Thanks in advance

Carlos


Re: casic question

 

Change the UNIT= TO SYSDA, delete the VOL=SER=.

Joe

On Wed, Nov 4, 2020 at 1:29 PM carlos feldman <carlfelster@...> wrote:

Hi Everyone !

I'm starting to learn about MVS, so I try to import data into MVS, to use as input for some tests, with ISAM and VSAM.

Since it's about 30.000 registers, IND$FILE and FTP fail, so I'll try to read it with a virtual tape.

To read my data I know I need a JCl to copy my dataset, from tape to disk.

So I wrote this JCL, to read a small script, from the card reader, into the disk.

Thing is RAKF, does not allow me to write on disk from card reader jobs. ( But it works OK, from a bach inside my MVS USER)

The messages are as follows:

RAKF0005 INVALID ATTEMPT TO ACCESS RESOURCE

RAKF000A PROD ,IEBGENER,DATASET ,HERC03.INPUT.TXT

IEC150I 913-38,IFG0194C,IEBGENER,IEBGENER,SYSUT2,241,PUB010,

IEC150I HERC03.INPUT.TXT

IEF472I IEBGENER IEBGENER - COMPLETION CODE - SYSTEM=913 USER=0000

The script is:

//IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A
//IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=3350,VOL=SER=PUB010,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

?

Can someone give me a clue on how to proceed ?

Thanks in advance

Carlos


Re: casic question

 

Add USERID= and PASSWORD= to job card.

On Wed, Nov 4, 2020 at 1:29 PM carlos feldman <carlfelster@...> wrote:

Hi Everyone !

I'm starting to learn about MVS, so I try to import data into MVS, to use as input for some tests, with ISAM and VSAM.

Since it's about 30.000 registers, IND$FILE and FTP fail, so I'll try to read it with a virtual tape.

To read my data I know I need a JCl to copy my dataset, from tape to disk.

So I wrote this JCL, to read a small script, from the card reader, into the disk.

Thing is RAKF, does not allow me to write on disk from card reader jobs. ( But it works OK, from a bach inside my MVS USER)

The messages are as follows:

RAKF0005 INVALID ATTEMPT TO ACCESS RESOURCE

RAKF000A PROD ,IEBGENER,DATASET ,HERC03.INPUT.TXT

IEC150I 913-38,IFG0194C,IEBGENER,IEBGENER,SYSUT2,241,PUB010,

IEC150I HERC03.INPUT.TXT

IEF472I IEBGENER IEBGENER - COMPLETION CODE - SYSTEM=913 USER=0000

The script is:

//IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A
//IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD *
BLA
BLE
--- your ASCII data from the PC file goes here ---
BLI
//SYSUT2 DD DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
// UNIT=3350,VOL=SER=PUB010,SPACE=(TRK,(6,6),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//



Can someone give me a clue on how to proceed ?

Thanks in advance

Carlos

--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?


casic question

 

Hi Everyone !

I'm starting to learn about MVS, so I try to import data into MVS, to use as input for some tests, with ISAM and VSAM.

Since it's about 30.000 registers, IND$FILE and FTP fail, so I'll try to read it with a virtual tape.

To read my data I know I need a JCl to copy my dataset, from tape to disk.

So I wrote this JCL, to read a small script, from the card reader, into the disk.

Thing is RAKF, does not allow me to write on disk from card reader jobs. ( But it works OK, from a bach inside my MVS USER)

The messages are as follows:

RAKF0005 INVALID ATTEMPT TO ACCESS RESOURCE

RAKF000A PROD ,IEBGENER,DATASET ,HERC03.INPUT.TXT

IEC150I 913-38,IFG0194C,IEBGENER,IEBGENER,SYSUT2,241,PUB010,

IEC150I HERC03.INPUT.TXT

IEF472I IEBGENER IEBGENER - COMPLETION CODE - SYSTEM=913 USER=0000

The script is:

//IEBGENE2 JOB 'LOAD TEXT DATA TO MVS',CLASS=A,MSGCLASS=A
//IEBGENE2 EXEC PGM=IEBGENER,REGION=128K
//SYSIN? ? DD? DUMMY
//SYSPRINT DD? SYSOUT=*
//SYSUT1? ?DD? *
BLA
BLE
? --- your ASCII data from the PC file goes here ---
BLI
//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=3350,VOL=SER=PUB010,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//

?

Can someone give me a clue on how to proceed ?

Thanks in advance

Carlos


Re: Fullscreen debugger for MVS 3.8J?

 

¿ªÔÆÌåÓý

On 11/3/20 12:23 AM, Wally Mclaughlin wrote:

When I co-wrote Top Secret Security for MVS in 1981 ...

I still have a Tessie poster in my closet.? :-)

-- 
Drew Derbyshire

"Klaatu barada nikto"               -- "The Day the Earth Stood Still"


Re: Fullscreen debugger for MVS 3.8J?

 

Sorry to delay replying.? Busy week!

Thanks for all the replies.

Harry Mernick was a senior programmer in? an office of (mostly) systems programmers at Nasty Wetmonster in London. He was due to retire in the 1990s.

We also had Steffen Fraas, who was well known in the JES3 world.

I remember hearing of ACE TEST, but I never got to try it.

DDT sounds good. I'll look at it when I've backed up :-)

The alternative is to write my own. But my memory of 3270 datastreams is half gone-it took me an hour or 2 just to clear the screen and get "Hello, world!" in full screen mode :-)

I'll report back if I mske any progress.

Roops

On Tue., Nov. 3, 2020, 20:52 Juergen, <winkelmann@...> wrote:
Hi Roops

The MVSDDT debugger Joe mentioned comes pre-installed and ready to use with TK4-. See TSO HELP member MVSDDT for usage information. It is _the_ best debugger for MVS 3.8 systems I know of.

Cheers
´³¨¹°ù²µ±ð²Ô


Re: Fullscreen debugger for MVS 3.8J?

 

Hi Roops

The MVSDDT debugger Joe mentioned comes pre-installed and ready to use with TK4-. See TSO HELP member MVSDDT for usage information. It is _the_ best debugger for MVS 3.8 systems I know of.

Cheers
´³¨¹°ù²µ±ð²Ô


Re: Fullscreen debugger for MVS 3.8J?

 

Try here:?

Joe

On Tue, Nov 3, 2020 at 12:50 AM Rupert Reynolds <rupertreynolds@...> wrote:
I've used Hercules on and off over the? years, but I've never seen an MVS debugger as good as one I used at Nasty Wetmonster Bank. Written by Harry Mernick.

It was a set of extensions to the TEST command, but we didn't see the TEST prompt. It looked similar to ISPF browsing the assembly listing, but with PSW info and gp registers on show and the next instruction highlighted. Move the cursor and hit a PF key to set a breakpoint, single step on another PF key.

There was even one for authorised code. I guess it ran under the authorised TMP.

Has anyone seen such a thing? It would be dead handy debugging some macros and a compiler I'm porting.

Thanks for any pointers.

Roops


Re: Fullscreen debugger for MVS 3.8J?

 

Hi Folks,

An easy way but not perfect, but it will help you.
Write the SYSUDUMP or SYSABEND to a file and browse the file with RPF.
You can set labels with the LABEL subcommand and find back with the L subcommand.

Press F1 in RPF browse for more information.

Cheers,
Rob


Re: Fullscreen debugger for MVS 3.8J?

 

¿ªÔÆÌåÓý

Roops,

?

When I co-wrote Top Secret Security for MVS in 1981, I wrote an APF-authorized tester nicknamed ACETEST, similar in concept?to TSO Test but much smarter -

?

It can run as an STC, Batch job, TSO command, or best as an ISPF Application.

?

As an ISPF application, it supports full screen viewing of the PSW, registers, and memory,?and?you can edit memory simply by over-typing.

?

You can test both APF-authorized and non-authorized programs.

?

Full breakpoint support is available, and the greatest feature is that you can set a breakpoint, then go into STEP mode, which allows?you to step through code one instruction?at a time. After each instruction is executed the PSW, registers, and relevant storage areas are displayed. To step to the next instruction all you have to do is simply hit enter and the step breakpoint will move automatically to the next instruction to be executed.

?

You can?set breakpoints in code which has been loaded into CSA or SQA. You can even set a global breakpoint in?common code (except real LPA), such that when any program in any address-space hits the breakpoint, Acetest is?automatically invoked, like an intelligent SLIP trap.

?

You can test multiple programs at the same time as each program runs under its own TCB. I used to bring up IMS and CICS under?Acetest all the time. Then I could put breakpoints in Top Secret code, or in CICS code for example. I remember testing CICS MRO, and having 4 CICS regions, each running in its own address space under?Acetest, with breakpoints all over the place...

?

Acetest also has features like?FIND, which will find a data string anywhere in memory, WHERE, which will?tell you where a given address is, as in what offset in what module, or what?subpool.?All of the syntax is simple command based, like LOAD modname1, AT R3%+20, ASCB+40%, etc.

?

I automatically include ACETEST with my ISPF. If you wish I can send both to you.

?

Wally

?

?

?

?

From: [email protected] <[email protected]> On Behalf Of Rupert Reynolds
Sent: Tuesday, November 3, 2020 03:29 AM
To: [email protected]
Subject: [H390-MVS] Fullscreen debugger for MVS 3.8J?

?

I've used Hercules on and off over the? years, but I've never seen an MVS debugger as good as one I used at Nasty Wetmonster Bank. Written by Harry Mernick.

?

It was a set of extensions to the TEST command, but we didn't see the TEST prompt. It looked similar to ISPF browsing the assembly listing, but with PSW info and gp registers on show and the next instruction highlighted. Move the cursor and hit a PF key to set a breakpoint, single step on another PF key.

?

There was even one for authorised code. I guess it ran under the authorised TMP.

?

Has anyone seen such a thing? It would be dead handy debugging some macros and a compiler I'm porting.

?

Thanks for any pointers.

?

Roops


Virus-free.


Re: Fullscreen debugger for MVS 3.8J?

 

¿ªÔÆÌåÓý

Some years ago I talked to Dave Cole at Colesoft Inc. (makers of z/XDC, IMHO the best assembler debugger on the z market) about contributing his old, pre-XA version of XDC to the Hercules/MVS3.8 project and he agreed, but then could not find any source tapes earlier than MVS/XA.? He even asked on the IBM-MAIN list for anyone who might have an old tape of his software that didn¡¯t get thrown out or reused, but no one ever came up with one.

?

He felt that his XA code was too deeply structured and dependent on XA internals for him to try to re-create the pre-XA version from the source tapes that he could find.

?

Can you tell us who Harry Mernick is/was?? A fellow employee at that bank or a software developer working for an ISV or . . . ?

?

I am told that the MVS-DDT debugger available for MVS3.8 works well, but I have not had time to delve into it myself, so I don¡¯t know if it fits your needs.

?

Peter

?

From: [email protected] <[email protected]> On Behalf Of Rupert Reynolds
Sent: Monday, November 2, 2020 8:29 PM
To: [email protected]
Subject: [H390-MVS] Fullscreen debugger for MVS 3.8J?

?

I've used Hercules on and off over the? years, but I've never seen an MVS debugger as good as one I used at Nasty Wetmonster Bank. Written by Harry Mernick.

?

It was a set of extensions to the TEST command, but we didn't see the TEST prompt. It looked similar to ISPF browsing the assembly listing, but with PSW info and gp registers on show and the next instruction highlighted. Move the cursor and hit a PF key to set a breakpoint, single step on another PF key.

?

There was even one for authorised code. I guess it ran under the authorised TMP.

?

Has anyone seen such a thing? It would be dead handy debugging some macros and a compiler I'm porting.

?

Thanks for any pointers.

?

Roops

--_,_._,_


Fullscreen debugger for MVS 3.8J?

 

I've used Hercules on and off over the? years, but I've never seen an MVS debugger as good as one I used at Nasty Wetmonster Bank. Written by Harry Mernick.

It was a set of extensions to the TEST command, but we didn't see the TEST prompt. It looked similar to ISPF browsing the assembly listing, but with PSW info and gp registers on show and the next instruction highlighted. Move the cursor and hit a PF key to set a breakpoint, single step on another PF key.

There was even one for authorised code. I guess it ran under the authorised TMP.

Has anyone seen such a thing? It would be dead handy debugging some macros and a compiler I'm porting.

Thanks for any pointers.

Roops