【PB】getitemany
来源:互联网 发布:湖北省清单报价软件 编辑:程序博客网 时间:2024/06/10 19:04
/****************************************************************funtion GetItemAny(datawindow ids_ds,long al_row,string as_Column)*参数:datawindow ids_ds by value* long al_rowby value* string as_Columnby value*返回值类型:any*功能:读取指定数据窗口ids_ds中第al_row行中字段as_column中的值****************************************************************/Long ll_ColAny la_AIF al_Row > ids_ds.RowCount() THEN RETURN ""ll_Col = Long( ids_ds.Describe( as_Column + ".ID" ) )IF ll_Col > 0 THEN la_A = ids_ds.object.data.primary.current[ al_Row, ll_Col ]RETURN la_A