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()

原文地址:https://www.cnblogs.com/Bokeyan/p/12936831.html