如何在程序中用动态sql语句创建视图？急！在线等！

[ppyybb]

如何在程序中用动态sql语句创建视图？急！在线等！

[ppyybb]

[Quote=引用 10 楼 novicecj 的回复:]
SQL codeselect p_id, gx_name, hg_sum=sum(hg), bl_sum=sum(bl)fromtablewhere rdatebetween :ad_date1and :ad_date2groupby p_id, gx_name
PS. 没看明白d_id有什么用
[/Quote]
d_id是个部门编号

[jlwei888]

stringMysqlMysql = "CREATE TABLE Employee "&
+"(emp_id integer not null,"&
+"dept_id integer not null, "&
+"emp_fname char(10) not null, "&
+"emp_lname char(20) not null)"
EXECUTE IMMEDIATE :Mysql USING SQLCA;

[wag_enu]

动态SQL1

[pb8]

一楼的兄弟太快了，楼主要的是创建视图的....
stringMysqlMysql = "CREATE VIEW Employee "&
+"(emp_id,"&
+"dept_id , "&
+"emp_fname , "&
+"emp_lname ) AS SELECT ..."
EXECUTE IMMEDIATE :Mysql USING SQLCA;
需要注意的是，创建视图和创建表格还有点区别，
在创建表格时可以加一条判断语句
if not exists(select 1 from sysobjects where name='表格表' and xtype='U')
create tabel ...

但创建视图时不能这样，如果你的sql要重复执行，需要再执行创建视图的语句前再加一条判断是否存在，存在即删除的语句

if not exists(select 1 from sysobjects where name='视图' and xtype='V')
drop view ...

把上面的语句组成成字符串，再execute immediate 就可以了;

[dawugui]

[Quote=引用楼主 ppyybb 的回复:]
如何在程序中用动态sql语句创建视图？急！在线等！
[/Quote]

string Mysql
Mysql = "create view my_view as select * from tb where ..."
EXECUTE IMMEDIATE :Mysql USING SQLCA;

[ppyybb]

sqlca.autocommit=true
v_sql="Alter view report as"+&
"SELECT DISTINCT TOP 100 PERCENT dbo.w_input.d_id, dbo.w_input.p_id, dbo.w_gongxu.gx_name, "+&
" sum(dbo.w_input.amount) as hg, sum(dbo.w_inputs.amount) AS bl, dbo.w_com.w_name, "+&
"dbo.w_input.r_date"+&
"FROM dbo.w_input INNER JOIN"+&
"dbo.w_inputs ON dbo.w_input.autoid = dbo.w_inputs.autoid INNER JOIN"+&
"dbo.w_gongxu ON dbo.w_input.g_id = dbo.w_gongxu.g_id INNER JOIN "+&
"dbo.w_com ON dbo.w_inputs.w_id = dbo.w_com.w_id"+&
"where dbo.w_input.r_date between '"+string(b_date)+"' and '"+string(b_date)+"' "+&
"group by dbo.w_input.d_id, dbo.w_input.p_id, dbo.w_gongxu.gx_name, dbo.w_com.w_name, "+&
"dbo.w_input.r_date"+&
"ORDER BY dbo.w_input.p_id, dbo.w_gongxu.gx_name"
execute immediate :v_sql;
messagebox("",v_sql)
sqlca.autocommit=false
我的语句是这样的，但是运行的时候没起作用，请大家帮我看看

[fuxiaoyang13]

dingding

[pb8]

在execute immediate :v_sql;
后加判断一下messagebox(string(sqlca.sqlcode),sqlca.sqlerrtext)

[noviceCJ]

没必要用动态sql在PB中创建视图, 直接放到后台数据库中创建更好, 便于调试sql语句

[ppyybb]

现在有如下的一张表格，
字段说明：
p_id：产品名称
gx_name:工序名称 hg:
hg:产品合格数量
bl：产品不良数量
w_name:不良项目
r_date:输入日期
其中一个产品（p_id）对应多道工序（gx_name)
我想实现的是在程序中通过选择日期，来统计每个产品（即p_id)的每道工序的产品合格数量（即hg）和不良数量（即bl）之和。以下图为例,当我在程序中选定日期从‘2009-12-16’到‘2009-12-17’时：
我想实现的格式是
d_id p_id gx_name hg bl w_name

001006 XHD65 焊接 300 2 干检上漏
... ... ... ... ... ...
... ... ... ... ... ...

[noviceCJ]

select p_id, gx_name, hg_sum = sum(hg), bl_sum = sum(bl)
from table 
where rdate between :ad_date1 and :ad_date2 
group by p_id, gx_name

PS. 没看明白d_id有什么用