要用多条SQL语句才能完成你的需求。
解决方案 »
- 为什么我用了Pascal的文本文件的操作函之后,程序第一次可以启动,第二次启动时会出现错误?
- 得到了WORD的DOCUMENTS对象,但是打不开WORD文件,怎么回事?
- ¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤求教 TToolBar 的 Customize Dialog 问题¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤¤
- delphi快捷键 大全 来了不后悔 好了就顶
- 我要用TreeView控件写程序,请问那里有个控件的教程或资料呢?
- 请问在DX系统控件,什么控件相当于delhpi的基础控件richMemo?我没有找到dxRichMemo.
- CombolBox的使用问题,
- 字符串处理???紧急
- 在dbgrid中,如何插入可視控件!在線等待!
- 请教一个TWebBrowser的动态窗口的问题
- urgent! I want the serial number of the pwin98SE!
- 一个高分的DELPHI问题!(HOT)
SORRY,不是故意卖关子,只是现在时间来不及了。
HALFDREAM
你什么时候有空?
declare lmy_cursor CURSOR
for
select b1,b2,b41....b512 from aopen lmy_cursor
declare @lmy_b1 char
declare @lmy_b2 char
declare @lmy_b41 int
declare @lmy_b42 int
...
...
...
declare @lmy_512 charfetch next from lmy_cursor into @lmy_b1,....@lmy_b512
WHILE (@@FETCH_STATUS <> -1)
begin
insert into b values(@lmy_b1,@lmy_b2,1,@lmy_b41,@lmy_b51)
insert into b values(@lmy_b1,@lmy_b2,2,@lmy_b42,@lmy_b52)
...
...
...
insert into b values(@lmy_b1,@lmy_b2,12,@lmy_b412,@lmy_b512)
end
close lmy_cursor
DEALLOCATE lmy_cursor
预先建一个辅助表:
C :
id ,c0, c1 ,c2 ,c3 ,c4,c11,c12
-----------------------
0 , 1 , 0 ,0 ,0 ,0 0 , 0
1 ,0 , 1 , 0, 0, 0 .......0 , 0
2 ,0 , 0 , 1, 0, 0 ..... 0 ,0
3 ,0 , 0 , 0, 1, 0 .......0 ,0
4 ,0 , 0 , 0, 0, 1 .....0 ,0
..........
..........
11 ,0 , 0 , 0 , 0 , 0 1 ,0
12 ,0 , 0 , 0 , 0 ,0 ........0 ,1有了这个表,就可以这样:
insert B(WARENO,WARENAME,CMONTH,SLJC,JEJC)
select A.b1,
A.b2,
C.id,
A.b40*C.c0+A.b41*C.c1+....+A.b412*C.c12,
A.b50*C.c0+A.b51*C.c1+....+A.b512*C.c12
from A,C
where C.id = :mouth
尽管看起来长了一点, 不过总体上还是比较简单的:)
在调试的时候, 可以先把INSERT那一行去掉看看结果是否正确.