开云体育

On Sun, Jul 26, 2020 at 10:17 AM, Joe Monk wrote:

Yes it is applicable to an IOGEN as well.

Right. Tried this.

First I created a JCL job that created the OBJPDS datasets:

//OBJPDS00 JOB (OBJPDS),'CREATE OBJPDS',??????????????????????????????? 00010000
//???????????? CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A??????????????????????? 00020000
//IEFBR14? EXEC PGM=IEFBR14???????????????????????????????????????????? 00890000
//OBJPDS01 DD? DSN=SYS1.OBJPDS01,DISP=(NEW,CATLG,DELETE),?????????????? 01390000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01400000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01410000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01420000
//OBJPDS02 DD? DSN=SYS1.OBJPDS02,DISP=(NEW,CATLG,DELETE),?????????????? 01430000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01440000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01450000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01460000
//OBJPDS03 DD? DSN=SYS1.OBJPDS03,DISP=(NEW,CATLG,DELETE),?????????????? 01470000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01480000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01490000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01500000
/*????????????????????????????????????????????????????????????????????? 01510000

But it wouldn't run of course since I hadn't any WORK01 in the system.

Did a dasdinit -a dasd/work01.249 3350 765432 to create a disk.

The attached it to hercules : attach 249 3350 dasd/work01.249

Then I ran another job to initialize the new DASD:

//WRINIT? JOB (WORK01INIT),'INIT OF WORK01',??????????????????????????? 00010000
//???????????? CLASS=A,???????????????????????????????????????????????? 00020000
//???????????? MSGCLASS=A,MSGLEVEL=(1,1)??????????????????????????????? 00030000
//*?????? 1. Initialize WORK00, WORK01, and SMP000 volumes????????????? 00180000
//*???????????????????????????????????????????????????????????????????? 00190000
//S5?????? EXEC? PGM=IEHDASDR,REGION=1024K????????????????????????????? 01700000
//SYSPRINT DD? SYSOUT=A???????????????????????????????????????????????? 01710000
//SYSIN??? DD? *??????????????????????????????????????????????????????? 01720000
?? ANALYZE TODD=249,VTOC=1,EXTENT=15,NEWVOLID=WORK01??????????????????? 01750000
//????????????????????????????????????????????????????????????????????? 01760000

Shutdown the system and changed the configuration for Hercules into:

#
# Configuration file for Hercules emulator
#

CPUSERIAL 000611
CPUMODEL 3033
MAINSIZE 16
XPNDSIZE 0
CNSLPORT 3270
HTTPPORT 8081
NUMCPU 1
LOADPARM ........
SYSEPOCH 1928
TZOFFSET +0000
## remove the next line if running hercules version 1
ARCHMODE S/370
PANRATE FAST
OSTAILOR QUIET
# .-----------------------------Device number
# |??? .------------------------Device type
# |??? |?? .--------------------File name
# |??? |?? |
# V??? V?? V
#--- ---- --------------------
000e 1403 prt/prt00e.txt
0012 3505 jcl/null.jcl eof trunc ascii
0013 3525 prt/pch00d.txt ascii
001f 3215
0150 3330 dasd/start1.150
0170 3420 *
0151 3330 dasd/spool0.151
0148 3350 dasd/mvsres.148
0149 3350 dasd/smp001.149
014A 3350 dasd/smp002.14a
014B 3350 dasd/smp003.14b
014C 3350 dasd/smp004.14c
0248 3350 dasd/mvsdlb.248
0249 3350 dasd/work01.249

This is basically the standard configuration for tk3 starter system but with the added work01 volume.

So finally I could run tha OBJPDS job at the top which seemed to work well. At least when looking for the condition codes.

So then then were time to run the stage 2. I used the script stage2.rexx that Jay Moseley have provided. It converted the output file according to hist suggested changes.
The diff were basically:

$ diff stage1.output stage2.jcl
1c1,5
< //IOG11 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A
---
> //
> //IOG11 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A,
> //???????????? TYPRUN=HOLD,TIME=1439
> /*JOBPARM LINES=100
> //JOBCAT?? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR
2078c2082,2086
< //IOG12 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A
---
> //
> //IOG12 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A,
> //???????????? TYPRUN=HOLD,TIME=1439
> /*JOBPARM LINES=100
> //JOBCAT?? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR
2839c2847,2851
< //IOG13 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A
---
> //
> //IOG13 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A,
> //???????????? TYPRUN=HOLD,TIME=1439
> /*JOBPARM LINES=100
> //JOBCAT?? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR
8837c8849,8853
< //IOG14 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A
---
> //
> //IOG14 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A,
> //???????????? TYPRUN=HOLD,TIME=1439
> /*JOBPARM LINES=100
> //JOBCAT?? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR
9285c9301,9305
< //IOG15 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A
---
> //
> //IOG15 JOB 1,'SYSTEM GENERATION',MSGLEVEL=1,CLASS=C,MSGCLASS=A,
> //???????????? TYPRUN=HOLD,TIME=1439
> /*JOBPARM LINES=100
> //JOBCAT?? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR
9304c9324
<
---
> //

?

I then ran the converted script as Jay Moseley did when running his Sysgen. When I tried to release the first job nothing happened at all!

Quite possibly the MVSRES volume was screwed up royally because of the first attempt, but I thought that something more was supposed to happen when I released the job?

I think I see one difference when I run the job vs when Jay does it: "$HASP125 READER1? SKIPPING FOR JOB CARD"

I tried to look this up:

But I don't fully understand how to resolve this. Any hints?

?

$ telnet localhost 3270
Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
Hercules version 3.13 built on Jul 18 2020 22:49:58
running on mattis-HP-EliteBook (Linux-4.4.0-186-generic.#216-Ubuntu SMP Wed Jul 1 05:34:05 UTC 2020 x86_64 MP=4)
Connected to device 0:001F
IEA101A SPECIFY SYSTEM PARAMETERS FOR RELEASE 03.70.VS2
HHCTE006A Enter input for console device 001F
r 0,clpa
?IEF165I // START JES2
?IEE351I SMF SYS1.MAN RECORDING NOT BEING USED
*00 $HASP426 SPECIFY OPTIONS - HASP-II, VERSION JES2 4.0
r 0,format,noreq
?IEE600I REPLY TO 00 IS;SUPPRESSED
?$HASP423 SPOOL0 IS BEING FORMATTED
?IEE041I THE SYSTEM LOG IS NOW ACTIVE
?$HASP160 PRINTER1 INACTIVE - CLASS=AJ
?$HASP160 PUNCH1?? INACTIVE - CLASS=BK
?$HASP125 READER1? SKIPPING FOR JOB CARD
?$HASP100 INIT???? ON STCINRDR
?$HASP373 INIT???? STARTED
?$HASP100 INIT???? ON STCINRDR
?$HASP373 INIT???? STARTED
?$HASP100 INIT???? ON STCINRDR
?$HASP373 INIT???? STARTED
?$HASP309??? INIT? 1 INACTIVE *** C=A
?$HASP309??? INIT? 2 INACTIVE *** C=BA
?$HASP309??? INIT? 3 INACTIVE *** C=CBA
?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE
$pi2-3
?$HASP000 OK
?$HASP395 INIT???? ENDED
?$HASP150 INIT???? ON PRINTER1
?$HASP160 PRINTER1 INACTIVE - CLASS=AJ
?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE
?$HASP250 INIT???? IS PURGED
?$HASP395 INIT???? ENDED
?$HASP150 INIT???? ON PRINTER1
?$HASP160 PRINTER1 INACTIVE - CLASS=AJ
?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE
?$HASP250 INIT???? IS PURGED
?$HASP100 OBJPDS00 ON READER1???? CREATE OBJPDS
?$HASP373 OBJPDS00 STARTED - INIT? 1 - CLASS A - SYS H158
?$HASP395 OBJPDS00 ENDED
?$HASP150 OBJPDS00 ON PRINTER1
?$HASP309??? INIT? 1 INACTIVE *** C=A
?$HASP160 PRINTER1 INACTIVE - CLASS=AJ
?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE
?$HASP250 OBJPDS00 IS PURGED
?$HASP125 READER1? SKIPPING FOR JOB CARD
?$HASP100 IOG11??? ON READER1???? SYSTEM GENERATION
?$HASP100 IOG12??? ON READER1???? SYSTEM GENERATION
?$HASP100 IOG13??? ON READER1???? SYSTEM GENERATION
?$HASP101 IOG11??? HELD
?$HASP101 IOG12??? HELD
?$HASP100 IOG14??? ON READER1???? SYSTEM GENERATION
?$HASP100 IOG15??? ON READER1???? SYSTEM GENERATION
?$HASP101 IOG13??? HELD
?$HASP101 IOG14??? HELD
?$HASP101 IOG15??? HELD
?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE
$a'IOG11
?$HASP000 IOG11??? RELEASED

/Mattis

On Sun, Jul 26, 2020 at 01:01 AM, Joe Monk wrote:

Mattis,

?

The other thing you have to remember is that you are generating a new nucleus. So, you have to apply all of the service and mods that. were applied before your did your IOGEN before you can IPL. And I think you have to update. IEASYS00 to tell it to use the new nucleus.

Reading the instructions in the TK4- manual it looks like this takes place AFTER IPLing the new TK4- system. Not in the starter system. Step 10 - 12 above.


Using the excellent pages that Jay Moseley has provided on how to perform a sysgen shows that in Jya Mosely SYSGEN00.jcl there is this section:

//*???????????????????????????????????????????????????????????????????? 01310000
//ALLOC??? EXEC PGM=IEFBR14???????????????????????????????????????????? 01320000
//*???????????????????????????????????????????????????????????????????? 01330000
//* * 01340000
//* ALLOCATE AND CATALOG WORK DATASETS USED IN STAGE 2 DECK?????????? * 01350000
//* * 01360000
//*???????????????????????????????????????????????????????????????????? 01370000
//STEPCAT? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR??????????????????? 01380000
//OBJPDS01 DD? DSN=SYS1.OBJPDS01,DISP=(NEW,CATLG,DELETE),?????????????? 01390000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01400000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01410000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01420000
//OBJPDS02 DD? DSN=SYS1.OBJPDS02,DISP=(NEW,CATLG,DELETE),?????????????? 01430000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01440000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01450000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01460000
//OBJPDS03 DD? DSN=SYS1.OBJPDS03,DISP=(NEW,CATLG,DELETE),?????????????? 01470000
//???????????? UNIT=3350,VOL=SER=WORK01,??????????????????????????????? 01480000
//???????????? SPACE=(CYL,(20,10,50)),????????????????????????????????? 01490000
//???????????? DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)???????????????????? 01500000
//*???????????????????????????????????????????????????????????????????? 01510000

So it looks like they should end up on the WORK01 volume. I will try to do similar things in my system.

While reading the Jay Moseley instructions there are also a number of modifications done to the stage 2 job before it is submitted:

1. For jobs 1 through 5, add a continuation card immediately after the JOB card (add a comma onto the rightmost end of the JOB card and insert a card following the JOB card with // in the first 2 columns).? Note that job 6 already has a continuation card for the JOB card.

2. For jobs 1 through 5, add TYPRUN=HOLD on the newly added continuation card of the JOB card beginning anywhere in columns 2 through 16.? Note that job 6 already has TYPRUN=HOLD on the continuation card.

3. For all jobs, add a comma and TIME=1439 following the TYPRUN=HOLD on the continuation of the JOB card.

4. For all 6 jobs, insert a new card immediately after the continuation card of the JOB card.? Beginning in column 1 of this inserted blank card, enter?
   
   ??????????????? /*JOBPARM? LINES=100

5. For jobs 1 through 5, insert another new card immediately after the card just inserted (the JOBPARM card).? Beginning in column 1 of this inserted blank card, enter
   
   ??????????????? //JOBCAT? DD? DSN=SYS1.VSAM.MASTER.CATALOG,DISP=SHR

6. In job 6, locate STEPY (which is the third from the final step in the deck) and change the program executed from IDCAMS to IEFBR14:
   
   ??????????????? //STEPY????? EXEC PGM=IEFBR14,REGION=512K

7. Throughout the jobstreams, whereever there is an EXPDT=99350 parameter on a DD statement, change it to EXPDT=00000.

8. Depending upon your personal preference, you may add a job terminator statement (//) at the end of the generated deck

He has a script, stage2.awk/stage2.rexx that does this automatically. I will have a look to see if this script could be applicable to an IOGEN as well.

We'll see how all this works out...

/Mattis

Why isn't the picture included??

I think I found one thing that I haven't done. According to the sysgen manual I define three utility data sets. But I simply don't understand what all this means. It says in the Figure 37 text caption that the underlined values must match the GENERATE MACRO. But there is nothing underlined?? DO they mean between y:s? Like yOBJPDSy??

Generate MACRO look like this:

GENOP GENERATE GENTYPE=(IO,1),? ? ? ? ? ? ?IO generation? ? ? ? ? ? ? ?+

? ? ? ? ? ? ? ?INDEX=IOG1,? ? ? ? ? ? ? ? ?HLQ for datasets? ? ? ? ? ? +

? ? ? ? ? ? ? ?JCLASS=C,? ? ? ? ? ? ? ? ? ?Jobclass to submit? ? ? ? ? +

? ? ? ? ? ? ? ?OBJPDS=SYS1.OBJPDS,? ? ? ? ?Name of Object PDS? ? ? ? ? +

? ? ? ? ? ? ? ?OCLASS=A,? ? ? ? ? ? ? ? ? ?Output class? ? ? ? ? ? ? ? +

? ? ? ? ? ? ? ?RESVOL=(MVSRES,3350)? ? ? ? Residence Volume

? ? ? ? ?END

?

From?

Page 153:


Anyone that can enlighten me here?

/Mattis

Hello Joe,?


Here is the stage 1 in put file:?

It is almost identical to the one in TK4- except for the first 2703 at 070 which has BSC3 instead of BSC2. That is all there is in terms of changes.

/Mattis

Hello All IOGEN experts!

I want to change on of the 2703 devices in the TK4- config to act as a BSC3 device so I started to try to do an iogen on tk4- and failed completely.

The steps described in the TK4- is a bit sketchy at least with the amount of MVS knowledge I have.

Performing an IOGEN?

The following procedure isn’t meant to be a cookbook style recipe; in depth MVS systems programming knowhow is required to follow it. Although the TK4- system is set up such that this procedure should work reliably, the author cannot guarantee this. For good reasons IOGENs and SYSGENs always were amongst the most hated tasks on IBM’s vintage operating systems.?

?

1.Create a backup copy of the system (one never knows…).?

2.Deactivate RAKF: o Submit jobs RAKF.SAMPLIB(VSAMSRAC) and RAKF.SAMPLIB(VTOCSRAC) to clear the RACF indicators. Note: It is advisable to submit VTOCSRAC using TYPRUN=HOLD and logoff the TSO session before releasing the job. VTOCSRAC will have some issues with long dataset names under the TK4- HLQ. These can safely be ignored.?

3. Change SYS1.PARMLIB(RAKFINIT) from YES to NO.?

4. Re-IPL the system. The system is now “disarmed”, i.e. while RAKF is still installed, it is no longer active and will grant each and every request. For more information see the RAKF User’s Guide, which can be unzipped in PDF or MS-Word format from RAKF.SAMPLIB($DOC$ZIP).?

5.Edit job SYS1.SYSGEN.CNTL(IOGEN) to reflect the desired changes and submit it. Check for errors and rerun as needed!?

6. Run job SYS1.UMODCNTL(REST-ALL) and then all jobs from SYS1.UMOD.RESTORE.CNTL. ?

7. Shut down the system.?

8. IPL the starter system (if you don’t have it, get it from the original TK3 CD).?

9. Submit job SYS1.STAGE1.IOGEN.OUTPUT from MVSRES. Check output for errors, there generally shouldn’t be any condition codes higher than 4.?

10. Shutdown the starter system and perform an IPL CLPA of the TK4- system. Of course you now experience a vanilla system, particularly in terms of TSO session capabilities… so, be warned and don’t worry!?

11.Run job SYS1.SYSGEN.CNTL(IO-JCLIN) to bring SMP back into synch.?

12. Run job SYS1.UMODCNTL(APPL-ALL) to get all usermods back into the system. Carefully read and follow the warning message issued to the console upon submission of the job: You must ensure, that all apply jobs are run sequentially. If they don’t, you’re guaranteed to completely mess up your system.?

13. Shut down the system and perform an IPL CLPA.?

14.Reactivate RAKF: o Set the setracf parameter in jobs RAKF.SAMPLIB(VSAMSRAC) and RAKF.SAMPLIB(VTOCSRAC) to ON and submit them to switch the RACF indicators back on. Note: It is advisable to submit VTOCSRAC using TYPRUN=HOLD and logoff the TSO session before releasing the job. VTOCSRAC will have some issues with long dataset names under the TK4- HLQ. These can safely be ignored. o Change SYS1.PARMLIB(RAKFINIT) from NO to YES.?

15.? Re-IPL the system. The system is now “armed”, i.e. RAKF will enforce all profiles defined in SYS1.SECURE.CNTL. For more information see the RAKF User’s Guide, which can be unzipped in PDF or MS-Word format from RAKF.SAMPLIB($DOC$ZIP).?

16. Enjoy your new I/O configuration.

At 10 everything went south. Step 2 seems not to be necessary since these indicators are set to off already (?). Doing step 3 and then step 4 gave me a system that didn't ask me for password when logging in.

Then I did step 5. Just a tiny change and submitted it. All seemed well. There were a huge file generated in SYS1.STAGE1.IOGEN.OUTPUT. The file looked ok. Contained a number of jobs to be run later.


Now I did step 6 which worked fine as well. Actually later on when re-IPL this system to get the??SYS1.STAGE1.IOGEN.OUTPUT out to be able to submit it (probably a very stupid way of doing things..) I found that there were things that didn't behave as they used to. But I assume this has to do with the fact that a number of user mods has been removed and maybe wasn't working exactly as it used to.

At step 7 it was starting to get tricky. I downloaded the TK3 CD. Extracted the START1 DASD and SPOOL0 DASD and moved them into my DASD catalog as well as the starter.conf file from the tk3 CD. After some trials the starter system booted up nicely. I then ran the SYS1.STAGE1.IOGEN.OUTPUT file which I had extracted out of the tk4- system directly on the card reader of ther starter system.

I am not sure that this went ok. But "All available functions complete" is a good sign is my experience.

$ telnet localhost 3270

Trying 127.0.0.1...

Connected to localhost.

Escape character is '^]'.

Hercules version 3.13 built on Jul 18 2020 22:49:58

running on mattis-HP-EliteBook (Linux-4.4.0-186-generic.#216-Ubuntu SMP Wed Jul 1 05:34:05 UTC 2020 x86_64 MP=4)

Connected to device 0:001F

IEA101A SPECIFY SYSTEM PARAMETERS FOR RELEASE 03.70.VS2

HHCTE006A Enter input for console device 001F

r 0,clpa

?IEF165I // START JES2

?IEE351I SMF SYS1.MAN RECORDING NOT BEING USED

*00 $HASP426 SPECIFY OPTIONS - HASP-II, VERSION JES2 4.0

r 0,noreq

?IEE600I REPLY TO 00 IS;SUPPRESSED

?IEE041I THE SYSTEM LOG IS NOW ACTIVE

?$HASP160 PUNCH1 ? INACTIVE - CLASS=BK

?$HASP125 READER1? SKIPPING FOR JOB CARD

?$HASP150 SYSLOG ? ON PRINTER1

?$HASP150 INIT ON PRINTER1

?$HASP250 SYSLOG ? IS PURGED

?$HASP150 INIT ON PRINTER1

?$HASP250 INIT IS PURGED

?$HASP150 INIT ON PRINTER1

?$HASP250 INIT IS PURGED

?$HASP160 PRINTER1 INACTIVE - CLASS=AJ

?$HASP250 INIT IS PURGED

?$HASP100 INIT ON STCINRDR

?$HASP373 INIT STARTED

?$HASP100 INIT ON STCINRDR

?$HASP373 INIT STARTED

?$HASP100 INIT ON STCINRDR

?$HASP373 INIT STARTED

?$HASP309 INIT? 1 INACTIVE *** C=A

?$HASP309 INIT? 2 INACTIVE *** C=BA

?$HASP309 INIT? 3 INACTIVE *** C=CBA

?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE

$pi2-3

?$HASP000 OK

?$HASP395 INIT ENDED

?$HASP150 INIT ON PRINTER1

?$HASP160 PRINTER1 INACTIVE - CLASS=AJ

?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE

?$HASP250 INIT IS PURGED

?$HASP395 INIT ENDED

?$HASP150 INIT ON PRINTER1

?$HASP160 PRINTER1 INACTIVE - CLASS=AJ

?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE

?$HASP250 INIT IS PURGED

?$HASP100 IOG11 ON READER1 SYSTEM GENERATION

?$HASP100 IOG12 ON READER1 SYSTEM GENERATION

?$HASP100 IOG13 ON READER1 SYSTEM GENERATION

?$HASP100 IOG14 ON READER1 SYSTEM GENERATION

?$HASP100 IOG15 ON READER1 SYSTEM GENERATION

?$HASP101 IOG15 HELD

?$HASP099 ALL AVAILABLE FUNCTIONS COMPLETE


The last job was HELD. It makes sense since TYPRUN=HOLD was set on the last job in the jcl file. I have no idea what the reason for this is though?

Here is the file:

I thought that giving $A command to have the job released should work, but it didn't succeed. I then just removed the TYPERUN=HOLD on the last job. Re-ran the job and then it wasn't held any longer.


Now at step 10 I restarted the original TK4- system but now something had really became very strange. A lot of things refused to start and didn't work as it used to do so I assume I had corrupted the system.

You guys that have done this multiple times can probably easily spot what I had done wrong!

Thanks,

/Mattis

Super job Bob, congratulations !

Cheers,

Peter

NJE38 version 2 is now available in the files section (nje38v200.zip).? This version now contains the much-needed TSO-based TRANSMIT and RECEIVE commands.? These commands allow you to send and receive datasets right from TSO without having to resort to JCL and multi-step jobs, determining DCB attributes, and computing space requirements.

The internal NETDATA file format is compatible with that of modern operating systems and files can be exchanged with more modern MVS and VM platforms, as well as of course other MVS 3.8 nodes.? NJE38 RECEIVE can also receive CBT xmi files as well as files generated by the non-NJE38-related utility XMIT370 (subject to limitations described in the NJE38 documentation).? NJE38 RECEIVE can also receive PRINT and PUNCH files from any VM system.

This version also contains performance improvements and a number of bug fixes.

Regards,
Bob

?

Found it in GC23-0002-0 "OS/VS2 System Programming Library: JES2"

&RJOBOPT controls scanning of JOB cards by JES2. Changed from 5 to 3.

I am working on some SMF reporting w/ MVS 3.8j.

SMF type 4, 5, and 20 records (step termination, job termination, job initiation) all seem to have the accounting information in them (pano and room, programmer's accounting number and room number).

Type 26 records (JES2 job purge) supposedly have the pano and room information in fields SMF26ACT and SMF26ROM, but they are filled with binary zeroes.

Is there a configuration somewhere that I need to tweak to get those populated?

Hello Doug,

Am 20.07.2020 um 23:47 schrieb Doug Wegscheid <dwegscheid@...>:

Are you to the point where sending a link to the replica is appropriate? (Or did I miss it, quite likely!)

You did miss it. :-)

:wq! PoC

PGP-Key: DDD3 4ABF 6413 38DE -

See:?/g/H390-MVS/message/1346

Are you to the point where sending a link to the replica is appropriate? (Or did I miss it, quite likely!)