Discussion:
[H390-MVS] tk4- ICKDSF or other for 3390 ?
Mike Stramba mikestramba@gmail.com [H390-MVS]
2018-06-13 09:03:46 UTC
Permalink
How do I format a new 3390 for tk4- ?

For a 3350, ICKDSF works, but for a 3390, I'm not getting a console
prompt "reply to alter contents"

I added the 3390 as device 0192 per SYS1.SYSGEN.CNTL(IOGEN)

Mike
kerravon86@yahoo.com.au [H390-MVS]
2018-06-13 09:45:25 UTC
Permalink
Post by Mike Stramba ***@gmail.com [H390-MVS]
How do I format a new 3390 for tk4- ?
For a 3350, ICKDSF works, but for a 3390, I'm not getting a console
prompt "reply to alter contents"
The Jay Moseley instructions include loading
a new version of ICKDSF that allows a 3390
to be formatted.

Your other option is to use dasdload.

BFN. Paul.
Giuseppe Vitillaro giuseppe@vitillaro.org [H390-MVS]
2018-06-13 09:49:10 UTC
Permalink
Post by Mike Stramba ***@gmail.com [H390-MVS]
How do I format a new 3390 for tk4- ?
For a 3350, ICKDSF works, but for a 3390, I'm not getting a console
prompt "reply to alter contents"
I added the 3390 as device 0192 per SYS1.SYSGEN.CNTL(IOGEN)
Mike
Under MVS3.8j (beside being TK4- or another sysgen), I found
definitely easier to format 3390 (even not standard 3390) using
the hercules "dasdload" command.

I'm under Linux and as UNIX user I use this short bash
script to format dasds for MVS3.8j (in general any model
of dasd, not only 3390):

==================================================
#!/bin/bash

dev=$1
vol=$2
trk=$3

ctl=$(mktemp /tmp/dasdctl.XXX)

cat << EOF > $ctl
$vol $dev *
sysvtoc vtoc trk $trk
EOF

vol=$(echo ${vol} | tr '/A-Z/' '/a-z/')

cat $ctl

dasdload -a -z $ctl $vol.$dev

rm $ctl
====================================================

The script may be easily converted to any scripting
language, under any OS, and I use it on this way:

mkdasd.sh 3390 vollab 30

to create the hercules dasd file "vollab.3390" in
the current directory (30 should be the number of
tracks reserved for VTOC).

The volume is ready to be attached to the hercules emulator
to a free XXX channel which had MVS sysgen for a 3390 (d u,dasd,offline
is your friend) and mounted with the MVS console commands:

V XXX,ONLINE
M XXX,VOL=(SL,VOLLAB),USE=PRIVATE

If the volume get mounted by MVS, it should be ready
to be used from REVIEW.

You are going to get a "VTOC conversion error" at the
very first dataset allocation (never understood why, any
insight?), but after this first error I never got
problems, even for non standard 3390 volumes.

Hope it helps, Peppe.
Joe Monk joemonk64@gmail.com [H390-MVS]
2018-06-13 10:18:40 UTC
Permalink
You have to use ICKDSF version 13 or above. ICKDSF that comes with MVS 3.8J
is not at that level.

Joe
Post by Mike Stramba ***@gmail.com [H390-MVS]
How do I format a new 3390 for tk4- ?
For a 3350, ICKDSF works, but for a 3390, I'm not getting a console
prompt "reply to alter contents"
I added the 3390 as device 0192 per SYS1.SYSGEN.CNTL(IOGEN)
Mike
kerravon86@yahoo.com.au [H390-MVS]
2018-06-13 10:31:14 UTC
Permalink
Post by Joe Monk ***@gmail.com [H390-MVS]
You have to use ICKDSF version 13 or above.
ICKDSF that comes with MVS 3.8J is not at that level.
Depending on what you mean by "comes with
MVS 3.8J", it does appear to be on the MVS38J
tape (files 79 & 80) that the Jay Moseley instructions
call for:

//* INSTALL ICKDSF (DEVICE SUPPORT FACILITIES) RELEASE 13.0 FROM 00040000
//* MVS3.8J DISTRIBUTION TAPE RENAMING LOAD MODULE TO RETAIN ORIGINAL 00050000
//* ICKDSF FROM BASE INSTALLATION. 00060000
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 00070000
//* 00080000
//IEBCOPY EXEC PGM=IEBCOPY,REGION=1024K 00090000
//SYSPRINT DD SYSOUT=* 00100000
//LIBIN1 DD DSN=FDZ1D02.F1,UNIT=TAPE,DISP=(OLD,PASS), 00110000
// LABEL=(79,SL),VOL=(PRIVATE,RETAIN,SER=MVS38J) 00120000


BFN. Paul.
Giuseppe Vitillaro giuseppe@vitillaro.org [H390-MVS]
2018-06-13 10:41:49 UTC
Permalink
Post by Joe Monk ***@gmail.com [H390-MVS]
You have to use ICKDSF version 13 or above. ICKDSF that comes with MVS 3.8J
is not at that level.
Joe
ICKDSF13 is on the Moseley and it is installed
in his SYSGEN.

I had beeen never able to succesfully initialize
a non standard 3390 with ICKDSF13 ;-(

Peppe.

Loading...