HP3000-L Archives

October 2005, Week 1

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:
Robert Mills <[log in to unmask]>
Reply To:
Robert Mills <[log in to unmask]>
Date:
Fri, 7 Oct 2005 12:53:09 +0100
Content-Type:
text/plain
Parts/Attachments:
text/plain (64 lines)
An ":fcopy from=fnac1.qwertyiw;to=;char;hex" reports that there is only
one (1) record in the file.


regards,
 
Robert W.Mills
Systems Development Manager
Windsong Services
(020) 8309 3604

-----Original Message-----
From: Robert Mills 
Sent: 07 October 2005 12:49
To: 3000-L Mail List ([log in to unmask])
Subject: FSERR 40 when calling FPOINT

Environment: MPE/iX 6.5 and Cobol 85

FPOINT intrinsic is returning an "OPERATION INCONSISTENT WITH ACCESS
TYPE  (FSERR 40)" against a bytestream file FOPENed with FOPTION =
%40107 and AOPTION = %0.

:LISTF,2 reports:

ACCOUNT=  SYSDEV      GROUP=  QWERTYIW

FILENAME  CODE  ------------LOGICAL RECORD-----------  ----SPACE----
                  SIZE  TYP        EOF      LIMIT R/B  SECTORS #X MX

FNAC1               1B  BA        4605 2147483647   1      256  1  *

:LISTF,3 reports:

FILE: FNAC1.QWERTYIW.SYSDEV          

FILE CODE : 0                   FOPTIONS: ASCII,BYTESTREAM,NOCCTL,STD
BLK FACTOR: 1                   CREATOR : **                   
REC SIZE: 1(BYTES)              LOCKWORD: **                   
BLK SIZE: 1(BYTES)              SECURITY--READ    : ANY        
EXT SIZE: 0(SECT)                         WRITE   : ANY        
NUM REC: 4605                             APPEND  : ANY        
NUM SEC: 256                              LOCK    : ANY        
NUM EXT: 1                                EXECUTE : ANY        
MAX REC: 2147483647                     **SECURITY IS ON       
                                FLAGS   : NO ACCESSORS         
NUM LABELS: 0                   CREATED : WED, SEP 28, 2005, 11:54 AM
MAX LABELS: 0                   MODIFIED: WED, SEP 28, 2005, 11:54 AM
DISC DEV #: 14                  ACCESSED: FRI, OCT  7, 2005, 12:34 PM
SEC OFFSET: 0                   LABEL ADDR: **                 
VOLCLASS  : MPEXL_SYSTEM_VOLUME_SET:DISC

What am I doing wrong? 

regards, 
  
Robert W.Mills
Systems Development Manager
Windsong Services
(020) 8309 3604 

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

ATOM RSS1 RSS2