Thank for the help.
I don't mind working on 1/4 (1 grading pd) at a time, then compiling the
stats for each separately for comparison.(32k limit)
This will work super.

-----Original Message-----
From: Bernie [mailto:fb.mailing.list@...]
Sent: Saturday, December 09, 2006 1:02 AM
To: futurebasic@...
Subject: Re: [FB] Array of Records containing arrays of Records containing
arrays


Aren't FB records limited to 32K?

Anyway, I think this has parens and brackets in the right place:

'----------
_numStudents = 2999
_numQtrGrades = 3
_numDays = 105// 179 days will take Student record to 55,440 bytes !!!
_numAttFlds = 13

begin record StudentDay
dim 8 permNumArray$[_numAttFlds] 'eight digit ID number   80125468
dim 8 dateArray$[_numAttFlds]    'eight digit date  12252006
dim 1 attCodeArray$[_numAttFlds] 'one character attendance code   T
end record

begin record Student
dim 2 qtrGrade$[_numQtrGrades]     'two character grade    A+
dim yearArray[_numDays] as StudentDay
end record

dim student(_numStudents) as Student
dim as long studNum, qtrNum, dayNum, attNum

student.qtrGrade$[qtrNum](studNum) = "A+"
student.yearArray[dayNum].permNumArray$[attNum](studNum) = "12345678"
student.yearArray[dayNum].dateArray$[attNum](studNum) = "87654321"
student.yearArray[dayNum].attCodeArray$[attNum](studNum) = "T"
'----------


An hierarchy of CFArrays/CFDictionaries is another option.

Bernie




On 9 Dec 2006, at 00:04, Dennis J. Fast wrote:

>
> I have a huge amout of data. 14 * 3 pieces of attendance
> information for
> 3000 students for 180 days. For each day, Each student contains 14
> pieces of data that each contain 3 fields. I will be adding 4 quarter
> grades to the Student record later. We are trying to coorelate
> attendance and tardies to class grades. InfoSys says it is not
> possible.
> Balderdash...
>
> Can the BEGIN RECORD ... END RECORD  and the multi-dimension arrays
> architecture of FB handle this kind of structured set of data?
>
> Here are my thoughts:
>
> BEGIN RECORD StudentDay
>   DIM 8 PermNumArray$(14) 'eight digit ID number   80125468
>   DIM 8 DateArray$(14)    'eight digit date  12252006
>   DIM 1 AttCodeArray$(14) 'one character attendance code   T
> END RECORD
>
> BEGIN RECORD Student
>   DIM 2 QtrGrade$(4)     'two character grade    A+
>   DIM YearArray(180) as StudentDay
> END RECORD
>
> DIM School(3000) as Student
>
> 'do I have to unpack one level at a time to get down to a single date
> code?
> 'Or can I directly access the deepest piece of date directly using
> multiple indices?
>
> 'Student #124 Grade #2
> Grade$ = School.QtrGrade$[1](123)
>
> ' I am unclear as to the type of enclosure when going three deep.
> ' I want to see Student #124 Day #76 AttCode#4
> Code$ = School.YearArray.AttCodeArray$ [3][75](123)
>

--
To unsubscribe, send ANY message to: futurebasic-unsubscribe@...


__________ NOD32 1912 (20061209) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com