自動交易中心_使用FilledRecordPrice(idx)語法 會出現問題

IF FilledRecordCount <> 0 then begin

if Position >=1 and Position < 5 and (C >= FilledAvgPrice + 5) and CurrentDate=Date then begin

Alert("進場時間差",TimeDiff(CurrentTime,B_RecTime,"M")," RecTime=",B_RecTime);

For B_i=1 To 4

Begin

RTime[B_i] = RTime[B_i+1];

RDate[B_i] = RDate[B_i+1];

End;

RTime[5] = CurrentTime;

RDate[5] = CurrentDate;

B_RecTime = MaxList(RTime[0],RTime[1],RTime[2],RTime[3],RTime[4],RTime[5]);

Alert("打加碼TimeDiff=",TimeDiff(RTime[7],B_RecTime,"M"),"RecTime=",B_RecTime,"RDate[5]",RDate[5]," RT0=",RTime[0]," RT1=",RTime[1]," RT2=",RTime[2]," RT3=",RTime[3]);

Alert(" RT4=",RTime[4]," RT5=",RTime[5]," RT6=",RTime[6]," RT7=",RTime[7]);

Print("打加碼TimeDiff=",TimeDiff(RTime[7],B_RecTime,"M"),"RecTime=",B_RecTime,"RDate[5]",RDate[5]," RT0=",RTime[0]," RT1=",RTime[1]," RT2=",RTime[2]," RT3=",RTime[3]," RT4=",RTime[4]," RT5=",RTime[5]," RT6=",RTime[6]," RT7=",RTime[7]);

SetPosition(Position + 1,Market,Label:="加碼買進1口"); { 買進1張 }

j = j+1;

RTime[0] = FilledRecordTime(FilledRecordCount); // 更新記錄_最後加碼的時間

RPrice[j] = FilledRecordPrice(FilledRecordCount);

end;

End;

上述代碼只要將RPrice[j] = FilledRecordPrice(FilledRecordCount);  給移除，程式即不會跳出錯誤

為什麼RTime[0] = FilledRecordTime(FilledRecordCount); 這樣的寫法可以，而FilledRecordPrice(FilledRecordCount);卻會有錯誤發生呢

請幫忙協助，感謝。