set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go

--股票代碼生成文件函數
create function [dbo].[sp_makeStockFile](
@Ddeid varchar(20),
@Stockcode varchar(20) ,
@stockname varchar(20) ,
@Tradedate varchar(50),
@Newof varchar(20),
@Rateof varchar(20) ,
@Volumeof varchar(20),
@Changeof varchar(20),
@Ddx varchar(20) ,
@Ddy varchar(20) ,
@Ddz varchar(20) ,
@Sixtyddx varchar(20),
@Sixtyddy varchar(20) ,
@Tenof varchar(20) ,
@Continuous varchar(20),
@Mostin varchar(20),
@Mostout varchar(20) ,
@Bigin varchar(20) ,
@Bigout varchar(20),
@Smallin varchar(20) ,
@Smallout varchar(20) ,
@Buyinnum varchar(20),
@Selloutnum varchar(20) ,
@Closednum varchar(20),
@Eachnum varchar(20)
) returns int
as
begin
declare?? @err int,@rs varchar(2000),@filePath? varchar(2000),@fileName?? varchar(2000),@myyear?? varchar(100),@mymonth?? varchar(100),@myday?? varchar(100),@mytime varchar(100),@Location varchar(100)
set @rs=@Ddeid+','+@Stockcode+','+@stockname+','+@Tradedate+','+@Newof+','+@Rateof+','+@Volumeof+','+@Changeof+','+@Ddx+','+@Ddy+','+@Ddz+','+@Sixtyddx+','+@Sixtyddy+','+@Tenof+','+@Continuous+','+@Mostin+','+@Mostout+','+@Bigin+','+@Bigout+','+@Smallin+','+@Smallout+','+@Buyinnum+','+@Selloutnum+','+@Closednum+','+@Eachnum
set @myyear= rtrim(ltrim(SUBSTRING(@Tradedate,0,5)))
set @mymonth=rtrim(ltrim(SUBSTRING(@Tradedate,6,2)))
set @myday=rtrim(ltrim(SUBSTRING(@Tradedate,9,2)))
set @mytime=rtrim(ltrim(SUBSTRING(@Tradedate,11,6)))
--滬市股票
if @Stockcode>=600000
set @Location='SH'
else
set @Location='SZ' --深市股票
set @filePath='E:/stockdata/'+@Location+'/'+@myyear+'/'+@mymonth+'/'+@Stockcode
set @fileName='/'+@myday+'.dat'
set @err=dbo.sp_writeTextFile(@filePath,@fileName,@rs)
--生成快照
if(@mytime='15:00')
begin
set @err=dbo.sp_writeTextFile(@filePath,@fileName,@rs)
set @fileName='/'+@myday+'_snapshot.dat'
end

return @err
end

總結

以上是生活随笔為你收集整理的利用大智慧DDE数据生成每只股票的历史数据文件(SQLServer2005)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。