奇狐社區論壇 - 跨商品使用

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 跨商品使用 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=17842)

由 Touareg_Smart 在 2013-07-12 07:51 發表:

跨商品使用

版主您好：

當使用自訂義指數，其產生的代碼為 AA01, AA02, ....
而我要找出其成交額時，不想一個一個寫，所以採用了for迴圈。

然而該如何做變數的轉換，才可使得"SID$AMOUNT" 生效，

而不是用"AA01$AMOUNT" ? 請參考如下：

for i=1 to 2 do begin

SID := 'AA0' + NUMTOSTR(i,0);
XAA:"SID$AMOUNT"/"100$AMOUNT" *100;

//XAA01:"AA01$AMOUNT"/"100$AMOUNT" *100;

end;

由 cgjj 在 2013-07-12 09:27 發表:

回覆: 跨商品使用

引用:
最初由 Touareg_Smart 發表
版主您好：

當使用自訂義指數，其產生的代碼為 AA01, AA02, ....
而我要找出其成交額時，不想一個一個寫，所以採用了for迴圈。

然而該如何做變數的轉換，才可使得"SID$AMOUNT" 生效，

而不是用"AA01$AMOUNT" ? 請參考如下：

for i=1 to 2 do begin

SID := 'AA0' + NUMTOSTR(i,0);
XAA:"SID$AMOUNT"/"100$AMOUNT" *100;

//XAA01:"AA01$AMOUNT"/"100$AMOUNT" *100;

end;

以累加 [板塊指數] 板塊中所有成分之 XAA 值為例:

先建立一個公式名稱為 "範例0712_子公式" 的公式, 內容為:

AM:AMOUNT;

再建一個公式名稱為 "範例0712" 的公式, 內容為:

原碼:UseBlkName:='板塊指數';
UseStkNum:=STKCOUNT(UseBlkName);
AM100:="100$AMOUNT";
SumXAA:0;
for i=1 to UseStkNum do begin
  StkAM:=STKINDI(STKFROMBLK(UseBlkName,i),'範例0712_子公式.AM',0,datatype);
  if lbound(StkAM)>0 then begin
    SumXAA:=SumXAA+StkAM/AM100*100;
  end;
end;

將 "範例0712" 這公式套用於圖, 就可得到結果
註: "範例0712_子公式" 不需套用

全部時間均為台灣時間, 現在時間為21:56

在這個頁面顯示本主題全部的 2 個文章