PB 调用SQLSERVER 存储过程


DECLARE my_cursor CURSOR FOR
select * from dbo.fun_kpi_mould_mjzfjsl_detail(:as_year,:as_parameter) using sqlzk;
OPEN my_cursor ;

fetch my_cursor into :lc_m9,:ls_items,:lc_m1,:lc_m2,:lc_m3,:lc_m4,:lc_m5,:lc_m6,:lc_m7,:lc_m8;
do while sqlzk.sqlcode=0

ll_row=DW_2.EVENT PFC_ADDROW()
DW_2.object.item[ll_row] = ls_items
DW_2.object.allm1[ll_row] = lc_m1
DW_2.object.allm2[ll_row] = lc_m2
DW_2.object.allm3[ll_row] = lc_m3
DW_2.object.allm4[ll_row] = lc_m4
DW_2.object.allm5[ll_row] = lc_m5
DW_2.object.allm6[ll_row] = lc_m6
DW_2.object.allm7[ll_row] = lc_m7
DW_2.object.allm8[ll_row] = lc_m8
DW_2.object.allm9[ll_row] = lc_m9
fetch my_cursor into :lc_m9,:ls_items,:lc_m1,:lc_m2,:lc_m3,:lc_m4,:lc_m5,:lc_m6,:lc_m7,:lc_m8;
loop
close my_cursor ;


//DW_2.setsort( 'item d ')
//DW_2.Sort( )

//DW_2.setredraw(true)

disconnect using sqlzk; //断开连接
dw_2.show()


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM