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.”
?
?
toggle quoted message
Show quoted text
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
|
//SYSUT2? ?DD? DSN=HERC03.INPUT.TXT,DISP=(NEW,CATLG),
//? ? ? ? ? ? ?UNIT=SYSDA,SPACE=(TRK,(6,6),RLSE),
//? ? ? ? ? ? ?DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
Joe
Change the UNIT= TO SYSDA, delete the VOL=SER=.
Joe
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
|
Change the UNIT= TO SYSDA, delete the VOL=SER=.
Joe
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
|
Add USERID= and PASSWORD= to job card.
toggle quoted message
Show quoted text
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?
|
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
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?
toggle quoted message
Show quoted text
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 ? ? ? ?
toggle quoted message
Show quoted text
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.
|
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 ?
toggle quoted message
Show quoted text
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.
|
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
|
I'm trying to add a new database in IMS ver 10.
I've got to the point where a /dis db mike01 shows it up.
But a /dis psb mike01pb is showing :
15.21.30 JOB00052 DFS000I MIKE01PB NOT DEFINED IN IMS IVP1
15.21.30 JOB00052 DFS000I *20307/152130* IVP1
*15.21.30 JOB00052 *05 DFS996I *IMS READY* IVP1
The dataset 'IMS1010.PSBLIB(MIKE01PB)' is there.
Any ideas ?
Mike
|
On 2020-10-26 11:06 PM, carlos feldman wrote: Where can I change the graphical properties ? Er, I don't know - I think I used Host Explorer at one job about 20 years ago, but the memories are dim... Most TN3270 clients have a settings interface where you can change the set up.? Look for terms like the following and change stuff to see if it makes a difference - always remembering the current setting in case it breaks something and you need to put it back the way it was, of course... LPS programmable symbols loadable symbols cell size cell format vector graphics DOSLINK OS2LINK PC-LINK GDDM Cheers, Greg
|
Thanks for your answer greg,
?
I'm not familiar with TSO/ISPF, i'm familiar with vm/CMS and plain and simple IBM360 JCM.
My goal was to start learning TSO/ISPF, but I find this frustrating thing, in the first screen of the first menú.
Where can I change the graphical properties ?
I use the same mode 2 or mode 3 3720 terminal emulator setup, for MUSIC/SP and for VM/CMS.
Regards
Carlos
?
|
On 2020-10-26 12:21 PM, carlos feldman
wrote:
My problem is not
file transfer, it's Rfe starting with some sort of configuration
screen, instead of its menu File transfer, on the other hand is
made in plain TSO environment, not in Rfe. Since seems there's no
manual for Rfe, I don't know what's going on or if there's some
configuration missing?
I'd try changing the graphics configuration of your terminal set up.
If it offers different types of graphics then change it.? You could
also turning it off.
Here's how it's supposed to look (if the paste works):
You could also try the latest RFE version if you're not already on
it.
Release 49.9 is available from
Cheers,
Greg
|
Marco Silva
carlos feldman
Rob Prins