博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
[CRM]单据自定义后台更新T_BillControl中的FDataBind(wsh)
阅读量:4359 次
发布时间:2019-06-07

本文共 2086 字,大约阅读时间需要 6 分钟。

--单据自定义后台更新T_BillControl中的FDataBindif exists(select 1 from sysobjects where name = 'UP_BillControl_UpdateDataBind' and xtype = 'P')    drop proc UP_BillControl_UpdateDataBindGOCreate proc UP_BillControl_UpdateDataBind    @FBillName varchar(30),             --单据英文名称,例如:FeeCharge    @FCtrlName varchar(50) = null,      --需要修改控件DataBind对应的控件名称,例如:datagridview1column3    @FCtrlText varchar(50) = null,      --需要修改控件DataBind对应的文本名称,例如:合同号     @FDataBind varchar(200) = null,     --新的FDataBind内容    @FDataType int = -1,                --新的FDataType内容                            @FDataFrom varchar(8000) = null     --新的FDataFrom内容                                        as    declare @sql varchar(7000)    if((@FCtrlName is not null or @FCtrlText is not null) and (@FDataFrom is not null or @FDataBind is not null))    begin        set @sql = 'update T_BillControl set '        if(@FDataFrom is not null)                    set @sql = @sql + 'FDataFrom = ''' + @FDataFrom +''','        if(@FDataType > -1)                    set @sql = @sql + 'FDataType = ' + @FDataType +','        if(@FDataBind is not null)                    set @sql = @sql + 'FDataBind = ''' + @FDataBind +''','                set @sql = substring(@sql,0,len(@sql)) + ' where FControlID =('             +'select FControlID from T_BillControl a join T_BillType b on b.FBillTypeID = a.FBillTypeID where b.FName = '''            +@FBillName+''' and '        if(@FCtrlName is not null)                set @sql = @sql + ' a.FName = ''' + @FCtrlName + ''''        else if(@FCtrlText is not null)            set @sql = @sql + ' a.FText like ''%' + @FCtrlText + '%'''        set @sql = @sql + ')'        --select @sql        exec(@sql)            END GO                  --0003176: 费用报销单:"合同号"绑定不正确,录入合同号时,程序错误提示为"请先选择服务代码"。exec UP_BillControl_UpdateDataBind 'FeeCharge','datagridview1column3',null,'T_ChargeDetail.FContractID'--"外出服务单"的合同金额数据绑定为空,导致打开时,程序提示需要绑定。exec UP_BillControl_UpdateDataBind 'WCServiceBill',null,'合同余款','T_OutServiceBill.FContractBalance'

 

转载于:https://www.cnblogs.com/ldcrm/archive/2012/07/04/2576658.html

你可能感兴趣的文章
基于visual Studio2013解决C语言竞赛题之0707月份输出
查看>>
【leetcode】Triangle
查看>>
PostgreSQL9.1 with PostGIS 2.1.4 for mapping coordinates on linux/ubuntu 已经打包成deb 可下载...
查看>>
[LeetCode] Max Consecutive Ones
查看>>
redis缓存本地安装教程
查看>>
ALTER AVAILABILITY GROUP (Transact-SQL)
查看>>
探究X Window System运行原理与启动过程
查看>>
Arch 安装 gnome桌面
查看>>
SpringCloud学习笔记(9)----Spring Cloud Netflix之声明式 REST客户端 -Feign的使用
查看>>
Python的平凡之路(17)
查看>>
Git for Windows之使用SSH协议开通公钥免密登陆功能
查看>>
Identity Server4学习系列一
查看>>
计算机硬件-基础
查看>>
完成登录功能,用session记住用户名
查看>>
C++ code:剩余串排列
查看>>
网页播放器插件
查看>>
Python第三方库jieba(中文分词)入门与进阶(官方文档)
查看>>
【转】eclipse for java ee的tomcat配置(常见问题解决)
查看>>
QQMacMgr for Mac(腾讯电脑管家)安装
查看>>
特效:ListBox数据加载特效
查看>>