开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
Express.cpp
资源名称：clking_src.rar　[点击查看]
上传用户：zhanglf88
上传日期：2013-11-19
资源大小：6036k
文件大小：38k
源码类别：

金融证券系统

开发平台：

Visual C++

Express.cpp：源码内容
  1. /*
  2. Cross Platform Core Code.
  4. Copyright(R) 2001-2002 Balang Software.
  5. All rights reserved.
  7. Using:
  8. class CExpress;
  9. class CIndex;
  10. class CIndexContainer;
  11. */
  13. #include "stdafx.h"
  14. #include "../Include/Express.h"
  15. #include <math.h>
  17. #ifdef _DEBUG
  18. #undef THIS_FILE
  19. static char THIS_FILE[]=__FILE__;
  20. #define new DEBUG_NEW
  21. #endif
  23. SLH_DATA slh_data_array[SLH_MAX+1] = {
  24. { SLH_NONE, "", 100, "" },
  25. { SLH_CODE, "", 100, "" },
  26. { SLH_NAME, "", 110, "" },
  27. // 技术数据
  28. { SLH_DATE, "", 110, "" },
  29. { SLH_LASTCLOSE, "", 100, "lastclose" },
  30. { SLH_OPEN, "", 100, "open" },
  31. { SLH_CLOSE, "", 100, "close" },
  32. { SLH_HIGH, "", 100, "high" },
  33. { SLH_LOW, "", 100, "low" },
  34. { SLH_AVERAGE, "", 100, "average" },
  35. { SLH_DIFF, "", 100, "diff" },
  36. { SLH_DIFFPERCENT, "", 100, "diffpercent" },
  37. { SLH_SCOPE, "", 100, "scope" },
  38. { SLH_VOLUME, "", 140, "volume" },
  39. { SLH_AMOUNT, "", 140, "amount" },
  40. { SLH_VOLUP, "", 100, "volup" },
  41. { SLH_VOLDOWN, "", 100, "voldown" },
  42. { SLH_DIFFPERCENT_MIN5, "", 100, "diffpercent_min5" },
  43. { SLH_SELLBUYRATIO, "", 100, "sellbuyratio" },
  44. { SLH_SELLBUYDIFF, "", 100, "sellbuydiff" },
  45. { SLH_BUYPRICE3, "", 100, "buyprice3" },
  46. { SLH_BUYPRICE2, "", 100, "buyprice2" },
  47. { SLH_BUYPRICE1, "", 100, "buyprice1" },
  48. { SLH_SELLPRICE1, "", 100, "sellprice1" },
  49. { SLH_SELLPRICE2, "", 100, "sellprice2" },
  50. { SLH_SELLPRICE3, "", 100, "sellprice3" },
  51. { SLH_BUYVOLUME3, "", 100, "buyvolume3" },
  52. { SLH_BUYVOLUME2, "", 100, "buyvolume2" },
  53. { SLH_BUYVOLUME1, "", 100, "buyvolume1" },
  54. { SLH_SELLVOLUME1, "", 100, "sellvolume1" },
  55. { SLH_SELLVOLUME2, "", 100, "sellvolume2" },
  56. { SLH_SELLVOLUME3, "", 100, "sellvolume3" },
  58. // 主要基本指标
  59. { SLH_REPORTTYPE, "", 100, "" },
  60. { SLH_PE, "", 100, "pe" },
  61. { SLH_PNETASSET, "", 100, "pnetasset" },
  62. { SLH_PMAININCOME, "", 100, "pmainincome" },
  63. { SLH_RATIO_PCASH, "", 100, "ratio_pcash" },
  64. { SLH_RATIO_CURRENCY, "", 100, "ratio_currency" },
  65. { SLH_RATIO_CHANGEHAND, "", 100, "ratio_changehand" },
  66. { SLH_RATIO_VOLUME, "", 100, "ratio_volume" },
  67. { SLH_RS, "", 100, "rs" },
  68. { SLH_MARKETVALUE, "", 170, "marketvalue" },
  69. { SLH_MARKETVALUEA, "", 170, "marketvaluea" },
  70. { SLH_MARKETVALUEB, "", 170, "marketvalueb" },
  71. // ★偿债能力
  72. { SLH_RATIO_LIQUIDITY, "", 140, "ratio_liquidity" },
  73. { SLH_RATIO_QUICK, "", 140, "ratio_quick" },
  74. { SLH_VELOCITY_RECEIVABLES, "", 170, "velocity_receivables" },
  75. // ★经营能力
  76. { SLH_VELOCITY_MERCHANDISE, "", 150, "velocity_merchandise" },
  77. { SLH_MAIN_INCOME, "", 160, "main_income" },
  78. { SLH_CASH_PS, "", 170, "cash_ps" },
  79. // ★盈利能力
  80. { SLH_PROFIT_MARGIN, "", 170, "profit_margin" },
  81. { SLH_NETASSET_YIELD, "", 190, "netasset_yield" },
  82. // ★资本结构
  83. { SLH_DATE_BEGIN, "", 160, "" },
  84. { SLH_SHARE_COUNT_TOTAL, "", 160, "share_count_total" },
  85. { SLH_SHARE_COUNT_A, "", 140, "share_count_a" },
  86. { SLH_SHARE_COUNT_B, "", 140, "share_count_b" },
  87. { SLH_SHARE_COUNT_H, "", 140, "share_count_h" },
  88. { SLH_SHARE_COUNT_NATIONAL, "", 140, "share_count_national" },
  89. { SLH_SHARE_COUNT_CORP, "", 140, "share_count_corp" },
  90. { SLH_PROFIT_PSUD, "", 170, "profit_psud" },
  91. { SLH_ASSET, "", 140, "asset" },
  92. { SLH_RATIO_HOLDERRIGHT, "", 170, "ratio_holderright" },
  93. { SLH_RATIO_LONGDEBT, "", 170, "ratio_longdebt" },
  94. { SLH_RATIO_DEBT, "", 170, "ration_debt" },
  95. // ★投资收益能力
  96. { SLH_NETASSET_PS, "", 150, "netasset_ps" },
  97. { SLH_NETASSET_PS_REGULATE, "", 200, "netasset_ps_regulate" },
  98. { SLH_EPS, "", 140, "eps" },
  99. { SLH_EPS_DEDUCT, "", 170, "eps_deduct" },
  100. { SLH_NET_PROFIT, "", 140, "net_profit" },
  101. { SLH_MAIN_PROFIT, "", 140, "main_profit" },
  102. { SLH_TOTAL_PROFIT, "", 140, "total_profit" },
  103. { SLH_PROFIT_INC, "", 170, "profit_inc" },
  104. { SLH_INCOME_INC, "", 170, "income_inc" },
  105. { SLH_ASSET_INC, "", 190, "asset_inc" },
  106. { SLH_ANNGAINS_AVERAGE, "", 170, "anngains_average" },
  107. { SLH_ANNGAINS_STDDEV, "", 170, "anngains_stddev" },
  108. { SLH_BETA, "", 100, "beta" },
  109. { SLH_SHARP, "", 100, "sharp" },
  110. { SLH_TRADE, "", 100, "" },
  111. { SLH_PROVINCE, "", 100, "" },
  112. };
  114. CSPString AfxGetVariantName( UINT nVariantID, BOOL bWithParameter )
  115. {
  116. if( nVariantID >= SLH_USERDEFINE_BEGIN )
  117. {
  118. CIndexContainer & aindex = AfxGetProfile().GetSListColumnsUser();
  119. CIndex index = aindex.GetIndex( nVariantID );
  120. return index.m_strName;
  121. }
  122. if( nVariantID < SLH_MIN || nVariantID > SLH_MAX )
  123. return "";
  125. CSPString strResult;
  126. if( strResult.IsEmpty() )
  127. strResult = slh_data_array[nVariantID].string;
  128. if( strResult.IsEmpty() )
  129. {
  130. SP_ASSERT( nVariantID == slh_data_array[nVariantID].slh_id );
  131. strResult = AfxGetSLHTitle( nVariantID );
  133. int size = sizeof(slh_data_array[nVariantID].string);
  134. strncpy( slh_data_array[nVariantID].string, strResult, size-1 );
  135. slh_data_array[nVariantID].string[size-1] = 0;
  136. }
  138. if( bWithParameter )
  139. {
  140. if( SLH_DIFF == nVariantID || SLH_DIFFPERCENT == nVariantID || SLH_SCOPE == nVariantID
  141. || SLH_RATIO_CHANGEHAND == nVariantID || SLH_RATIO_VOLUME == nVariantID
  142. || SLH_RS == nVariantID || SLH_ANNGAINS_AVERAGE == nVariantID )
  143. {
  144. CSPString strSuf, strTemp;
  145. strSuf = slh_hdrday;
  147. if( SLH_DIFF == nVariantID )
  148. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetDiffDays(), (LPCTSTR)strSuf );
  149. else if( SLH_DIFFPERCENT == nVariantID )
  150. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetDiffPercentDays(), (LPCTSTR)strSuf );
  151. else if( SLH_SCOPE == nVariantID )
  152. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetScopeDays(), (LPCTSTR)strSuf );
  153. else if( SLH_RATIO_CHANGEHAND == nVariantID )
  154. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetRatioChangeHandDays(), (LPCTSTR)strSuf );
  155. else if( SLH_RATIO_VOLUME == nVariantID )
  156. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetRatioVolumeDays(), (LPCTSTR)strSuf );
  157. else if( SLH_RS == nVariantID )
  158. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetRSDays(), (LPCTSTR)strSuf );
  159. else if( SLH_ANNGAINS_AVERAGE == nVariantID )
  160. strTemp.Format( "%s-%d%s", (LPCTSTR)strResult, AfxGetProfile().GetYieldAverageDays(), (LPCTSTR)strSuf );
  161. else
  162. SP_ASSERT( FALSE );
  163. strResult = strTemp;
  164. }
  165. }
  167. return strResult;
  168. }
  170. BOOL AfxGetVariantNameArray( CSPStringArray & astr, BOOL bWithParameter )
  171. {
  172. astr.SetSize( 0, SLH_MAX+SLH_MIN+1 );
  173. for( int nVariantID = min(0,SLH_MIN); nVariantID <= SLH_MAX; nVariantID ++ )
  174. {
  175. if( strlen(slh_data_array[nVariantID].varname) > 0 )
  176. {
  177. CSPString strTemp = AfxGetVariantName( nVariantID, bWithParameter );
  178. astr.Add( strTemp );
  179. }
  180. else
  181. {
  182. astr.Add( "" );
  183. }
  184. }
  185. return TRUE;
  186. }
  188. UINT AfxGetVariantID( CSPString strName, BOOL bWithParameter )
  189. {
  190. for( int nVariantID = SLH_MIN; nVariantID <= SLH_MAX; nVariantID ++ )
  191. {
  192. CSPString strTemp = AfxGetVariantName( nVariantID, bWithParameter );
  193. if( 0 == strTemp.CompareNoCase( strName ) )
  194. return nVariantID;
  195. }
  197. CIndexContainer & aindex = AfxGetProfile().GetSListColumnsUser();
  198. CIndex index = aindex.GetIndex( strName );
  199. if( !index.IsInvalidID() )
  200. return index.m_nID;
  202. return SLH_INVALID;
  203. }
  205. CSPString AfxGetVariantVarName( int nVariantID )
  206. {
  207. if( nVariantID >= SLH_MIN && nVariantID <= SLH_MAX )
  208. return slh_data_array[nVariantID].varname;
  209. else
  210. return "";
  211. }
  213. CSPString AfxGetVariantVarName( CSPString strName, BOOL bWithParameter )
  214. {
  215. UINT nVariantID = AfxGetVariantID( strName, bWithParameter );
  216. return AfxGetVariantVarName( nVariantID );
  217. }
  219. /* 计算股票列表视图中某一列的值，其数值单位与股票列表视图中相同 */
  220. BOOL AfxGetVariantValue(UINT nVariantID, CStockInfo &info, double * pValue,
  221. CStockContainer *pContainer )
  222. {
  223. if( NULL == pValue )
  224. {
  225. SP_ASSERT( FALSE );
  226. return FALSE;
  227. }
  229. double factor = 1; // CStock::GetReportFactor( info.m_reporttype );
  231. if( nVariantID >= SLH_MIN && nVariantID <= SLH_MAX )
  232. {
  233. switch( nVariantID )
  234. {
  235. case SLH_LASTCLOSE: // 昨收
  236. *pValue = info.m_fLast;
  237. return ( info.m_fLast > 1e-4 );
  238. case SLH_OPEN: // 今开
  239. *pValue = info.m_fOpen;
  240. return ( info.m_fOpen > 1e-4 );
  241. case SLH_CLOSE: // 收盘价
  242. *pValue = info.m_fClose;
  243. return ( info.m_fClose > 1e-4 );
  244. case SLH_HIGH: // 最高价
  245. *pValue = info.m_fHigh;
  246. return ( info.m_fHigh > 1e-4 );
  247. case SLH_LOW: // 最低价
  248. *pValue = info.m_fLow;
  249. return ( info.m_fLow > 1e-4 );
  250. case SLH_AVERAGE: // 均价
  251. return info.GetAverage( pValue );
  252. case SLH_DIFF: // 涨跌
  253. return info.GetDiff( pValue, info.m_datetech, AfxGetProfile().GetDiffDays() );
  254. case SLH_DIFFPERCENT: // 涨幅
  255. return info.GetDiffPercent( pValue, info.m_datetech, AfxGetProfile().GetDiffPercentDays() );
  256. case SLH_SCOPE: // 震幅
  257. return info.GetScope( pValue, info.m_datetech, AfxGetProfile().GetScopeDays() );
  258. case SLH_VOLUME: // 成交量
  259. *pValue = info.m_fVolume*0.01;
  260. return ( info.m_fVolume > 1e-4 );
  261. case SLH_AMOUNT: // 成交额
  262. *pValue = info.m_fAmount*0.001;
  263. return ( info.m_fAmount > 1e-4 );
  264. case SLH_VOLUP: // 外盘
  265. if( info.m_minute.StatVolumeInfo( NULL, pValue, NULL ) )
  266. {
  267. *pValue = (*pValue) * 0.01;
  268. return TRUE;
  269. }
  270. break;
  271. case SLH_VOLDOWN: // 内盘
  272. if( info.m_minute.StatVolumeInfo( NULL, NULL, pValue ) )
  273. {
  274. *pValue = (*pValue) * 0.01;
  275. return TRUE;
  276. }
  277. break;
  278. case SLH_DIFFPERCENT_MIN5: // 五分钟涨幅%
  279. return info.GetDiffPercentMin5( pValue );
  280. case SLH_SELLBUYRATIO: // 委比%
  281. return info.GetSellBuyRatio( pValue, NULL );
  282. case SLH_SELLBUYDIFF: // 委量差
  283. if( info.GetSellBuyRatio( NULL, pValue ) )
  284. {
  285. *pValue = (*pValue) * 0.01;
  286. return TRUE;
  287. }
  288. break;
  289. case SLH_BUYPRICE3: // 买价三
  290. *pValue = info.m_fBuyPrice[2];
  291. return ( info.m_fBuyPrice[2] > 1e-4 );
  292. case SLH_BUYPRICE2: // 买价二
  293. *pValue = info.m_fBuyPrice[1];
  294. return ( info.m_fBuyPrice[1] > 1e-4 );
  295. case SLH_BUYPRICE1: // 买价一
  296. *pValue = info.m_fBuyPrice[0];
  297. return ( info.m_fBuyPrice[0] > 1e-4 );
  298. case SLH_SELLPRICE1: // 卖价一
  299. *pValue = info.m_fSellPrice[0];
  300. return ( info.m_fSellPrice[0] > 1e-4 );
  301. case SLH_SELLPRICE2: // 卖价二
  302. *pValue = info.m_fSellPrice[1];
  303. return ( info.m_fSellPrice[1] > 1e-4 );
  304. case SLH_SELLPRICE3: // 卖价三
  305. *pValue = info.m_fSellPrice[2];
  306. return ( info.m_fSellPrice[2] > 1e-4 );
  307. case SLH_BUYVOLUME3: // 买量三
  308. *pValue = info.m_fBuyVolume[2] * 0.01;
  309. return ( info.m_fBuyVolume[2] > 1e-4 );
  310. case SLH_BUYVOLUME2: // 买量二
  311. *pValue = info.m_fBuyVolume[1] * 0.01;
  312. return ( info.m_fBuyVolume[1] > 1e-4 );
  313. case SLH_BUYVOLUME1: // 买量一
  314. *pValue = info.m_fBuyVolume[0] * 0.01;
  315. return ( info.m_fBuyVolume[0] > 1e-4 );
  316. case SLH_SELLVOLUME1: // 卖量一
  317. *pValue = info.m_fSellVolume[0] * 0.01;
  318. return ( info.m_fSellVolume[0] > 1e-4 );
  319. case SLH_SELLVOLUME2: // 卖量二
  320. *pValue = info.m_fSellVolume[1] * 0.01;
  321. return ( info.m_fSellVolume[1] > 1e-4 );
  322. case SLH_SELLVOLUME3: // 卖量三
  323. *pValue = info.m_fSellVolume[2] * 0.01;
  324. return ( info.m_fSellVolume[2] > 1e-4 );
  326. // 主要基本指标
  327. case SLH_PE: // 市盈率
  328. return info.GetPE( pValue );
  329. case SLH_PNETASSET: // 市净率
  330. return info.GetPNetAsset( pValue );
  331. case SLH_PMAININCOME: // 市销率
  332. return info.GetPMainIncome( pValue );
  333. case SLH_RATIO_PCASH: // 价格净现金比
  334. return info.GetRatioPCash( pValue );
  335. case SLH_RATIO_CURRENCY: // 流通率
  336. return info.GetRatioCurrency( pValue );
  337. case SLH_RATIO_CHANGEHAND: // 换手率
  338. return info.GetRatioChangeHand( pValue, info.m_datetech, AfxGetProfile().GetRatioChangeHandDays() );
  339. case SLH_RATIO_VOLUME: // 量比
  340. return info.GetRatioVolume( pValue, info.m_datetech, AfxGetProfile().GetRatioVolumeDays() );
  341. case SLH_RS: // 相对强度
  342. return info.GetRS( pValue, info.m_datetech, AfxGetProfile().GetRSDays() );
  343. case SLH_MARKETVALUE: // 总市值
  344. if( info.GetMarketValue( pValue ) )
  345. {
  346. *pValue = (*pValue) * 0.0001;
  347. return TRUE;
  348. }
  349. break;
  350. case SLH_MARKETVALUEA: // A股市值
  351. if( info.GetMarketValueA( pValue ) )
  352. {
  353. *pValue = (*pValue) * 0.0001;
  354. return TRUE;
  355. }
  356. break;
  357. case SLH_MARKETVALUEB: // B股市值
  358. if( info.GetMarketValueB( pValue ) )
  359. {
  360. *pValue = (*pValue) * 0.0001;
  361. return TRUE;
  362. }
  363. break;
  365. // ★偿债能力
  366. case SLH_RATIO_LIQUIDITY: // 流动比率
  367. *pValue = info.m_fRatio_liquidity;
  368. return ( fabs(info.m_fRatio_liquidity) > 1e-4 );
  369. case SLH_RATIO_QUICK: // 速动比率
  370. *pValue = info.m_fRatio_quick;
  371. return ( fabs(info.m_fRatio_quick) > 1e-4 );
  372. case SLH_VELOCITY_RECEIVABLES: // 应收帐款周率
  373. *pValue = info.m_fVelocity_receivables;
  374. return ( fabs(info.m_fVelocity_receivables) > 1e-4 );
  376. // ★经营能力
  377. case SLH_VELOCITY_MERCHANDISE: // 存货周转率
  378. *pValue = info.m_fVelocity_merchandise;
  379. return ( fabs(info.m_fVelocity_merchandise) > 1e-4 );
  380. case SLH_MAIN_INCOME: // 主营业务收入
  381. *pValue = factor * info.m_fMain_income * 0.0001;
  382. return ( fabs(info.m_fMain_income) > 1e-4 );
  383. case SLH_CASH_PS: // 每股净现金流量
  384. *pValue = factor * info.m_fCash_ps;
  385. return ( fabs(info.m_fCash_ps) > 1e-4 );
  387. // ★盈利能力
  388. case SLH_PROFIT_MARGIN: // 主营业务利润率
  389. *pValue = info.m_fProfit_margin;
  390. return ( fabs(info.m_fProfit_margin) > 1e-4 );
  391. case SLH_NETASSET_YIELD: // 净资产收益率
  392. *pValue = factor * info.m_fNetasset_yield;
  393. return ( fabs(info.m_fNetasset_yield) > 1e-4 );
  395. // ★资本结构
  396. case SLH_SHARE_COUNT_TOTAL: // 总股本
  397. *pValue = info.m_fShare_count_total * 0.0001;
  398. return ( info.m_fShare_count_total > 1e-4 );
  399. case SLH_SHARE_COUNT_A: // 流通A股
  400. *pValue = info.m_fShare_count_a * 0.0001;
  401. return TRUE;
  402. case SLH_SHARE_COUNT_B: // 流通B股
  403. *pValue = info.m_fShare_count_b * 0.0001;
  404. return TRUE;
  405. case SLH_SHARE_COUNT_H: // 流通H股
  406. *pValue = info.m_fShare_count_h * 0.0001;
  407. return TRUE;
  408. case SLH_SHARE_COUNT_NATIONAL: // 国有股
  409. *pValue = info.m_fShare_count_national * 0.0001;
  410. return TRUE;
  411. case SLH_SHARE_COUNT_CORP: // 法人股
  412. *pValue = info.m_fShare_count_corp * 0.0001;
  413. return TRUE;
  414. case SLH_PROFIT_PSUD: // 每股未分配利润
  415. *pValue = info.m_fProfit_psud;
  416. return TRUE;
  417. case SLH_ASSET: // 总资产
  418. *pValue = info.m_fAsset * 0.0001;
  419. return ( fabs(info.m_fAsset) > 1e-4 );
  420. case SLH_RATIO_HOLDERRIGHT: // 股东权益比率
  421. *pValue = info.m_fRatio_holderright;
  422. return ( fabs(info.m_fRatio_holderright) > 1e-4 );
  423. case SLH_RATIO_LONGDEBT: // 长期负债率
  424. *pValue = info.m_fRatio_longdebt;
  425. return TRUE;
  426. case SLH_RATIO_DEBT: // 资产负债率
  427. *pValue = info.m_fRatio_debt;
  428. return ( fabs(info.m_fRatio_debt) > 1e-4 );
  430. // ★投资收益能力
  431. case SLH_NETASSET_PS: // 每股净资产
  432. *pValue = info.m_fNetasset_ps;
  433. return ( fabs(info.m_fNetasset_ps) > 1e-4 );
  434. case SLH_NETASSET_PS_REGULATE: // 调整每股净资产
  435. *pValue = info.m_fNetasset_ps_regulate;
  436. return ( fabs(info.m_fNetasset_ps_regulate) > 1e-4 );
  437. case SLH_EPS: // 每股收益
  438. *pValue = factor * info.m_fEps;
  439. return ( fabs(info.m_fEps) > 1e-4 );
  440. case SLH_EPS_DEDUCT: // 扣除后每股收益
  441. *pValue = factor * info.m_fEps_deduct;
  442. return ( fabs(info.m_fEps_deduct) > 1e-4 );
  443. case SLH_NET_PROFIT: // 净利润
  444. *pValue = factor * info.m_fNet_profit * 0.0001;
  445. return ( fabs(info.m_fNet_profit) > 1e-4 );
  446. case SLH_MAIN_PROFIT: // 主营业务利润
  447. *pValue = factor * info.m_fMain_profit * 0.0001;
  448. return ( fabs(info.m_fMain_profit) > 1e-4 );
  449. case SLH_TOTAL_PROFIT: // 利润总额
  450. *pValue = factor * info.m_fTotal_profit * 0.0001;
  451. return ( fabs(info.m_fTotal_profit) > 1e-4 );
  452. case SLH_PROFIT_INC: // 主营利润增长率
  453. *pValue = info.m_fProfit_inc;
  454. return TRUE;
  455. case SLH_INCOME_INC: // 主营收入增长率
  456. *pValue = info.m_fIncome_inc;
  457. return TRUE;
  458. case SLH_ASSET_INC: // 总资产增长率
  459. *pValue = info.m_fAsset_inc;
  460. return TRUE;
  461. case SLH_ANNGAINS_AVERAGE: // 年平均收益率
  462. *pValue = info.m_fYield_average;
  463. return ( fabs(STKLIB_DATA_INVALID - info.m_fYield_average) > 1e-4 );
  464. case SLH_ANNGAINS_STDDEV: // 收益标准差
  465. *pValue = info.m_fYield_stddev;
  466. return ( fabs(STKLIB_DATA_INVALID - info.m_fYield_stddev) > 1e-4 );
  467. case SLH_BETA: // β值
  468. *pValue = info.m_fBeite;
  469. return ( fabs(STKLIB_DATA_INVALID - info.m_fBeite) > 1e-4 );
  470. case SLH_SHARP: // 夏普风险指数
  471. return info.GetXiapu( pValue );
  472. default: ;
  473. }
  474. }
  475. else if( nVariantID >= SLH_USERDEFINE_BEGIN )
  476. {
  477. BOOL bNoValue = FALSE;
  478. if( pContainer && pContainer->GetVariantSaveValue( pValue, nVariantID, info, &bNoValue ) )
  479. return !bNoValue;
  481. CIndexContainer & container = AfxGetProfile().GetSListColumnsUser();
  482. CIndex & index = container.GetIndex( nVariantID );
  483. BOOL bSuccess = index.GetExpressResult( pValue, info, &bNoValue, NULL );
  484. if( pContainer && pValue )
  485. pContainer->SetVariantSaveValue( *pValue, nVariantID, info, bNoValue );
  487. return bSuccess;
  488. }
  489. return FALSE;
  490. }
  492. int dwordcmp( DWORD dw1, DWORD dw2 )
  493. {
  494. if( dw1 > dw2 )
  495. return 1;
  496. else if( dw1 < dw2 )
  497. return -1;
  498. else
  499. return 0;
  500. }
  502. int longcmp( LONG l1, LONG l2 )
  503. {
  504. if( l1 > l2 )
  505. return 1;
  506. else if( l1 < l2 )
  507. return -1;
  508. else
  509. return 0;
  510. }
  512. int doublecmp( double d1, double d2 )
  513. {
  514. if( d1 > d2 )
  515. return 1;
  516. else if( d1 < d2 )
  517. return -1;
  518. else
  519. return 0;
  520. }
  522. int AfxCompareVariantValue( int nVariantID, CStockInfo & info1, CStockInfo &info2,
  523.     CStockContainer * pContainer )
  524. {
  525. long x1 = 0, x2 = 0;
  526. double d1 = 0., d2 = 0.;
  527. BOOL bGet1 = FALSE, bGet2 = FALSE;
  529. switch( nVariantID )
  530. {
  531. case SLH_CODE: // 股票代码
  532. return strcmp( info1.GetStockCode(), info2.GetStockCode() );
  533. case SLH_NAME: // 股票名称
  534. return strcmp( info1.GetStockName(), info2.GetStockName() );
  535. // 技术数据
  536. case SLH_DATE: // 日期
  537. return dwordcmp( info1.m_datetech, info2.m_datetech );
  538. case SLH_DATE_BEGIN: // 上市日期
  539. return dwordcmp( info1.m_datebegin, info2.m_datebegin );
  540. // 主要基本指标
  541. case SLH_REPORTTYPE: // 报表类型
  542. return dwordcmp( info1.m_reporttype, info2.m_reporttype );
  543. case SLH_PE: // 市盈率
  544. case SLH_PNETASSET: // 市净率
  545. case SLH_PMAININCOME: // 市销率
  546. case SLH_RATIO_PCASH: // 价格净现金比
  547. bGet2 = AfxGetVariantValue( nVariantID, info2, &d2, pContainer );
  548. bGet1 = AfxGetVariantValue( nVariantID, info1, &d1, pContainer );
  549. if( !bGet2 && !bGet1 )
  550. return 0;
  551. if( !bGet2 ) return 1;
  552. if( !bGet1 ) return -1;
  553. if( d1 < 0 && d2 < 0 )
  554. return doublecmp( d1, d2 );
  555. if( d1 < 0 ) return 1;
  556. if( d2 < 0 ) return -1;
  557. return doublecmp( d1, d2 );
  558. case SLH_TRADE: // 行业
  559. return strcmp( info1.GetStockDomain(), info2.GetStockDomain() );
  560. case SLH_PROVINCE: // 省份
  561. return strcmp( info1.GetStockProvince(), info2.GetStockProvince() );
  562. default:
  563. bGet2 = AfxGetVariantValue( nVariantID, info2, &d2, pContainer );
  564. bGet1 = AfxGetVariantValue( nVariantID, info1, &d1, pContainer );
  565. if( !bGet2 && !bGet1 )
  566. return 0;
  567. if( !bGet2 ) return 1;
  568. if( !bGet1 ) return -1;
  569. return doublecmp( d1, d2 );
  570. }
  572. return 0;
  573. }
  575. CSPString AfxGetVariantDispString(UINT nVariantID, CStockInfo &info,
  576. CStockContainer * pContainer )
  577. {
  578. CSPString strTemp;
  579. int x = 0;
  580. double dTemp = 0;
  582. switch( nVariantID )
  583. {
  584. case SLH_CODE: // 股票代码
  585. strTemp = info.GetStockCode();
  586. break;
  587. case SLH_NAME: // 股票名称
  588. strTemp = info.GetStockName();
  589. break;
  590. // 技术数据
  591. case SLH_DATE: // 日期
  592. if( 0 != info.m_datetech )
  593. strTemp.Format( "%.2d/%.2d/%.2d", (info.m_datetech/10000)%100, (info.m_datetech%10000)/100, info.m_datetech%100 );
  594. break;
  595. case SLH_DATE_BEGIN: // 上市日期
  596. if( 0 != info.m_datebegin )
  597. strTemp.Format( "%.2d/%.2d/%.2d", (info.m_datebegin/10000)%100, (info.m_datebegin%10000)/100, info.m_datebegin%100 );
  598. break;
  599. case SLH_LASTCLOSE: // 昨收
  600. case SLH_OPEN: // 今开
  601. case SLH_CLOSE: // 收盘价
  602. case SLH_HIGH: // 最高价
  603. case SLH_LOW: // 最低价
  604. case SLH_AVERAGE: // 均价
  605. case SLH_DIFF: // 涨跌
  606. case SLH_BUYPRICE3: // 买价三
  607. case SLH_BUYPRICE2: // 买价二
  608. case SLH_BUYPRICE1: // 买价一
  609. case SLH_SELLPRICE1: // 卖价一
  610. case SLH_SELLPRICE2: // 卖价二
  611. case SLH_SELLPRICE3: // 卖价三
  612. if( AfxGetVariantValue( nVariantID, info, &dTemp, pContainer ) )
  613. {
  614. CSPString strPriceFmt;
  615. strPriceFmt.Format( "%%.%df", info.DigitBit() );
  616. strTemp.Format( strPriceFmt, dTemp );
  617. }
  618. break;
  619. case SLH_VOLUME: // 成交量
  620. case SLH_AMOUNT: // 成交额
  621. case SLH_VOLUP: // 外盘
  622. case SLH_VOLDOWN: // 内盘
  623. case SLH_SELLBUYDIFF: // 委量差
  624. case SLH_BUYVOLUME3: // 买量三
  625. case SLH_BUYVOLUME2: // 买量二
  626. case SLH_BUYVOLUME1: // 买量一
  627. case SLH_SELLVOLUME1: // 卖量一
  628. case SLH_SELLVOLUME2: // 卖量二
  629. case SLH_SELLVOLUME3: // 卖量三
  630. case SLH_MARKETVALUE: // 总市值
  631. case SLH_MARKETVALUEA: // A股市值
  632. case SLH_MARKETVALUEB: // B股市值
  633. case SLH_SHARE_COUNT_TOTAL: // 总股本
  634. case SLH_SHARE_COUNT_A: // 流通A股
  635. case SLH_SHARE_COUNT_B: // 流通B股
  636. case SLH_SHARE_COUNT_H: // 流通H股
  637. case SLH_SHARE_COUNT_NATIONAL: // 国有股
  638. case SLH_SHARE_COUNT_CORP: // 法人股
  639. if( AfxGetVariantValue( nVariantID, info, &dTemp, pContainer ) )
  640. strTemp.Format( "%.0f", dTemp );
  641. break;
  642. case SLH_MAIN_INCOME: // 主营业务收入
  643. case SLH_ASSET: // 总资产
  644. case SLH_NET_PROFIT: // 净利润
  645. case SLH_MAIN_PROFIT: // 主营业务利润
  646. case SLH_TOTAL_PROFIT: // 利润总额
  647. if( AfxGetVariantValue( nVariantID, info, &dTemp, pContainer ) )
  648. strTemp.Format( "%.0f", dTemp );
  649. break;
  650. case SLH_REPORTTYPE: // 报表类型
  651. strTemp = AfxGetReportTypeString( info.m_reporttype );
  652. break;
  653. case SLH_TRADE: // 行业
  654. strTemp = info.GetStockDomain();
  655. break;
  656. case SLH_PROVINCE: // 省份
  657. strTemp = info.GetStockProvince();
  658. break;
  659. default:
  660. if( AfxGetVariantValue( nVariantID, info, &dTemp, pContainer ) )
  661. strTemp.Format( "%.2f", dTemp );
  662. }
  664. if( strTemp.IsEmpty() )
  665. strTemp = "-";
  667. return strTemp;
  668. }
  670. COLORREF AfxGetVariantColor( UINT nVariantID, CStockInfo &info )
  671. {
  672. int x = 0;
  673. double dTemp = 0;
  674. COLORREF crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  676. if( nVariantID < SLH_MIN || nVariantID > SLH_MAX )
  677. return crText;
  679. switch( nVariantID )
  680. {
  681. case SLH_CODE: // 股票代码
  682. crText = AfxGetProfile().GetColor(CColorClass::clrTitle);
  683. break;
  684. case SLH_NAME: // 股票名称
  685. crText = AfxGetProfile().GetColor(CColorClass::clrTitle);
  686. break;
  687. case SLH_OPEN: // 今开
  688. if( info.m_fOpen > info.m_fLast )
  689. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  690. else if( info.m_fOpen < info.m_fLast )
  691. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  692. break;
  693. case SLH_CLOSE: // 收盘价
  694. if( info.m_fClose > info.m_fLast )
  695. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  696. else if( info.m_fClose < info.m_fLast )
  697. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  698. break;
  699. case SLH_HIGH: // 最高价
  700. if( info.m_fHigh > info.m_fLast )
  701. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  702. else if( info.m_fHigh < info.m_fLast )
  703. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  704. break;
  705. case SLH_LOW: // 最低价
  706. if( info.m_fLow > info.m_fLast )
  707. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  708. else if( info.m_fLow < info.m_fLast )
  709. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  710. break;
  711. case SLH_AVERAGE: // 均价
  712. if( info.GetAverage( &dTemp ) )
  713. {
  714. if( dTemp - info.m_fLast > 1e-4 )
  715. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  716. else if( dTemp - info.m_fLast < -1e-4 )
  717. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  718. }
  719. break;
  720. case SLH_DIFF: // 涨跌
  721. if( info.GetDiff( &dTemp, info.m_datetech, AfxGetProfile().GetDiffPercentDays() ) )
  722. {
  723. if( dTemp > 1e-4 )
  724. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  725. else if( dTemp < -1e-4 )
  726. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  727. }
  728. break;
  729. case SLH_DIFFPERCENT: // 涨幅
  730. if( info.GetDiffPercent( &dTemp, info.m_datetech, AfxGetProfile().GetDiffPercentDays() ) )
  731. {
  732. if( dTemp > 1e-4 )
  733. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  734. else if( dTemp < -1e-4 )
  735. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  736. }
  737. break;
  738. case SLH_VOLUME: // 成交量
  739. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  740. break;
  741. case SLH_AMOUNT: // 成交额
  742. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  743. break;
  745. case SLH_VOLUP: // 外盘
  746. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  747. break;
  748. case SLH_VOLDOWN: // 内盘
  749. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  750. break;
  751. case SLH_DIFFPERCENT_MIN5: // 五分钟涨幅%
  752. if( info.GetDiffPercentMin5( &dTemp ) )
  753. {
  754. if( dTemp > 1e-4 )
  755. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  756. else if( dTemp < -1e-4 )
  757. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  758. }
  759. break;
  761. case SLH_SELLBUYRATIO: // 委比%
  762. case SLH_SELLBUYDIFF: // 委量差
  763. if( info.GetSellBuyRatio( &dTemp, NULL ) )
  764. {
  765. if( dTemp > 1e-4 )
  766. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  767. else if( dTemp < -1e-4 )
  768. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  769. }
  770. break;
  772. case SLH_BUYPRICE3: // 买价三
  773. if( info.m_fBuyPrice[2] > info.m_fLast )
  774. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  775. else if( info.m_fBuyPrice[2] < info.m_fLast )
  776. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  777. break;
  778. case SLH_BUYPRICE2: // 买价二
  779. if( info.m_fBuyPrice[1] > info.m_fLast )
  780. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  781. else if( info.m_fBuyPrice[1] < info.m_fLast )
  782. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  783. break;
  784. case SLH_BUYPRICE1: // 买价一
  785. if( info.m_fBuyPrice[0] > info.m_fLast )
  786. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  787. else if( info.m_fBuyPrice[0] < info.m_fLast )
  788. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  789. break;
  790. case SLH_SELLPRICE1: // 卖价一
  791. if( info.m_fSellPrice[0] > info.m_fLast )
  792. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  793. else if( info.m_fSellPrice[0] < info.m_fLast )
  794. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  795. break;
  796. case SLH_SELLPRICE2: // 卖价二
  797. if( info.m_fSellPrice[1] > info.m_fLast )
  798. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  799. else if( info.m_fSellPrice[1] < info.m_fLast )
  800. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  801. break;
  802. case SLH_SELLPRICE3: // 卖价三
  803. if( info.m_fSellPrice[2] > info.m_fLast )
  804. crText = AfxGetProfile().GetColor(CColorClass::clrRise);
  805. else if( info.m_fSellPrice[2] < info.m_fLast )
  806. crText = AfxGetProfile().GetColor(CColorClass::clrFall);
  807. break;
  809. case SLH_BUYVOLUME3: // 买量三
  810. case SLH_BUYVOLUME2: // 买量二
  811. case SLH_BUYVOLUME1: // 买量一
  812. case SLH_SELLVOLUME1: // 卖量一
  813. case SLH_SELLVOLUME2: // 卖量二
  814. case SLH_SELLVOLUME3: // 卖量三
  815. case SLH_SCOPE:
  816. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  817. break;
  819. // 主要基本指标
  820. case SLH_REPORTTYPE: // 报表类型
  821. crText = AfxGetProfile().GetColor(CColorClass::clrTitle);
  822. break;
  824. case SLH_PE: // 市盈率
  825. case SLH_PNETASSET: // 市净率
  826. case SLH_PMAININCOME: // 市销率
  827. case SLH_RATIO_PCASH: // 价格净现金比
  828. case SLH_RATIO_CURRENCY: // 流通率
  829. case SLH_RATIO_CHANGEHAND: // 换手率
  830. case SLH_RATIO_VOLUME: // 量比
  831. case SLH_RS: // 相对强度
  832. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  833. break;
  835. case SLH_MARKETVALUE: // 总市值
  836. case SLH_MARKETVALUEA: // A股市值
  837. case SLH_MARKETVALUEB: // B股市值
  838. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  839. break;
  841. // ★偿债能力
  842. case SLH_RATIO_LIQUIDITY: // 流动比率
  843. case SLH_RATIO_QUICK: // 速动比率
  844. case SLH_VELOCITY_RECEIVABLES: // 应收帐款周率
  845. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  846. break;
  848. // ★经营能力
  849. case SLH_VELOCITY_MERCHANDISE: // 存货周转率
  850. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  851. break;
  852. case SLH_MAIN_INCOME: // 主营业务收入
  853. case SLH_CASH_PS: // 每股净现金流量
  854. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  855. break;
  856. // ★盈利能力
  857. case SLH_PROFIT_MARGIN: // 主营业务利润率
  858. case SLH_NETASSET_YIELD: // 净资产收益率
  859. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  860. break;
  862. // ★资本结构
  863. case SLH_SHARE_COUNT_TOTAL: // 总股本
  864. case SLH_SHARE_COUNT_A: // 流通A股
  865. case SLH_SHARE_COUNT_B: // 流通B股
  866. case SLH_SHARE_COUNT_H: // 流通H股
  867. case SLH_SHARE_COUNT_NATIONAL: // 国有股
  868. case SLH_SHARE_COUNT_CORP: // 法人股
  869. case SLH_PROFIT_PSUD: // 每股未分配利润
  870. case SLH_ASSET: // 总资产
  871. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  872. break;
  873. case SLH_RATIO_HOLDERRIGHT: // 股东权益比率
  874. case SLH_RATIO_LONGDEBT: // 长期负债率
  875. case SLH_RATIO_DEBT: // 资产负债率
  876. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  877. break;
  879. // ★投资收益能力
  880. case SLH_NETASSET_PS: // 每股净资产
  881. case SLH_NETASSET_PS_REGULATE: // 调整每股净资产
  882. case SLH_EPS: // 每股收益
  883. case SLH_EPS_DEDUCT: // 扣除后每股收益
  884. case SLH_NET_PROFIT: // 净利润
  885. case SLH_MAIN_PROFIT: // 主营业务利润
  886. case SLH_TOTAL_PROFIT: // 利润总额
  887. crText = AfxGetProfile().GetColor(CColorClass::clrText);
  888. break;
  889. case SLH_PROFIT_INC: // 主营利润增长率
  890. case SLH_INCOME_INC: // 主营收入增长率
  891. case SLH_ASSET_INC: // 总资产增长率
  892. case SLH_ANNGAINS_AVERAGE: // 年平均收益率
  893. case SLH_ANNGAINS_STDDEV: // 收益标准差
  894. case SLH_BETA: // β值
  895. case SLH_SHARP: // 夏普风险指数
  896. crText = AfxGetProfile().GetColor(CColorClass::clrPlane);
  897. break;
  898. case SLH_TRADE: // 行业
  899. case SLH_PROVINCE: // 省份
  900. crText = AfxGetProfile().GetColor(CColorClass::clrTitle);
  901. break;
  902. default: ;
  903. }
  905. return crText;
  906. }
  908. //////////////////////////////////////////////////////////////////////
  909. // CExpress
  911. CExpress::CExpress( )
  912. {
  913. m_bIsModified = FALSE;
  914. m_nReserved = 0;
  915. }
  917. CExpress::CExpress( const CExpress &src )
  918. {
  919. *this = src;
  920. }
  922. CExpress::~CExpress( )
  923. {
  924. }
  926. CExpress &CExpress::operator = ( const CExpress &src )
  927. {
  928. m_strExpressOrg = src.m_strExpressOrg;
  929. m_strExpress = src.m_strExpress;
  930. m_bIsModified = src.m_bIsModified;
  931. m_nReserved = src.m_nReserved;
  932. return *this;
  933. }
  935. void CExpress::Serialize( CSPArchive &ar )
  936. {
  937. if( ar.IsStoring() )
  938. {
  939. ar << m_strExpressOrg;
  940. ar << m_nReserved;
  941. }
  942. else
  943. {
  944. ar >> m_strExpressOrg;
  945. ar >> m_nReserved;
  947. m_bIsModified = TRUE;
  948. m_strExpress = m_strExpressOrg;
  949. }
  950. }
  952. BOOL CExpress::SetExpressString( CSPString strExpressOrg )
  953. {
  954. m_strExpressOrg = strExpressOrg;
  956. m_bIsModified = TRUE;
  957. m_strExpress = m_strExpressOrg;
  958. return TRUE;
  959. }
  961. CSPString CExpress::GetExpressString( )
  962. {
  963. return m_strExpressOrg;
  964. }
  966. CSPString CExpress::GetLastErrorMsg( )
  967. {
  968. if( m_parser.IsError() )
  969. {
  970. int nErrorCode = m_parser.GetErrorCode( );
  971. switch( nErrorCode )
  972. {
  973. case MP_ErrParserStack: return express_errparserstack; break;
  974. case MP_ErrBadRange: return express_errbadrange; break;
  975. case MP_ErrExpression: return express_errexpression; break;
  976. case MP_ErrOperator: return express_erroperator; break;
  977. case MP_ErrOpenParen: return express_erropenparen; break;
  978. case MP_ErrOpCloseParen:return express_errcloseparen; break;
  979. case MP_ErrInvalidNum: return express_errinvalidnum; break;
  980. case MP_ErrMath: return express_errmath; break;
  981. default: return express_errunknown;
  982. }
  983. }
  984. return "";
  985. }
  987. BOOL CExpress::GetExpressResult( double * pResult, BOOL * pError )
  988. {
  989. if( !PreCompile( ) )
  990. {
  991. if( pError ) *pError = TRUE;
  992. return FALSE;
  993. }
  995. if( !InitParser( ) )
  996. {
  997. if( pError ) *pError = TRUE;
  998. return FALSE;
  999. }
  1001. m_parser.Parse( );
  1002. if( pError )
  1003. *pError = m_parser.IsError( );
  1004. if( m_parser.IsError() )
  1005. return FALSE;
  1007. if( pResult )
  1008. *pResult = m_parser.GetResult( );
  1009. return TRUE;
  1010. }
  1012. // 去掉空格、冒号、回车、换行等字符
  1013. BOOL CExpress::PreCompile( )
  1014. {
  1015. if( m_bIsModified )
  1016. {
  1017. CSPString sTemp = m_strExpress;
  1018. m_strExpress.Empty();
  1019. for( int i=0; i<sTemp.GetLength(); i++ )
  1020. {
  1021. TCHAR ch = sTemp[i];
  1022. if( ':' != ch && ' ' != ch && 't' != ch 
  1023. && 'r' != ch && 'n' != ch )
  1024. m_strExpress += ch;
  1025. }
  1027. m_bIsModified = FALSE;
  1028. }
  1029. return m_strExpress.GetLength() > 0;
  1030. }
  1032. // 初始化m_parser变量
  1033. BOOL CExpress::InitParser( )
  1034. {
  1035. m_parser.SetParserString( m_strExpress );
  1036. m_parser.InitVarMap( 10 );
  1037. /* examples
  1038. for( int i=0; i<nCount; i++ )
  1039. {
  1040. m_parser.AddVar( dValue, strName );
  1041. }
  1042. */
  1043. return TRUE;
  1044. }
  1047. /////////////////////////////////////////////////////////////////////////////
  1048. // CIndex
  1050. CIndex::CIndex( )
  1051. {
  1052. m_nID = SLH_INVALID;
  1053. }
  1055. CIndex::CIndex( const CIndex &src )
  1056. {
  1057. *this = src;
  1058. }
  1060. CIndex::~CIndex( )
  1061. {
  1062. }
  1064. CIndex &CIndex::operator = ( const CIndex &src )
  1065. {
  1066. *((CExpress *)this) = *((CExpress *)&src);
  1067. m_nID = src.m_nID;
  1068. m_strName = src.m_strName;
  1069. m_strDescript = src.m_strDescript;
  1070. m_strReserved = src.m_strReserved;
  1072. m_adwVariant.Copy( src.m_adwVariant );
  1073. return *this;
  1074. }
  1076. void CIndex::Serialize( CSPArchive & ar )
  1077. {
  1078. CExpress::Serialize( ar );
  1080. if( ar.IsStoring() )
  1081. {
  1082. ar << m_nID;
  1083. ar << m_strName;
  1084. ar << m_strDescript;
  1085. ar << m_strReserved;
  1086. }
  1087. else
  1088. {
  1089. ar >> m_nID;
  1090. ar >> m_strName;
  1091. ar >> m_strDescript;
  1092. ar >> m_strReserved;
  1093. }
  1094. }
  1096. BOOL CIndex::IsInvalidID( )
  1097. {
  1098. return SLH_INVALID == m_nID;
  1099. }
  1101. BOOL CIndex::SetNextID( )
  1102. {
  1103. CIndexContainer &container = AfxGetProfile().GetSListColumnsUser();
  1104. m_nID = container.GetNextID( );
  1105. return TRUE;
  1106. }
  1108. BOOL CIndex::PreCompile( )
  1109. {
  1110. if( m_bIsModified )
  1111. {
  1112. // 缓存变量ID
  1113. m_adwVariant.RemoveAll();
  1115. // 将中文变量名替换成英文名
  1116. CSPStringArray astrVarName;
  1117. if( AfxGetVariantNameArray(astrVarName,FALSE) )
  1118. {
  1119. CSPDWordArray adwSortID;
  1120. astrVarName.GetSortIDArray( adwSortID );
  1121. for( int i=adwSortID.GetSize()-1; i>=0; i-- )
  1122. {
  1123. UINT nVariantID = adwSortID.GetAt(i);
  1124. if( strlen(slh_data_array[nVariantID].varname) > 0 )
  1125. {
  1126. if( m_strExpress.Replace( AfxGetVariantName(nVariantID,FALSE), slh_data_array[nVariantID].varname ) > 0 )
  1127. m_adwVariant.Add(nVariantID);
  1128. }
  1129. }
  1130. }
  1132. if( !CExpress::PreCompile( ) )
  1133. return FALSE;
  1135. m_bIsModified = FALSE;
  1136. }
  1137. return m_strExpress.GetLength() > 0;
  1138. }
  1140. // 初始化m_parser变量
  1141. BOOL CIndex::InitParser( CStockInfo &info, BOOL *pVariantNoValue )
  1142. {
  1143. if( pVariantNoValue )
  1144. *pVariantNoValue = FALSE;
  1146. m_parser.SetParserString( m_strExpress );
  1147. m_parser.InitVarMap( SLH_MAX );
  1149. for( int i=0; i<m_adwVariant.GetSize(); i++ )
  1150. {
  1151. UINT nVariantID = m_adwVariant.ElementAt(i);
  1153. // 加入变量及其值
  1154. double value = 1.0;
  1155. if( !AfxGetVariantValue( nVariantID, info, &value, NULL ) && pVariantNoValue )
  1156. *pVariantNoValue = TRUE;
  1157. m_parser.AddVar( value, slh_data_array[nVariantID].varname );
  1158. }
  1159. return TRUE;
  1160. }
  1162. BOOL CIndex::CheckExpressValid( )
  1163. {
  1164. CStockInfo info;
  1165. BOOL bError = FALSE;
  1166. double temp = 0;
  1167. GetExpressResult( &temp, info, NULL, &bError );
  1168. return !bError;
  1169. }
  1171. BOOL CIndex::GetExpressResult( double * pResult, CStockInfo &info, BOOL *pVariantNoValue, BOOL * pError )
  1172. {
  1173. if( !PreCompile( ) )
  1174. {
  1175. if( pVariantNoValue ) *pVariantNoValue = FALSE;
  1176. if( pError ) *pError = TRUE;
  1177. return FALSE;
  1178. }
  1180. BOOL bVariantNoValue = FALSE;
  1181. if( !InitParser( info, &bVariantNoValue ) )
  1182. {
  1183. if( pVariantNoValue ) *pVariantNoValue = bVariantNoValue;
  1184. if( pError ) *pError = TRUE;
  1185. return FALSE;
  1186. }
  1187. if( pVariantNoValue ) *pVariantNoValue = bVariantNoValue;
  1189. m_parser.Parse( );
  1190. if( pError )
  1191. *pError = m_parser.IsError( );
  1192. if( m_parser.IsError() )
  1193. return FALSE;
  1195. if( bVariantNoValue )
  1196. return FALSE;
  1198. if( pResult )
  1199. *pResult = m_parser.GetResult( );
  1200. return TRUE;
  1201. }
  1203. /////////////////////////////////////////////////////////////////////////////
  1204. // CIndexContainer
  1206. CIndexContainer::CIndexContainer( )
  1207. {
  1208. }
  1210. CIndexContainer::~CIndexContainer( )
  1211. {
  1212. RemoveAll( );
  1213. }
  1215. void CIndexContainer::RemoveIndex( UINT nID )
  1216. {
  1217. for( int i=0; i<GetSize(); i++ )
  1218. {
  1219. CIndex & col = ElementAt(i);
  1220. if( nID == col.m_nID )
  1221. {
  1222. RemoveAt( i );
  1223. return;
  1224. }
  1225. }
  1226. }
  1228. CIndex & CIndexContainer::GetIndex( UINT nID )
  1229. {
  1230. static CIndex idx;
  1231. for( int i=0; i<GetSize(); i++ )
  1232. {
  1233. CIndex & col = ElementAt(i);
  1234. if( nID == col.m_nID )
  1235. return col;
  1236. }
  1237. return idx;
  1238. }
  1240. CIndex & CIndexContainer::GetIndex( CSPString strName )
  1241. {
  1242. static CIndex idx;
  1243. for( int i=0; i<GetSize(); i++ )
  1244. {
  1245. CIndex & index = ElementAt(i);
  1246. if( 0 == strName.Compare( index.m_strName ) )
  1247. return index;
  1248. }
  1249. return idx;
  1250. }
  1252. BOOL CIndexContainer::EditIndex( CIndex &indexEdit )
  1253. {
  1254. for( int i=0; i<GetSize(); i++ )
  1255. {
  1256. CIndex & index = ElementAt(i);
  1257. if( indexEdit.m_nID == index.m_nID )
  1258. {
  1259. index = indexEdit;
  1260. return TRUE;
  1261. }
  1262. }
  1263. return FALSE;
  1264. }
  1266. UINT CIndexContainer::GetNextID( )
  1267. {
  1268. UINT nID = SLH_USERDEFINE_BEGIN;
  1269. for( int i=0; i<GetSize(); i++ )
  1270. {
  1271. CIndex & index = ElementAt(i);
  1272. if( index.m_nID >= nID )
  1273. {
  1274. nID = index.m_nID + 1;
  1275. }
  1276. }
  1277. return nID;
  1278. }
  1280. void CIndexContainer::FileSerialize( CSPArchive & ar )
  1281. {
  1282. if( ar.IsStoring() )
  1283. {
  1284. ar << GetSize();
  1285. for( int i=0; i<GetSize(); i++ )
  1286. {
  1287. CIndex & col = ElementAt(i);
  1288. col.Serialize( ar );
  1289. }
  1290. }
  1291. else
  1292. {
  1293. int size;
  1295. ar >> size;
  1296. SetSize( size );
  1297. for( int i=0; i<size; i++ )
  1298. {
  1299. CIndex col;
  1300. col.Serialize( ar );
  1301. SetAt( i, col );
  1302. }
  1303. }
  1304. }