Zane Howe writes regarding TRANCOMP:
> >>
> >> The thing i can't figure out is how to take care of this problem.
> >>
> >> :trancomp
> >> *ERROR: CANNOT OPEN CATALOG 000 (SYSTEM 15)
> >> NONEXISTENT PERMANENT FILE  (FSERR 52)
> >> **** PROGRAM ERROR #18 :PROCESS QUIT .PARAM = 1
> >> ABORT: TRANCOMP.PUB.SYS
> >> NM SYS   a.009d8180 dbg_abort_trace+$24
> >>    CM SYS  % 213.7323   SWITCH'TO'NM'+%4        SUSER1
> >>    CM PROG %  11.2676   NLS'SETUP'COMP+%213     MISC
> >> PROGRAM TERMINATED IN AN ERROR STATE.  (CIERR 976)
> >>
 
To which I reply (shooting from the hip):
 
> >Zane,
> >   I think you're missing TRAN000.PUB.SYS.  You may also need TRANCAT.
> >Rat
> >
 
and Zane sent:
 
> Hi Rich,
>
> On my HP3000 series 48 trancomp, and transact run without tran000, and
> trancat. So I thought i would create these two files on my hp937. This is
> what i did:
> 1) save catalog as trancat
> 2) run gencat
> 3) select option 3 (format a new catalog)
> 4) reply trancat to source
> 5) save the new catalog as tran000
>
> guess what, still same error.
 
[snipped]
 
>
> This is so much fun. Help.
>
> thank you
>
> Zane
 
Ok,  I'll put my money where my mouth is...Here's the correct (I hope)
answer:
/RATDEV/PUB:run trancomp.pub.sys;debug
 
DEBUG/iX B.76.22
 
CM DEBUG Intrinsic: PROG %2.7510
%1 (%53) cmdebug > B CATOPEN
added: CM    [1] SYS  % 174.2574   CATOPEN+%0
       NM    [1] TRANS 34.01276648 NLS02:CATOPEN+%0
%2 (%53) cmdebug > C
Break at: NM    [1] TRANS 34.01276648 NLS02:CATOPEN+%0
$3 ($2b) nmdebug > CM    <<back to CM since its a PROG not NMPRG >>
%4 (%53) cmdebug > DQ-5  <<Last parm is Q-4, 2nd to last (1st in this
                           case) is Q-5 >>
Q-%5      % 022602       <<this is byte address so divide by 2 >>
%5 (%53) cmdebug > =22602/2
%11301                   <<this is the word address >>
 
%17 (%53) cmdebug > DDB+11301,11,A
DB+%11301  ASCII RA PI D0 00 .P UB .S YS
DB+%11311  ASCII  .
%20 (%53) cmdebug >
 
So the answer is "RAPID000.PUB.SYS".   Sorry for wasting your time with
that first WRONG answer.  I'll keep my hip shooting down to a minimum
from now on.  My ego can't afford it...
Rich
--
______________________________________________________________________
________ Dynamic Information Systems Corp.   |
\!DISC / Rich Trapp                          | My opinions are my own.
 \    /  OMNIDEX Product Manager - IMAGE/SQL | With any luck they're
  \  /   Phone : 303 444-4000                | correct ;-)
   \/    E-mail: [log in to unmask]                |
----------------------------------------------------------------------