¿ªÔÆÌåÓý

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

Re: State of tk3upd (was rabbit hole with MVS and pr3287)


 

On Tue, Jun 23, 2020 at 03:41 PM, Drew Derbyshire wrote:
Create a empty dasd loaded 3350, and try to allocate a file via batch.? I can't do an example now, but if you want one later I can.

Just tried it; it works. Here was the .ctl file

drew 3350
vtoc vtoc cyl 2

did a 'dasdload drew.ctl drew.3350'

did this at the Hercules console
attach 721 3350 scratch/drew.3350

did a
m 721,vol=(sl,drew),use=private

Responded with '721' when prompted with
15.59.43 STC 2166? IEF244I MOUNT 721 - UNABLE TO ALLOCATE 1 UNIT(S)??????????????????????????????????????????????????????????????????????????????????
???????? AT LEAST 1 OFFLINE UNIT(S) NEEDED.??????????????????????????????????????????????????????????????????????????????????????????????????????????
15.59.43 STC 2166? IEF489I MOUNT - 1 UNIT(S) NEEDED FOR IEFRDER??????????????????????????????????????????????????????????????????????????????????????
15.59.43 STC 2166? IEF247I MOUNT - 721 OFFLINE???????????????????????????????????????????????????????????????????????????????????????????????????????
15.59.43 STC 2166 *13 IEF238D MOUNT - REPLY DEVICE NAME OR 'CANCEL'.?????????????????????????????????????????????????????????????????????????????????

mount command completed, and I was able to place datasets on volume 'DREW' w/ both RFE and a batch job:

//WEGSCDCC JOB (DOUG,5278),CREATE.FILE,CLASS=A,MSGCLASS=X?????????????? 00000100
//CLEANUP EXEC PGM=IEFBR14????????????????????????????????????????????? 00000200
//CREATE??? DD DSN=DREW.TEST1,DISP=(NEW,CATLG,DELETE),UNIT=3350,??????? 00000300
//???????????? SPACE=(CYL,(50,20),RLSE),VOL=SER=DREW,?????????????????? 00000400
//???????????? DCB=(RECFM=VBS,LRECL=8000,BLKSIZE=16000)???????????????? 00000500

Join [email protected] to automatically receive all group messages.