HP3000-L Archives

March 1999, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
TechServ TechServ <[log in to unmask]>
Reply To:
TechServ TechServ <[log in to unmask]>
Date:
Mon, 15 Mar 1999 14:33:43 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (35 lines)
Brad,

You need to specify the intrinsic in upper-case.  The compiler is interpreting the intrinsic name you placed in quotes as a lower-case intrinsic function, which doe not exist in the SYSINTR.PUB.SYS file.  Cobol will upshift all of the code in your source file except for data within quotation marks.

tom renz

>>> Brad Feazell <[log in to unmask]> 03/15 1:31 PM >>>
The small cobol program below compiles and runs on our test MPE/iX 5.5 pp6
machine but on our production machine with same MPE/iX 5.5 pp6, I get a
compiler error:

INTRINSIC clock NOT FOUND IN INTRINSIC FILE.

Does anyone know why this would happen?


$control post85
 identification division.
 program-id. test.
 environment division.
 configuration section.
 data division.
 working-storage section.
 01  time-disp              pic  x(7).
 01  time-comp              pic s9(9) binary sync.
 procedure division.
 main.
  call intrinsic "clock" giving time-comp
  move time-comp to time-disp
  display time-disp
  stop run.

--
Brad Feazell

ATOM RSS1 RSS2