以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请高手帮忙  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33401)

--  作者:良才
--  发布时间:2013/5/17 13:34:00
--  请高手帮忙
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目8.zip

请高手帮忙:教工标准工资是固定的,教工奖励工资每月都不一样,有的人有,有的人没有,每月只要输入教工奖励工资,点击按钮就可以生成教工工资。
--  作者:don
--  发布时间:2013/5/17 14:26:00
--  
Dim YM,SQL As String
YM = "2013-04"  \'自定义月份
SQL ="Select  a.教工编号, a.教工姓名,\'" & YM & "\' As 月份,基本工资,奖励工资,(iif(奖励工资 Is null,0,奖励工资)+基本工资) As 实领工资"
SQL+ =" From{教工标准工资} a Left  join (Select * From{教工奖励工资} where 月份 = \'" & YM & "\') b On a.教工编号 = b.教工编号"

DataTables("教工奖励工资").Save
DataTables("教工工资").FIll(SQL,"",True)
MainTable = Tables("教工工资")

--  作者:Bin
--  发布时间:2013/5/17 14:28:00
--  
.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目8.table


--  作者:y2287958
--  发布时间:2013/5/17 14:29:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目8.zip


--  作者:良才
--  发布时间:2013/5/18 11:56:00
--  

谢谢