Record and File Description in Cobol

[Jri123]

Hello,

I have a question about the record and file description in Cobol.

This is my code:

--File description--

SELECT OPTIONAL boek-file ASSIGN TO "boek.dat"
ORGANIZATION IS INDEXED
ACCESS MODE IS DYNAMIC
RECORD KEY IS boek-prim-key
ALTERNATE RECORD KEY IS boek-alt-key1 WITH DUPLICATES
ALTERNATE RECORD KEY IS boek-alt-key2 WITH DUPLICATES
FILE STATUS IS boek-status.

and
--Record description--

FD boek-file.
01 boek-record.
03 boek-key.
05 boek-prim-key.
07 b-bnr PIC 9(4).
05 boek-alt-key1.
07 b-buitgever PIC X(25).
05 boek-alt-key2.
07 b-btitel PIC X(25).
03 boek-data.
05 b-publicatieJaar PIC 9(4).

I wonder if its correct to write boek-alt-key1 and boek-alt-key2 as 2 seperate groupfields. I'm not sure that this is allowed, i'm guessing it is but I wanna make sure.

Kind regards

 

[PHV]

What is the problem ????

 

[Jri123]

In the record description...

05 boek-alt-key1.
07 b-buitgever PIC X(25).
05 boek-alt-key2.
07 b-btitel PIC X(25).

If its allowed to write it down like that, using 2 alternate keys with each an individual groupfield.

 

[PHV]

What is saying your compiler ?

 

[Jri123]

Well, my compiler doesn't indicate any errors, but i'm not writing a full program, only parts of it so I can't really test it.

I just want to make sure its allowed to write it down like that..

Kind regards

 

[PHV]

For me you don't have any problem.

 

[Jri123]

Ok, thx