HP3000-L Archives

October 2008, Week 5

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:
Re: COBOL COMPILER BLUES...
From:
Keven Miller <[log in to unmask]>
Reply To:
Keven Miller <[log in to unmask]>
Date:
Tue, 28 Oct 2008 22:12:47 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (46 lines) 
> I don't have all the scripts the COBOL compiler is supposed to come
> with, but I do have the COB85XL script.
> It *should* take the syntax I used below, and write out an object file
> and a listing file. The group do exist, and it works
> for the Fortran and RPG compilers. Go figure...

I guess COBOL is not quite as smart as the other compilers on this.

Try a file equation.

Fox 11:cob85xl cob1,cob1p,cob1l
**** ERROR 491 UNABLE TO OPEN FILE COBLIST .
NONEXISTENT PERMANENT FILE (FSERR 52)
run COBOL.PUB.SYS,ANSI85;parm=7;info=""
Program terminated in an error state. (CIERR 976)
ERRORS IN COMPILE
setjcw jcw=fatal
Unless a CONTINUE is in effect, the remainder of the
current UDC will be flushed. (CIWARN 1723)

Fox 11:file cob1l,new;save

Fox 11:cob85xl cob1,cob1p,*cob1l
PAGE 0001 COBOL II/iX HP31500A.04.19 [85] Copyright Hewlett-Packard CO. 1987


0 ERROR(s), 0 QUESTIONABLE, 0 WARNING(s)
DATA AREA IS 2C BYTES.
CPU TIME = 0:00:00. WALL TIME = 0:00:02.
END OF PROGRAM
END OF COMPILE

Fox 11:l cob1@
TUE, OCT 28, 2008, 10:07 PM
ACCOUNT= KEVENM GROUP= COB
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
COB1 80B FA 19 19 3 16 1 1
COB1L 258B VAC 40 5000 1 256 1 *
COB1P NMOBJ 128W FB 6 4000 1 16 1 8

Keven Miller

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2