¿ªÔÆÌåÓý

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

Re: Looking for a dataset

 

>> Where can I find the TCPIP readme document?



---
¦Ó¦Ò³¾

On Friday, 23 February 2024 at 10:05, Rob Prins <prin0096@...> wrote:

That dataset was mentioned in the TCPIP readme, but never made it into the TK4-
distribution. I asked about it over on the Turnkey-MVS list a while ago and
Shelby provided it:
Hi,
Where can I find the TCPIP readme document?

Cheers,
Rob


Re: Looking for a dataset

 

That dataset was mentioned in the TCPIP readme, but never made it into the TK4-
distribution. I asked about it over on the Turnkey-MVS list a while ago and
Shelby provided it:
Hi,
Where can I find the TCPIP readme document?

Cheers,
Rob


Re: Looking for a dataset

 

Thank you Sir. It is appreciated.

-----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Matthew Wilson
Sent: Thursday, February 22, 2024 1:31 PM
To: [email protected]
Subject: Re: [H390-MVS] Looking for a dataset

On 02.22.2024 12:05, Mike Ward wrote:
Hello all, I'm looking for a specific dataset that I am unable to find. The dataset is: TK4-.SHELBY.EZASMI.V100.ZIP I have done an IEHLIST of all the volumes on the TK4- that I have installed and I still can't find it. Anyone know where it's located? Thanks in advance.
That dataset was mentioned in the TCPIP readme, but never made it into the TK4- distribution. I asked about it over on the Turnkey-MVS list a while ago and Shelby provided it:

/g/turnkey-mvs/message/901

-Matthew


Re: Looking for a dataset

 

On 02.22.2024 12:05, Mike Ward wrote:
Hello all, I'm looking for a specific dataset that I am unable to find. The dataset is: TK4-.SHELBY.EZASMI.V100.ZIP I have done an IEHLIST of all the volumes on the TK4- that I have installed and I still can't find it. Anyone know where it's located? Thanks in advance.
That dataset was mentioned in the TCPIP readme, but never made it into the TK4-
distribution. I asked about it over on the Turnkey-MVS list a while ago and
Shelby provided it:

/g/turnkey-mvs/message/901

-Matthew


Looking for a dataset

 

Hello all, I'm looking for a specific dataset that I am unable to find. The dataset is: TK4-.SHELBY.EZASMI.V100.ZIP I have done an IEHLIST of all the volumes on the TK4- that I have installed and I still can't find it. Anyone know where it's located? Thanks in advance.


Re: Help needed to write test data to 3390 track

 

Anders Edlund wrote:

Yes IEBDG can write what you are looking for, but I guess
that running it under any OS would also write an EOF record
after the last 4kblock. How that would affect the test, I
do not know,
Neither do I (I'm not an MVS/zOS person), but it sounds like it *might* be a problem.


but after reading the trouble report once, it is my opinion that
the second track should not be touched at all, but I have been
wrong before.
Should not be touched at all? Why? I don't understand. :(


Using normal JCL like that would put the two tracks anywhere
on the volume and you would need to run a VTOC listing to
find out where it was written.
I believe a simple Hercules 'dasdls' would suffice for that. Yes?


As I understand the testing scheme (after some communication
a few weeks ago) maybe a simpler approach would be to let the
testing run the chain(s?) required to create the two tracks
for the test in a subsequent CCW chain?
Yes, that's what I was originally thinking too. But even though I could certainly do that, I'm not sure what the proper CCWs would be to accomplish it.

So maybe I should try the IEBDG that Rob suggested, but with CCW tracing enabled so I can see the exact sequence of CCWs that it's using to do it. Then I could easily code those same CCWs in a preceding test to prepare (create) the data needed by the next actual test.

In any case, I would to thank both you and Rob Prins for your quick response and help! You guys are great! The Hercules community ROCKS! :)

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...


Re: Help needed to write test data to 3390 track

 

Yes IEBDG can write what you are looking for, but I guess that running it under any OS would also write an EOF record after the last 4kblock. How that would affect the test, I do not know, but after reading the trouble report once, it is my opinion that the second track should not be touched at all, but I have been wrong before.? Using normal JCL like tht would put the two tracks anywhere on the volume and you would need to run a VTOC listing to find out where it was written.? As I understand the testing scheme (after some communication a few weeks ago) maybe a simpler approach would be to let the testing run the chain(s?) required to create the two tracks for the test in a subsequent CCW chain?


Re: Help needed to write test data to 3390 track

 

Hi Fish,

This can be done with IEBDG.

See the job below:

//Z531415A JOB (ACCNT),'IEBDG',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID
//*??????????????????????????????????????????????????????????? ?
//GEN????? EXEC? PGM=IEBDG???????????????????????????????????? ?
//SYSPRINT DD? SYSOUT=*??????????????????????????????????????? ?
//GENOUT1? DD? DSN=Z531415.B.DATA,DISP=(NEW,CATLG),??????????? ?
//???????? DCB=(LRECL=4096,BLKSIZE=4096,RECFM=F),????????????? ?
//???????? UNIT=3390,SPACE=(TRK,2)??????????????????????????? ?
//SYSIN??? DD? *?????????????????????????????????????????????? ?
?DSD? OUTPUT=(GENOUT1)???????????????????????????????????????? ?
?FD NAME=ROB,LENGTH=4096,STARTLOC=1,FORMAT=AL????????????????? ?
?CREATE QUANTITY=15,NAME=(ROB)???????????????????????????????? ?
?END?????????????????????????????????????????????????????????? ?
/*?????????????????????????????????????????????????????????????
This job creates 15 records with a length of 4096.

Cheers,
Rob


Re: Help needed to write test data to 3390 track

 

(Oops!) Sorry about the blank subject line, folks!

-----Original Message-----
From: "Fish" (David B. Trout) [mailto:david.b.trout@...]
Sent: Monday, February 19, 2024 6:57 AM
To: '[email protected]'
Cc: '[email protected]'; '[email protected]'
Subject:

(CC: H390-MVS, H390-VM)

I'm posting this question to the main Hercules group, but am also cross-
posting it to H390-MVS and H390-VM too in the hope that someone on one of
these groups will be able to help me.

Basically I need to create some dummy data in a very specific format on a
3390 test volume, and I'd rather not have to manually write a program to
do it, since it's a one-time-shot kind of deal. That is to say, once done,
I'll probably never need to do it again.

Here's the gist of it:

*
1951898214

I need to write 2 tracks worth of data. The first track needs to have 12
records, with each record being 4K (4096 bytes) in size. The second track
needs to have less than 12 records (say, only 3 records) on it, each one
also being 4K (4096 bytes) in size.

Does z/OS or z/VM, etc. have any type of existing utility/tool to do this
for me? Some kind of test data generator or "dataset" initialization tool
maybe? Can is possibly be done with a simple Rexx script maybe?

HELP!

Thanks.

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...


Re: DLI loading on Tk4 and MVSCE?

 

John James wrote:

Just wondering how to persuade the automated operator
to do it for me.

As a fully paid-up member of the Lazy so-and-so society,
*

So, e.g.:

hao tgt IEA101A...
hao cmd /r 00,clpa
hao tgt ...(clpa response message)...
hao clear

(I don't use TK myself, so I'm not familiar with the messages that it issues.)

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...


Re: DLI loading on Tk4 and MVSCE?

 

Just wondering how to persuade the automated operator to do it for me.

As a fully paid-up member of the Lazy so-and-so society,

JJ


Re: DLI loading on Tk4 and MVSCE?

 

¿ªÔÆÌåÓý

JJ,

?

Yes, you can? do that, simply reply R 00,CLPA should work.

?

Wally

?

?

From: [email protected] <[email protected]> On Behalf Of John James
Sent: Wednesday, February 14, 2024 03:44 PM
To: [email protected]
Subject: Re: [H390-MVS] DLI loading on Tk4 and MVSCE?

?

Hello Wally, thanks for the information.

An alternative strategy I was thinking about was to CLPA at every IPL anyway - what harm could it do?

Forgive my lack of knowledge about the automated operator. Where would I find the automated script that replies to the IEA101A message? Presumably adding in "CLPA," would be all that's needed?

JJ


Virus-free.


Re: DLI loading on Tk4 and MVSCE?

 

Hello Wally, thanks for the information.

An alternative strategy I was thinking about was to CLPA at every IPL anyway - what harm could it do?

Forgive my lack of knowledge about the automated operator. Where would I find the automated script that replies to the IEA101A message? Presumably adding in "CLPA," would be all that's needed?

JJ


Re: CURRENT-DATE and TIME in cobol MVS 3.8 - time is shown as HHMMSS. I use PIC 9(8). Result is as follows: DATE : 02/14/2

 

You cant?get milliseconds.

In MVT cobol, you get HHMMSS.

image.png

Joe

On Wed, Feb 14, 2024 at 7:50?AM Dagfinn Hammar <dagfinndh33@...> wrote:
Hi
I use the current-date and time function in cobol. I am able to get the correct syntax for current-date but struggle to get the time to get milliseconds from this function. Any suggestions on how I can troubleshoot.
best regards
Dagfinn Dyngeland Hammar?I4 TIME : 103850?I I


Re: CURRENT-DATE and TIME in cobol MVS 3.8 - time is shown as HHMMSS. I use PIC 9(8). Result is as follows: DATE : 02/14/2

 

¿ªÔÆÌåÓý

Try PIC X(8).

Air 2

On Feb 14, 2024, at 8:50 AM, Dagfinn Hammar <dagfinndh33@...> wrote:

?Hi
I use the current-date and time function in cobol. I am able to get the correct syntax for current-date but struggle to get the time to get milliseconds from this function. Any suggestions on how I can troubleshoot.
best regards
Dagfinn Dyngeland Hammar?I4 TIME : 103850?I I


CURRENT-DATE and TIME in cobol MVS 3.8 - time is shown as HHMMSS. I use PIC 9(8). Result is as follows: DATE : 02/14/2

 

Hi
I use the current-date and time function in cobol. I am able to get the correct syntax for current-date but struggle to get the time to get milliseconds from this function. Any suggestions on how I can troubleshoot.
best regards
Dagfinn Dyngeland Hammar?I4 TIME : 103850?I I


Re: Reorganizing a user catalog in MVS.

 

MVS has the Pre-ICF catalog with those limits.


On Mon, Feb 5, 2024 at 11:14?AM Alejandro olivan Alvarez <alejandro.olivan.alvarez@...> wrote:
Hi again folks.

I'm having issues with catalog 'dumps' resulting from REPRO.
While they look good, I can't use them:

I have re-read Jay's doc and I've acknowledge that DASD volumes do have or belng to a single catalog. So it is not a complete surprise as I try to restore my UCUSRDT0 Catalog backup, for USRDT0 Volume, on a USRDT1 volume as UCUSRDT1 Catalog... so, apparently, a backup of a catalog is useless, unless it is used against a volume with the same name than the original and to assemble the same catalog than the original had...isn't it?

I don't find a way on the docs to tell REPRO that the backup will be used on another volume... is that even possible?

Cheers.?



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


Re: Reorganizing a user catalog in MVS.

 

Hi again folks.

I'm having issues with catalog 'dumps' resulting from REPRO.
While they look good, I can't use them:

I have re-read Jay's doc and I've acknowledge that DASD volumes do have or belng to a single catalog. So it is not a complete surprise as I try to restore my UCUSRDT0 Catalog backup, for USRDT0 Volume, on a USRDT1 volume as UCUSRDT1 Catalog... so, apparently, a backup of a catalog is useless, unless it is used against a volume with the same name than the original and to assemble the same catalog than the original had...isn't it?

I don't find a way on the docs to tell REPRO that the backup will be used on another volume... is that even possible?

Cheers.?


Re: Unattended/Scheduled backups ideas.

 

¿ªÔÆÌåÓý

Sure! I hope it doesn't get too wordy.

First, I run IDCAMS to list all catalogs, master and user. I create all tapes with a HLQ of TAPE, but I check all catalogs just in case.

Then I wrote a program to process this listing and search for tape devices (I used PL/I, but back in the 80's, I wrote the same program in assembler). Check the DEVTYPE for '80' in positions 5 and 6, indicating a tape device. Write out the dataset name and the VOLSER to a file.

Next, I sort the output file by VOLSER. I don't think this is really necessary, but it makes the list look neater.

Then I read this list and generate shell commands to do the following:
  • Move all tape datasets to the SCRATCHTAPES directory
  • Move the tapes with cataloged datasets (from the previous output file) to the TAPES directory

Last, I use a program that I wrote (again back in the 80's) to issue CP commands to the host. Hercules takes them and since they start with 'sh' issues them to my host, which is Linux.

The only manual step I do after that is to re-initialize the scratch tapes to release the previously used space.

I can provide you with any of my program code and JCL if you like.


On 2/5/24 11:00, Doug Wegscheid wrote:

On Mon, Feb 5, 2024 at 09:53 AM, Dennis Stone wrote:

Once a month I run a job to identify uncataloged tapes and move them from the used tapes directory to the scratch tapes directory. It works like a charm.

I'd be really interested in seeing what that job looks like, or a hint as to what utilities and processing were involved. Sounds like a lot can be learned there.



Re: Unattended/Scheduled backups ideas.

 

Hi all guys!

Sure... this thread is the consequence of me struggling with the catalog 'expertise' :-P ... my troubles do 'fork' as I trip wires left and right while trying to go somewhere :-)
So, at some point, even having 'emulation level' backups (the full hercules folder) and DASD level backups (including shadows), I came to the reality that, at some point (now) I need to be able to handle (perform and restore) backups of my work (I have some work done with my COBOL experiments) selictively... I can't keep just keep 'nuking' the whole 'Mainframe' at the first issue.

The approach of having a set of pre-established tapes is an appealing idea.
If I understand correctly, a bunch of files on my filesystem would emulate a bunch of tapes stored somewhere in the shop, and the idea (if I imagine correctly) would be to load into the tape unit (devinit) a certain tape as required by certain 'logic'.
I have to dig on the 'tape cataloging' idea! I feel there's a lot of interesting stuff to learn beyond that approach!

While a normal/manually submited job (and necessary operator commands) to perform a backup following certain backup policy (something I do daily in my job) is fascinating enough by itself, the possibility to have it done automatically would be very convenient... that's why I explored HERCCMD to handle operator operations (handle tapes as required) but I'm not sure it is possible to use HERCCMD as part of a JOB.

Right now, I have done some DSSDUMPS, but I still have to figure out how to both handle the resulting tapes (exploring them, mount them, check their contents) and restore them (restoring looks quite abit more complex).

Cheers.