大智慧F10提取解禁流通提示公式

?

日期:=SELFDATA('解禁日期' );

股份:=SELFDATA('解禁股份' );

占比:=SELFDATA('占比' );

jjrq1:=2010;

jjrq2:=INTPART(日期);

jjrq3:=FRACPART(日期)*100;

jxz:=DATETOD1970(1100000+jjrq2*100+jjrq3)-DATETOD1970(DATE);

xstj:=股份>0;

bt1:=ifs(xstj,'◆解禁流通◆','');

bt2:=ifs(xstj,'日期 解禁股份(萬股) 占總股份(%)','');

xs1:=ifs(xstj,NUMTOSTR(jjrq1)+'-'+ifs(jjrq2>=10,NUMTOSTR(jjrq2),'0'+NUMTOSTR(jjrq2))+'-'+ifs(jjrq3>=10,NUMTOSTR(jjrq3),'0'+NUMTOSTR(jjrq3)),'');

xs2:=ifs(xstj,NUMTOSTRN(股份,2),'');

xs3:=ifs(xstj,NUMTOSTRN(占比,2)+'%','');

DRAWTEXTABS(10,10,bt1),Color00FF80;

DRAWTEXTABS(10,25,bt2),ColorFF8080;

DRAWTEXTABS(10,40,xs1),ColorFFFFFF;

DRAWTEXTABS(90,40,xs2),ColorFFFFFF;

DRAWTEXTABS(190,40,xs3),ColorFFFFFF;

DRAWTEXTABS(10,55,ifs(xstj,'距今'+jxz+'天','')),ColorFF80FF;