On Thu, 8 Jun 1995 17:43:02 GMT, Bill Bennett CSY ([log in to unmask])
wrote:
: On Wed, 7 Jun 1995 18:13:02 -0400, Chris Bartram ([log in to unmask]) wrote:
: : listf httpd.pub,2
: : ACCOUNT= DEV3K GROUP= PUB
: : FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
: : SIZE TYP EOF LIMIT R/B SECTORS #X MX
: : HTTPD NMPRG 1B BA 304640 2147483647 2 1200 1 *
: : :linkedit
: : HP Link Editor/iX (HP30315A.05.06) Copyright Hewlett-Packard Co 1986
: : LinkEd> listprog httpd.pub
: : LIBRARY "HTTPD.PUB" FILE LIMIT MUST BE <= 4096000 (LINKERR 1163)
: : LinkEd> altprog httpd.pub;cap=ia,ba,ph,pm
: : OPERATION INCONSISTENT WITH ACCESS TYPE (FSERR 40)
: : THE OUTPUT FILE IS FULL (LINKERR 1142)
: The reason LINKEDIT is having a problem is that the program file is a
: byte stream file. There appears to still be checks in LINKEDIT that
: assumes the program file is 128W (256 byte) record file. So when it
: calculates the limit using record length, it thinks its using 256 byte
: records when in reality it is using 1 byte records.
: There are different ways to get a program file that is byte stream
: (for example using MF COBOL or copying using ftp and not restoring the
: record structure). You can fix it back up by using FCOPY:
: :FILE HTTPD2;REC=128,1,F,BINARY;DISC=1190;CODE=NMPRG
: :FCOPY FROM=HTTPD;TO=*HTTPD2;NEW
I made a mistake here. You need to use frombyte in the shell. FCOPY will
do a record to record copy so each 256 record will have one byte in it.
What you should do is first issue the FILE equation:
:FILE HTTPD2;REC=128,1,F,FINARY;DISC=1190;CODE=NMPRG
Then get in the shell and run frombyte:
>frombyte HTTPD *HTTPD2
Sorry for any confusion.
Bill
: (NOTE: the DISC was calculated using the EOF from the LISTF above and
: then dividing by 256. 304640/256=1190)
: Hope this helps,
: Bill
--
---------------------------------------------------------------------------
Bill Bennett [log in to unmask]
Hewlett Packard Company
Commercial Systems Division phone (408) 447-7858
19055 Pruneridge Avenue, MS 46TU fax (408) 447-4441
Cupertino, California 95014
---------------------------------------------------------------------------
|