其中:SHACO.dbf为上海A股公司文件,STKCD为证券代码,STKNME为证券简称,CONME为公司名称,LISTDT为上市日期,ast.txt为生成的文本格式文件。
例2:查找汇率日期为19980701~19980716的汇率数据并且把结果形成文本格式文件。
(1)在“文件”菜单中选择“打开”命令,打开 C:\\CSMAR2000\\EXCHANGE.DBF文
件
(2)在“命令”窗口中键入:
SELECT TRDDT,RMBUSD,HKDRMB FROM C:\\CSMAR2000\\EXCHANGE.DBF WHERE TRDDT>=19990701 AND TRDDT<=19990716 TO FILE C:\\AST.TXT NOWAIT
打开C:\\AST.TXT文件,结果如下:
TRDDT RMBUSD HKDRMB 19990701 8.277300 0.937295 19990702 8.277300 0.940822 19990705 8.278300 0.941088 19990706 8.287000 0.941088 19990707 8.278300 0.937295 19990708 8.277600 0.937383 19990709 8.278500 0.937383 19990712 8.277700 0.937559 19990713 8.277600 0.937559 19990714 8.277500 0.937295 19990715 8.277300 0.937471 19990716 8.277400 0.937471
其中:exchange.dbf为汇率文件,TRDDT为汇率日期,RMBUSD为人民币对美元汇率,HKDRMB为港币对人民币汇率,ast.txt为生成的文本格式文件。
例3:查找于1991年之前在上海证券交易所上市的公司的证券代码、证券简称、公司名称、上市日期并且把结果形成DBF格式文件。
(1) 在“文件”菜单中选择“打开”命令,打开C:\\CSMAR2000\\SHACO.DBF文件
(2) 在“命令”窗口中键入:
SELECT STKCD,STKNME,CONME,LISTDT FROM C:\\CSMAR2000\\SHACO.DBF WHERE LISTDT<19910101 INTO DBF C:\\AST.DBF
打开C:\\AST.DBF文件,结果如下:
STKCD STKNME 600601 延中实业 600602 真 空电子 600651 飞 乐音响 600652 爱 使股份 600653 申华实业 600654 飞 乐股份 600655 豫 园商城 600656 浙江凤凰 CONME Shanghai Yanzhong Industrial Co. Ltd. Shanghai Vacuum Electron Devlces Co. Ltd. Feilo Acoustics co. Ltd. Shanghai Shanghai Ace co. Ltd. Shanghai Shenhua Industrial Co. Ltd. Shanghai Feilo Co. Ltd. Shanghai Yuyuan Tourist Mart Co. Ltd. Zhejiang Province Phoenix Chemical Co. Ltd. LISTDT 19901219 19901219 19901219 19901219 19901219 19901219 19901219 19901219
其中:SHACO.DBF为上海A股公司文件,STKCD为证券代码,STKNME为证券简称,
CONME为公司名称,LISTDT为上市日期,AST.DBF为生成的DBF格式文件。
2、程序调用
例4:查找证券代码为600602的上市公司在1993.08.02~1993.08.07期间的日收盘价、考虑现金红利再投资的日个股回报率并且把结果形成文本格式文件。
(1)在“文件”菜单中选择“新建”命令。 (2)在“新建”对话框中选择“程序”。 (3)单击“新建文件”按钮。
(4)在VISUAL FOXPRO打开的一个称为“程序1”的新窗口中,键入应用程
序。
(5)在“程序1”的新窗口中单击“运行”按钮(或Ctrl+E)执行。
程序内容:
USE C:\\CSMAR2000\\SHADALYR.DBF ; SELECT STKCD,TRDDT,CLSPRC,DRETWD; FROM C:\\CSMAR2000\\SHADALYR.DBF;
WHERE STKCD=\AND TRDDT<=19930808 AND TRDDT>=19930801; TO FILE C:\\AST.TXT。
打开C:\\AST.TXT文件,结果如下:
STKCD 600602 600602 600602 600602 600602
TRDDT CLSPRC 19930802 7.010 19930803 7.000 19930804 7.150 19930805 7.010 19930806 7.080
DRETWD
-0.052703 -0.001427 0.021429 -0.019580 0.009986
其中:SHADALYR.DBF为上海A股日个股回报率文件,STKCD为证券代码,TRDDT为交易日期,CLSPRC为日收盘价,DRETWD为考虑 现金红利再投资的日个股回报率,AST.TXT为文本格式文件。
例5:查找证券代码为600601和600603的上市公司在1999.07~1999.10期间的月交量、考虑现金
红利再投资的月个股回报率并且把结果形成DBF格式文件。
(1)在“文件”菜单中选择“新建”命令。 (2)在“新建”对话框中选择“程序”。 (3)单击“新建文件”按钮。
(4)在VISUAL FOXPRO打开的一个称为“程序1”的新窗口中,键入下面的程序。 (5)在“程序1”的新窗口中单击“运行”按钮(或Ctrl+E)执行。
程序内容:
USE C:\\CSMAR2000\\SHAMNTH.DBF;
SELECT STKCD,TRDMNT,NSHRTRD,MRETWD; WHERE (STKCD=\) AND TRDMNT<=199910 AND
TRDMNT>=199907;
FROM C:\\CSMAR2000\\SHAMNTH.DBF; INTO DBF C:\\AST.DBF。
打开C:\\AST.DBF文件,结果如下:
STKCD 600601 600601 600601 600601 600603 600603 600603 600603
TRDMNT 199907 199908 199909 199910 199907 199908 199909 199910 NSHRTRD 134353069 43904333 29871033 17630804 146226354 183256049 38729847 15525801 MRETWD -0.240615 -0.026741 -0.006495 -0.068039 -0.245545 0.160760 -0.089883 -0.068321 其中: SHAMNTH.DBF为上海A股月个股回报率文件,STKCD为证券代码,TRDMNT为交易月份,NSHRTRD为月交易量,MRETWD为考虑现金红利再投资的月个股回报率,AST.DBF为DBF格式文件。
例6:查找上证综合指数在1999.07.01~1999.07.10期间的最高指数、收盘指数、指数代码、指数回
报率并且把结果形成DBF格式文件。
(1)在“文件”菜单中选择“新建”命令。
(2)在“新建”对话框中选择“程序”。 (3)单击“新建文件”按钮。
(4)在VISUAL FOXPRO打开的一个称为“程序1”的新窗口中,键入下面的程序。 (5)在“程序1”的新窗口中单击“运行”按钮(或Ctrl+E)执行。
程序内容:
USE C:\\CSMAR2000\\INDEX.DBF;
SELECT INDEXCD,TRDDT,HIINDEX,CLSINDEX,RETINDEX;
WHERE INDEXCD=”999101” AND TRDDT<=19990710 AND;
TRDDT>=19990701;
FROM C:\\CSMAR2000\\INDEX.DBF; into dbf c:\\ast.dbf。
打开C:\\AST.DBF文件,结果如下:
IDXCD 999101 999101 999101 999101 999101 999101 999101
HIINDEX 1678.840 1620.540 1630.380 1580.230 1568.670 1591.130 1594.580 CLSINDEX 1560.790 1613.530 1581.820 1517.250 1568.650 1577.990 1584.750 RETINDEX -0.076144 0.033791 -0.019653 -0.040820 0.033877 0.005954 0.004284 TRDDT 19990701 19990702 19990705 19990706 19990707 19990708 19990709 其中: INDEX.DBF为指数文件,INDEXCD为指数代码,HIINDEX为最高指数,CLSINDEX为收盘指数,RETINDEX为指数回报率,TRDDT为交易日期,AST.DBF为DBF格式文
件。
表1 公司文件数据结构及处理说明
字段顺序 字段内容 1 国家代码 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 证券代码 证券简称 公司代码 公司全称 行业代码 行业名称 公司成立日期 上市日期 数据库最早交易记录的日期 数据库中交易数据的计量货币 股票发行溢价 招股价格 招股价格的计量货币 招股数量 股票面值的计量货币 招股日期 股票面值 区域码 公司活动情况 AB股交叉码 情况变动日 备注 字段名 Cuntrycd Stkcd Stknme Cocd Conme Indcd Indnme Estbdt Listdt Favaldt Curtrd Ipoprm Ipoprc Ipocur Nshripo Parvcur Ipodt Parval Sctcd Statco Crcd Statdt Commnt 字段类型 数值型 字符型 字符型 字符型 字符型 字符型 字符型 数值型 数值型 数值型 字符型 数值型 数值型 字符型 数值型 字符型 数值型 数值型 数值型 字符型 字符型 数值型 字符型 字段宽度 2 6 8 8 72 4 50 8 8 8 3 10 10 3 14 3 8 8 1 1 6 8 200 小数位数 0 0 0 0 0 0 0 0 0 0 0 0 4 0 0 0 0 3 0 0 0 0 0 字段说明 本数据库以10表示中国 上海A、B股以上交所公布的证券代码为准,深圳A、B股以深交所公布的证券代码前加上00 以交易所公布的中文简称为准 全部为空,留待日后扩充 以公司公布的英文名为准,部分缺少的暂时以拼音代替 0001=金融,0002=公用事业,0003=房地产,0004=综合,0005=工业,0006=商业 Finance=金融,Utilities=公用事业,Properties=房地产 Conglomerates=综合, Industrials=工业,Commerce=商业 以YYYYMMDD列示,年月日全部缺少以-9999表示,部分缺少在相应位置上以00表示,如1993年12月某日表示为19931200 同上 以YYYYMMDD列示 A股以人民币计价,上海B股以美元计价,深圳B股以港币计价 RMB=人民币,HKD=港币,USD=美元 本数据库暂时以-9999表示,留待日后扩充 缺少以-9999表示,计量单位:元/股 RMB=人民币,HKD=港币,USD=美元 计量单位:千股 缺少值以-9999表示 计量货币:人民币,计量单位:元,RMB=人民币 以YYYYMMDD表示,缺少以-9999表示 均为人民币1元 1=上海,2=深圳 全部为A=活动中 A股和B股的交叉码,指同时拥有A股和B股的公司的A(B)股对应的B(A)股代码 全部为空,留待日后扩充