¿ªÔÆÌåÓý

Re: Adding disks found in DMKRIO and CPEREP error


 

Hello Bob,

In DMKRIO?ASSEMBLE, I'm seeing 3390 with CLASS=DASD for address 390,16.? I'm also seeing 3390 drives on channels A, B, C, D, E, and F (A00 - FFF) all withOUT CLASS=DASD.? What is the purpose of so many 3390 drives?

Can someone help me create the 3350 and 3380 drives on the Herc system?? I'm not sure of the command.? (If someone already answered this question, I apologize for mising it.)? The drives are:

# 32 3350 drives added by me for my use.? They are already defined in DMKRIO.

08A0 ? ?3350 ? ?disks/vm08A0_BGM001.cckd ro sf=disks/shadows/vm08A0_BGM001_*.shadow
.
.
.
08BF ? ?3350 ? ?disks/vm08BF_BGM031.cckd ro sf=disks/shadows/vm08BF_BGM031_*.shadow

# 16 3380 drives added by me for my use.? They are already in DMKRIO.

0380 ? ?3380 ? ?disks/vm0380_BGM001.cckd ro sf=disks/shadows/vm0380_BGM001_*.shadow
.
.
.
038F ? ?3380 ? ?disks/vm038F_BGM015.cckd ro sf=disks/shadows/vm038F_BGM015_*.shadow??



On Fri, Oct 28, 2022 at 10:36 AM Bob Bolch <Bob@...> wrote:
For item 3, VM/370 does not support 3390 disks. Over the years, support for 3380s was added,
by modifications present on the MAINT 094 disk. The 3390 disks in DMKRIO?have the CLASS=DASD
parameter specified which allows guest operating systems to use them.?

Bob Bolch

On Fri, Oct 28, 2022 at 10:43 AM Bertram Moshier <herc370390vm@...> wrote:
Hi,

I'm trying to add disks found in DMKRIO?because I want to create my own accounts and on different drives.

I'm running into three issues.

1) My error recording area is full.? When I run CPEREP, I get the following error.? Again it has been so long since I was a systems programmer I forget how to run and also fix stuff.

cperep ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?GLOBAL TXTLIB ERPTFLIB EREPLIB ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?CPEREP ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?ENTER: ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?EREP INFORMATIONAL MESSAGES ? ? ? ? ? ? ? ? ? ? DATE - 301 22 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? PARAMETER OPTIONS VALID FOR THIS EXECUTION ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? RECORD TYPES(MCH,CCH,OBR,SOFT,IPL,DDR,MIH,EOD,MDR),PRINT(SUMMARY),ACCUMULATE,LOGREC INPUT ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? DATE/TIME RANGE - ALL ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? TABLE SIZE - 024K,LINE COUNT - 050 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? IFC135I PROCESSING TERMINATED ACCDEV ? WRITE ERROR ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?IFC120I ? ?205 ? ? RECORDS THAT PASSED FILTERING ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? DMSSCT120S OUTPUT ERROR 005 ON ACCDEV. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?DMSABN148T SYSTEM ABEND 001 CALLED FROM F94A24. ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? CMS? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??

2) How do I copy and paste text from a 3270 screen to email without having it look so crappy.? Any thoughts?? Yeah, copy line by line, but ...

3) Why my drives aren't showing up?? OK, I see.? Hercules doesn't create the drives just because you add them to the configuration file.

** I'm not sure of the command and the parameters for creating the drives.? Yes, I did read the Hercules 4 webpage manual for creating drives.? I didn't understand it well enough to feel safe using the command.? Thus, I'm asking for help here.

** I noticed in the webpages the 3390 has various model numbers and NONE of them look to NOT have a model number?? In DMKRIO?the 0AE0-0AFF entries are for a 3390, but doesn't have a model number.? What model number should one use for these drives, when creating them in Hercules?

I'm starting to see the advantage of using the Hercules GUI (especially for a newbie to Hercules).

I'm adding to the message the entries I added to the vm370ce.conf file.? I'm hoping I did them correctly; did I?

# 32 3350 drives added by me for my use.? They are already defined in DMKRIO.

08A0 ? ?3350 ? ?disks/vm08A0_BGM001.cckd ro sf=disks/shadows/vm08A0_BGM001_*.shadow
.
.
.
08BF ? ?3350 ? ?disks/vm08BF_BGM031.cckd ro sf=disks/shadows/vm08BF_BGM031_*.shadow

# 32 3390 drives added by me for my use.? They are already in DMKRIO.

0AE0 ? ?3390 ? ?disks/vm0AE0_BGM001.cckd ro sf=disks/shadows/vm0AE0_BGM001_*.shadow
.
.
.

0AFF ? ?3390 ? ?disks/vm0AFF_BGM031.cckd ro sf=disks/shadows/vm0AFF_BGM031_*.shadow?


Just FYI:? I wrote a short program in REXX to create the drive entries.? It is:

/* Examples only

base08A0 = '08A0 ? ?3350 ? ?disks/vm08A0_BGM001.cckd ro sf=disks/shadows/vm08A0_BGM001_*.shadow'
base0AE0 = '0AE0 ? ?3390 ? ?disks/vm0AE0_BGM001.cckd ro sf=disks/shadows/vm0AE0_BGM001_*.shadow'

*/

num = 1

base_haddr = '0AE0'? /* Change for the address you're using */
haddr = base_haddr
drive = '3390'? ? ? ? ? ? ?/* Change for the drive you're using. */
file_001 = 'disks/vm'
file_002 = haddr
file_003 = '_BGM'? ?/* Change as you desire for your file names. */
file_004 = right(num,3,'0')
file_005 = '.cckd ro sf=disks/shadows/vm'
file_006 = haddr
file_007 = file_003
file_008 = file_004
file_009 = '_*.shadow'


do num = 1 to 32
? say haddr || ' ? ?' || drive ' ? ' || file_001 || file_002 || ,
? ? ? file_003 || file_004 || file_005 || file_006 || file_007 || ,
? ? ? file_008 || file_009

? haddr = right(d2x((x2d(base_haddr)) + num),4,'0')
? file_002 = haddr
? file_006 = haddr
? file_004 = right(num,3,'0')
? file_008 = file_004
? end? ? ? ? ? ? ? ? ? ? ??







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