如何取得持仓中浮动盈利最大品种的品种代码

103737

请教，我想在持仓中找出浮盈最大的品种，将该品种的代码返回给我，便于我对该品种进行操作。请问如何修改以下代码?谢谢


补充内容 (2023-8-23 23:06):
TH:=THOLDCOUNT(ZH1);
         多手:=0;      空手:=0;       多利:=0;        空利:=0;       多准:=0;        空准:=0;       {多品:=0;        空品:=0;}
         TEMP_STR:='';//保存品种代码集合
        ...

资深技术03

[PEL] 复制代码

TH:=THOLDCOUNT('');
max_str:='';//记录浮盈最大的品种代码
FY:=0;
temp:=0;

FOR I=1 TO TH do
BEGIN
        HLABEL:= THOLDINDEXLABEL(I,'');
        NEW_CLOSE:=DYNAINFO2(7,HLABEL);
        DTFY:=(NEW_CLOSE-TAVGENTERPRICEEX2('' ,HLABEL , 0))*DYNAINFO2(209,HLABEL)*TBUYHOLDINGEX('',HLABEL,2);
        KTFY:=(TAVGENTERPRICEEX2('' ,HLABEL , 1)-NEW_CLOSE)*DYNAINFO2(209,HLABEL)*TSELLHOLDINGEX('',HLABEL,2);
        FY:=DTFY+KTFY;
        MSGOUT(ISLASTBAR,HLABEL&'浮盈: '&numtostr(FY,2) & '  多头浮盈: '&numtostr(DTFY,2)&'  空头浮盈: ' &numtostr(KTFY,2));
        if FY>temp then
        begin
                max_str:=HLABEL;
                temp:=FY;
        end
end    

MSGOUT(ISLASTBAR,max_str);

103737

为什么品种代号无法输出到全局变量呢？显示的全是数字，不是字符！

代码:
EXTGBDATASET('最大品名-',max_str);

资深技术02

EXTGBSTRINGSET('品种代码',stklabel)

字符和数字的函数时不一样的