>> It really matters what flavor you're running. > >Which nobody has explained :-)
Basic Ref for MATREAD says: "If the number of elements in array is greater than the number of fields in the record, the extra elements in array are assigned empty string values. If thenumber of fields in the record is greater than the number of elements in the array, the extra values are stored in the zero element of array for IDEAL or INFORMATION flavor accounts, or in the last element of array for PICK, IN2, or REALITY flavor accounts." For MATWRITE it says: "In IDEAL and INFORMATION flavor accounts, if the zero element of the array has been assigned a value by a MATREAD or MATREADU statement, the zero element value is written to the record as the n+1 field, where n is the number of elements dimensioned in the array. If the zero element is assigned an empty string, only the assigned elements of the array are written to the record; trailing empty fields are ignored. The new record is written to the file (replacing any existing record) without regard for the size of the array." You can force one behavior or the other by using $OPTIONS STATIC.DIM (Pick behavior) $OPTIONS -STATIC.DIM (Ideal behavior) in your program. ( To really screw up the poor programmer who maintans your code, you can switch between those 2 options multiple times through your program, treating some arrays one way, some another. ) And just to nitpick again, "n+1" in the MATWRITE text above is a bit misleading or wrong. Any given array element can be multi-ATTRIBUTEd, and that means that many attributes are inserted in the middle of the record being written. Example (any flavor): >CT CDS.BP M M 0001 OPEN "","VOC" TO F.VOC ELSE STOP 3000,"VOC" 0002 DIM REC(10) 0003 REC(1) = 1 0004 REC(2) = 2 0005 REC(2)<2> = 'B' 0006 REC(2)<3> = 'C' 0007 REC(3) = 'this aint <3>' 0008 MATWRITE REC TO F.VOC, 'CDS' >RUN CDS.BP M >CT VOC CDS CDS 0001 1 0002 2 0003 B 0004 C 0005 this aint <3> > Have we run this to ground yet? I don't even remember the original question. cds ------- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/