Индекс массива вне диапазона SAS

Question

У меня есть набор данных из 3 переменных: идентификатор, дата и суммы транзакции. Я получаю следующую ошибку при попытке запустить этот код:

DATA new;
SET old;
BY id date;
RETAIN dt1- dt400   amt1- amt400;
ARRAY TFL{400} dt1 - dt400;
ARRAY TAM{400} amt1 - amt400;
IF first.id THEN DO;
      CALL MISSING(of TFL{*});
      CALL MISSING(of TAM{*});
END;
z = INTCK('DAY', '31JUL2018'd,date);
TFL{z} = date;
TAM{z} = net_expenditure;
IF last.id THEN OUTPUT;
RUN;

ОШИБКА: нижний индекс массива вне диапазона в строке 39, столбец 1.

Может кто-нибудь помочь мне понять, как отладить этот кодвопрос