获取数据窗口所有字段的字段名
来源:互联网 发布:微软字体打包下载 mac 编辑:程序博客网 时间:2024/05/22 15:45
int li_value
long ll_i,ll_rowcount
string ls_usrid,ls_tooltip
decimal ldc_lastvalue
ll_rowcount = dw_1.rowcount( )
if ll_rowcount <= 0 then return
Int li_cnt,li_Count
String ls_ColName
Decimal ldc_Data
String ls_col[], ls_value[]
for ll_i = 1 to ll_rowcount
ls_usrid = dw_1.getitemstring(ll_i,'usr_id')
li_Count = Integer(dw_1.Describe("datawindow.column.count"))
For li_cnt = 6 To li_Count - 5
ls_ColName = dw_1.Describe("#"+String(li_cnt)+".name")//获取数据窗口的字段名称
If ls_ColName <> 'gwgz' AND ls_ColName <> 'qjj' AND ls_ColName <> 'wpbt' AND &
ls_ColName <> 'zfgjj' AND ls_ColName <> 'dkdj' AND ls_ColName <> 'fzf' AND &
// ld_gwgz = dw_1.getitemnumber(ll_i,'gwgz')//同上
ls_value = {String(ll_i),"rgb(0,250,0)"}
uf_setcell_color( dw_1, "background", "row", ls_col, ls_value )
// ls_tooltip = ls_ColName+".tooltip.tip='~tif(getrow()="+String(ll_i)+",~"上月金额:"+String(ldc_lastvalue,'#,##0.00')+"~",~"~")'"
// messagebox('',ls_tooltip)
ls_Title = dw_1.Describe(ls_ColName+"_t.text")
ls_value = {String(ll_i),"上月"+ls_Title+":"+String(ldc_lastvalue,'#,##0.00')}
uf_setcell_tooltip( dw_1, ls_col, ls_value )
END IF
long ll_i,ll_rowcount
string ls_usrid,ls_tooltip
decimal ldc_lastvalue
ll_rowcount = dw_1.rowcount( )
if ll_rowcount <= 0 then return
Int li_cnt,li_Count
String ls_ColName
Decimal ldc_Data
String ls_col[], ls_value[]
for ll_i = 1 to ll_rowcount
ls_usrid = dw_1.getitemstring(ll_i,'usr_id')
li_Count = Integer(dw_1.Describe("datawindow.column.count"))
For li_cnt = 6 To li_Count - 5
ls_ColName = dw_1.Describe("#"+String(li_cnt)+".name")//获取数据窗口的字段名称
If ls_ColName <> 'gwgz' AND ls_ColName <> 'qjj' AND ls_ColName <> 'wpbt' AND &
ls_ColName <> 'zfgjj' AND ls_ColName <> 'dkdj' AND ls_ColName <> 'fzf' AND &
ls_ColName <> 'ghhf' AND ls_ColName <> 'zfbt' Then Continue
//对需要的字段进行操作,不需要的字段直接跳过。
//数据窗口中所有的列名都可以按照select语句中出现的序号代替。
ldc_Data = Dec(dw_1.Object.Data[ll_i,li_cnt])//取当前行、当前字段的值// ld_gwgz = dw_1.getitemnumber(ll_i,'gwgz')//同上
li_value = f_gz_compare(ls_usrid,ls_ColName,ldc_Data,ld_date,ldc_lastvalue)//两张表比对。
IF li_value = 1 THEN
//返回为1的,修改对应行对应列的单元的颜色。
ls_col = {ls_ColName}ls_value = {String(ll_i),"rgb(0,250,0)"}
uf_setcell_color( dw_1, "background", "row", ls_col, ls_value )
// ls_tooltip = ls_ColName+".tooltip.tip='~tif(getrow()="+String(ll_i)+",~"上月金额:"+String(ldc_lastvalue,'#,##0.00')+"~",~"~")'"
// messagebox('',ls_tooltip)
// dw_1.modify( ls_tooltip )
//添加鼠标放置在单元格上时,显示的提示信息。
String ls_Titlels_Title = dw_1.Describe(ls_ColName+"_t.text")
ls_value = {String(ll_i),"上月"+ls_Title+":"+String(ldc_lastvalue,'#,##0.00')}
uf_setcell_tooltip( dw_1, ls_col, ls_value )
END IF
Next
next
- 获取数据窗口所有字段的字段名
- mysql获取表的所有字段名
- PB获取数据窗口字段列名和标题名
- mysql获取所有表的所有字段名
- 如何获取SQL Server所有的数据库名、表名、字段名及字段类型?
- SQL Server中获取所有数据库名、所有表名、所有字段名的SQL语句
- postgresql 获取所有表名、字段名、字段类型、注释
- C#获取MySQL数据库中的所有的表名和字段名及字段的数据类型
- mysql获取某个表的所有字段名
- mysql获取某个表的所有字段名
- mysql获取某个表的所有字段名
- mysql获取某个表的所有字段名
- mysql获取某个表的所有字段名
- laravel获取数据表中所有的字段名
- mysql获取某个表的所有字段名
- mysql获取某个表的所有字段名
- cassandra怎么获取所有表的字段名?
- SQL获取所有用户名,数据库名、所有表名、所有字段名及字段类型
- 分组对称加密模式:ECB/CBC/CFB/OFB
- 为Android安装BusyBox —— 完整的bash shell
- App模块化及工程扩展
- java读取目录下面指定文件
- 一步一步学习 iOS 5 编程
- 获取数据窗口所有字段的字段名
- 看世界,你选择哪扇窗户?
- List集合两种遍历效率问题
- Openssl建立SSL双向认证连接源码
- Unable to load configuration. - action - file:/F:/apache-tomcat-7.0.27/webapps/CRM/WEB-INF/classes/s
- 数据压缩在海量数据环境下意义
- python format string
- JS拖拽时粘住鼠标
- outlook 召回邮件 (zz)