You have a comma where a period should be:
JAC100.JCL,MEDCLASS,JAC100.RZR.MEDTEST
-----Original Message-----
From: Rao, Ragu [mailto:[log in to unmask]]
Sent: Tuesday, December 18, 2001 7:55 AM
To: [log in to unmask]
Subject: [HP3000-L] Strange COMPARE Error
Hi all,
I have been trying to compare a production source with the test source from
my test account and pasted below is what I found out.. I know that I have
entered the syntax for COMPARE statement wrong here (instead of JOB,MEDCLASS
it should be JOB.MEDCLASS. Note the difference between "," and ".") and I
have been able to type the proper syntax and get this command going and got
perfect results as expected. But something which I observed as a part of
this process, thought could share with you all. The problem here is my test
source JAC100.RZR.MEDTEST goes from EOF=521 before COMPARE to EOF=0 after
COMPARE.. Any idea why this is happening ? How to resolve this permanently ?
RZR.MEDTEST: LISTF JAC100,2
ACCOUNT= MEDTEST GROUP= RZR
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
JAC100 80B FA 521 521 16 176 1 2
RZR.MEDTEST: LISTF JAC100.JCL.MEDCLASS,2
ACCOUNT= MEDCLASS GROUP= JCL
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
JAC100 80B FA 521 521 16 176 1 2
RZR.MEDTEST: COMPARE JAC100.JCL,MEDCLASS,JAC100.RZR.MEDTEST
Compare/iX/Copyright Robelle Consulting Ltd. 1991-2000, J.Miner 1978
(Version 2.7)
Licensee: Preferred Care [28I]
Unable to open the file called: fileb
NONEXISTENT PERMANENT FILE (FSERR 52)
run compare.pub.robelle;info=""
Program terminated in an error state. (CIERR 976)
RZR.MEDTEST: LISTF JAC100.JCL.MEDCLASS,2
ACCOUNT= MEDCLASS GROUP= JCL
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
JAC100 80B FA 521 521 16 176 1 2
RZR.MEDTEST: LISTF JAC100,2
ACCOUNT= MEDTEST GROUP= RZR
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
JAC100 80B FA 0 521 16 176 1 2
RZR.MEDTEST: HELP COMPARE
User-defined command:
COMPARE filea, fileb, outfile="$STDLIST", INFO=""
file filea=!filea
file fileb=!fileb
file outfile=!outfile
run compare.pub.robelle;info="!info"
reset filea
reset fileb
reset outfile
RZR.MEDTEST: LISTGROUP RZR
********************
GROUP: RZR.MEDTEST
DISC SPACE: 11472(SECTORS) PASSWORD: **
CPU TIME : 7748(SECONDS) SECURITY--READ : AC
CONNECT TIME: 49477(MINUTES) WRITE : AC
DISC LIMIT: 60000000(SECTORS) APPEND : AC
CPU LIMIT : UNLIMITED LOCK : AC
CONNECT LIMIT: UNLIMITED EXECUTE : AC
PRIV VOL : YES SAVE : AC
FILE UFID: $05640001 $238B8150 $00B94FCA $4A8324A7 $558B2682
MOUNT REF CNT: n/a
HOME VOL SET : MEDCLASS_VOLUME
CAP: BA,IA,PH
RZR.MEDTEST:
Thanks in advance,
With Best Regards
Raghu. Rao
Ph: 585-327-5755, Fax: 585-327-5702
Email: [log in to unmask]
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|