本益比陣列問題詢問

你好

我想請問以下陣列公式，他可以跑但會有部分股票代號跑不出來，如3661 世芯，可以幫我檢查是那邊語法有問題嗎?主要目的是想用2500天的本益比去抓中位數在哪，並與最新的本益比來比較，看看現在的本益比相較過去歷史本益比中位數差距，感謝

Array: peA[](0);

var:  pe90(0),pe50(0); 

array_SetMaxIndex(peA, 2500);

value2 = 0;

for value1 = 1 to 2500 begin

    if getfield("本益比", "D")[value1] <> 0 then begin 

        value2 += 1;

        peA[value2] = getfield("本益比", "D")[value1];

        end;

    end;

array_SetMaxIndex(peA, value2);

Array_Sort(peA, 1, value2, true);

pe90 = peA[ceiling(value2 * 0.9)];

pe50 = pea[ceiling(value2 * 0.5)];

outputField1(pe90, "90分位數");

outputField2(pe50, "50分位數");

outputField3(GetField("本益比")/pe50, "本益比位置");