by Jerome <j.aubert1@[EMAIL PROTECTED]
>
May 11, 2006 at 03:37 PM
Jerome a écrit :
> Hello,
>
> I must work on a cobol program to modify it.
>
> This program read an external indexed file so I wrote :
>
> FILE-CONTROL.
> SELECT OPTIONAL ENTREE ASSIGN TO RANDOM FGCTEM01
> ORGANIZATIONAL IS INDEXED
> ACCESS DYNAMIC
> RECORD KEY EK-HISTOR1
> ALTERNATE RECORD KEY IS EK-HISTOR2 WITH DUPLICATES.
> ...
> DATA DIVISION.
> FILE SECTION.
> FD ENTREE RECORD CONTAINS 128 CHARACTERS
> LABEL RECORD STANDARD
> DATA RECORD EHISTOR.
> 01 EHISTOR.
> 02 EK-HISTOR1.
> 03 ...
> 03 ...
> ...
> 02 EK-HISTOR2.
> 03 ...
> 03 ...
> 02 ...
> ...
>
> When I try to compile, I've got this message :
>
> 0180: E File access name data-name is not defined for file : ENTREE
>
> What's wrong
>
> Best regards
>
> Jerome
I find the error :
SELECT OPTIONAL ENTREE ASSIGN TO RANDOM "FGCTEM01"
It' better
:-)
Jerome