Reading/Chaining into a DS, and RNF0202

[Tony Carolla <carolla@xxxxxxxxx>]

I have a file defined, as follows:

     FFamly     IF   E             Disk    ExtFile(FileFAMLY)
     F                                     InfSR(*PSSR)
     F                                     Block(*Yes)
     F                                     UsrOpn

Then I have a data structure, with the extenal format from the file above:

     D DSFamly       E DS                  ExtName(FAMLY)
     D                                     Qualified

In my /FREE calc specs, I want to read a record from the FAMLY file
into the DSFAMLY data structure, so I have

        Read Famly DSFamly;

The compiler gives me an error RNF0202:  THE RESULT DATA STRUCTURE
DSFAMLY DOES NOT INCLUDE A SUBFIELD IN POSITION 1 FOR RECORD FAMREC.

I checked the compiler listing, and the Famly file is found and
resolved in the library list, and the DSFamly data struct is resolved
to the same format (FAMREC).  I don't understand what I am doing wrong
-- HELP!

TIA
------------------------------------------
Tony Carolla
Programmer/Analyst
MedAmerica Billing Services, Inc.


-- 
"Enter any 11-digit prime number to continue..."