Обратное чтение записей из таблицы - PullRequest
Новая
       82

Обратное чтение записей из таблицы

0 голосов
/ 01 декабря 2018

tbl_rlen = 12 dateCount = len (tbdata $) / 12 - 1;rem присваивает переменную для хранения общего числа дат, представленных в таблице

начальный_дат_пос = max (0, dateCount - 125);rem присваивает переменную для хранения начальной позиции табличных данных (662) VSS 11/27/18 <<<<< </p> 

    FOR I=0 TO 125

        IF TBDATA$((I * tbl_rlen) + 1, 12) = FILL(12, " ") THEN

            REM  if blank, then read next loop; changed the var to use the record length (662) *VSS* 11/27/18

            continue

        ENDIF

        x$ = tbdata$((i + startingDatePosn) * 12 + 1, 10); GOSUB GENDATE  

        HOLIDAYS[I]=X

    NEXT I

    tbdata$ contain whole data(data is dates here which occupies 12 bytes) from table.
    HOLIDAYS[I]=X holidays[i] array is of 125, Which i cannot change.


    I want reverse reading of data from the table, so that it reads the data 125 count of dates(each of 12 bytes) from the end of table
    Can anybody please help me out.
...