贯彻落实《国家标准化发展纲要》|辽宁：三项创新举措推进标准强省建设
2024-12-29 01:55
1.大型医院综合绩效核算系统全套源码
2.Java源码规则引擎：jvs-rules 8月新增功能介绍
3.急求pb考勤管理系统(pb+access)论文
大型医院综合绩效核算系统全套源码
医院综合绩效核算系统提供全面源码，员工源码员工源码结合应用案例与自主版权，评分评分助力医院实现绩效优化。员工源码员工源码
该系统以医院发展战略为核心，评分评分将科室与员工绩效与医院目标紧密结合，员工源码员工源码促进工作目标与医院发展目标一致，评分评分selenium测试实践源码推动医院优化发展。员工源码员工源码系统配置灵活的评分评分绩效评价体系，支持不同科室与人员的员工源码员工源码个性化评估方案，确保各阶段绩效考核的评分评分公正、公平与客观。员工源码员工源码
系统技术架构采用java+springboot、评分评分mybaits +avue +MySQL，员工源码员工源码技术稳定、评分评分高效。员工源码员工源码
系统功能强大，与医院信息系统（his）集成，按周期获取工作量数据，秒赞网站源码对未录入信息化系统的工作量，系统提供手动录入与批量导入功能。数据按设定公式进行汇总，设有审核机制，确保结果准确无误。
系统模块功能全面，包括绩效管理、标准管理、基础数据管理、组织管理、权限设置与系统管理。具体功能如下：
1. 绩效管理：包括科室绩效核算与审核，支持新增、一键核算、上报、数据录入与修改、导出与删除功能。微信电影 源码
2. 标准管理：设定工作量判断、护理、麻醉、超声科与心电图执行标准。
3. 基础数据管理：诊察、判读、操作与重症收治工作量数据。
4. 组织管理：科室、岗位与员工管理。
5. 权限设置：数据与角色管理。
6. 系统管理：职称、文件管理、顶级菜单、功能、字典管理。
7. 系统日志管理：操作与错误日志。
Java源码规则引擎：jvs-rules 8月新增功能介绍
JVS-rules作为JAVA语言下的网站源码 带数据规则引擎，是jvs企业级数字化解决方案中的核心配置化工具，主要应用于金融信贷风控判断、商品优惠折扣计算、员工考核评分等场景。8月，JVS-rules进行了一系列优化与功能迭代，现简要介绍如下：
1、交互操作优化，提升规则清晰度，适用于复杂规则配置。
2、新增数据源配置功能，支持API、数据库等多方式接入，通过JVS体系多数据源管理接入规则引擎。
3、增加数据库接入时的商城java源码下载参数查询配置，用于规则引擎中查找相关数据。
4、引入复合变量处理能力，支持多行数据的加工处理，如累计消费总额。
5、规则节点判断结果配置化，设置“通过”或“不通过”条件，简化决策流程。
6、优化变量入参配置操作，支持多数据源选择。
7、决策流优化调试模式，提供界面化调试功能，便于查看决策执行过程。
8、改进赋值节点处理能力，支持基础赋值、映射赋值、条件赋值等多种方式。
9、增加评分卡使用内容展现，提供评分卡预置设置选项。
、系统UI交互操作优化，提升用户体验。
通过上述更新，JVS-rules为用户提供更高效、灵活的规则配置与执行能力。在线演示地址：frame.bctools.cn/，开源地址：gitee.com/software-mini...
JVS-rules的迭代优化展示了其在规则引擎领域的持续进步，致力于为企业提供更完善、高效的解决方案。关注我们，了解更多产品信息与操作介绍。
规则引擎往期干货：
了解决策流的自定义权限控制
掌握JVS-rules 2.1.8版本新功能
深度解读JVS-rules规则引擎功能
探索更多JVS-rules规则引擎功能应用
学习JVS-rules规则引擎的全面功能
急求pb考勤管理系统(pb+access)论文
文字自己想办法
一：变量说明
1:application :
test
2:窗体
login:登陆窗口
w_main：考勤管理系统的主界面，选择操作
w_chuli：个人考勤记录处理
w_shengding：缺勤类型设定
w_tongji：员工考勤统计
w_yuangong：员工基本信息
3：数据窗口
dw_chuli1：个人考勤记录处理
dw_shengding：缺勤类型设定
dw_chuli：员工考勤统计
w_yuangong：员工基本信息
二：函数说明
一：application test中的函数
1． 函数名：test：：open( )
作用：将test这个数据库注册为当前机器的用户的数据源
代码：
String ls_odbc //数据库名
String currdir = Space(), key//数据库“test”的完整路径
Environment env
string gs_currdir = GetCurrentDirectory()//得到运行程序的当前路径
GetEnvironment(env)
ls_odbc = "test"//数据库名为“test”
currdir=GetCurrentDirectory() + "\" + ls_odbc + ".mdb"//当前运行程序路径加上数据库名就是数据库“test”的完整路径
RegistryGet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, key)
if key="" then
CHOOSE CASE env.OSType//判断操作系统的类型，注册响应的数据源的驱动
CASE Windows!//为Windows
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, "Microsoft Access Driver (*.mdb)")
CASE WindowsNT!//为WindowsNT
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, "Driver do Microsoft Access (*.mdb)")
CASE ELSE
END CHOOSE
// 将数据库test注册为用户的数据源
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "", RegString!, "")
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "DBQ", RegString!, "" + currdir )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "Driver", RegString!, "odbcjt.dll")
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "DriverId" , ReguLong!, )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "FIL" , RegString!, "MS Access;" )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "SafeTransactions", RegString!, "0" )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "UID" , RegString!, "" )
end if
open(login)// 打开登陆窗口
二：登陆窗口中的函数
1：函数名：login.open()
作用：连接到本机器数据源为test的数据库
代码：
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=test;UID=;PWD='"
connect;
if sqlca.sqlcode<>0 then
Messagebox("错误!,无法连接数据库:",sqlca.sqlerrtext)
halt close
end if
2：函数名：cb1。Clicked（） 即点击登陆按钮的事件
作用：当用户输入帐号和密码后，判断是否在“操作员表”中 ，存在就打开考勤管理系统主界面
代码：
//定义两个变量
string password,usename
// 数据库连接参数
//检索用户名和密码记录
SELECT 操作员表.用户名,
操作员表.密码
INTO :usename,
:password
FROM 操作员表
WHERE 操作员表.用户名 = :sle_1.text ;
//判断用户输入的用户名是否正确
if sle_1.text="" or sle_2.text="" then
messagebox("错误！","用户名或密码不能为空！",exclamation!,ok!,2)
else
if usename=sle_1.text and password=sle_2.text then
messagebox("通过验证！","用户名和密码正确，欢迎您使用本系统！",Information!,ok!,2)
open(w_main)// 打开考勤管理系统主界面
close(parent)
else
messagebox("错误！","用户名或密码错误，请重新输入！",exclamation!,ok!,2)
end if
end if
3：函数名：cb2。Clicked（） 即点击取消按钮的事件
作用：关闭窗口
代码：
close(parent)
二：主窗口中的函数
1：函数名：rb_1。Clicked()
作用：关闭当前窗口，打开员工基本信息窗口
代码：open(w_yuangong)
close(parent)
2：函数名：rb_2。Clicked()
作用：关闭当前窗口，打开考勤信息处理窗口
代码：open(w_chuli)
close(parent)
3：函数名：rb_3。Clicked()
作用：关闭当前窗口，打开缺勤类型设定窗口
代码：open(w_shengding)
close(parent)
4：函数名：rb_4。Clicked()
作用：关闭当前窗口，打开员工考勤统计窗口
代码：open(w_tongji)
close(parent)
5：函数名：pb_1。Clicked()
作用：关闭当前窗口
代码：close(parent)
三：考勤信息处理窗口中的函数
1：函数名：open( )
作用：将数据窗口和数据库连接，并且显示数据库存在的数据
代码：dw_1.settransobject(sqlca)
dw_1.retrieve()
2：函数名：pb_1。Clicked()
作用：插入一条新记录
代码：dw_1.insertrow(0)
3：函数名：pb_2。Clicked()
作用：删除一条当前记录
代码：dw_1.deleterow(0)
4：函数名：pb_3。Clicked()
作用：向数据库提交插入，删除和修改的操作，如果成功就发到数据库
代码：
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4：函数名：pb_4。Clicked()
作用：关闭当前窗口，回到主界面
代码：
open(w_main)
close(parent)
四：缺勤类型设定窗口中的函数
1：函数名：open( )
作用：将数据窗口和数据库连接，并且显示数据库存在的数据
代码：dw_1.settransobject(sqlca)
dw_1.retrieve()
2：函数名：pb_1。Clicked()
作用：插入一条新记录
代码：dw_1.insertrow(0)
3：函数名：pb_2。Clicked()
作用：删除一条当前记录
代码：dw_1.deleterow(0)
4：函数名：pb_3。Clicked()
作用：向数据库提交插入，删除和修改的操作，如果成功就发到数据库
代码：
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4：函数名：pb_4。Clicked()
作用：关闭当前窗口，回到主界面
代码：
open(w_main)
close(parent)
五：员工基本信息窗口中的函数
1：函数名：open( )
作用：将数据窗口和数据库连接，并且显示数据库存在的数据
代码：dw_1.settransobject(sqlca)
dw_1.retrieve()
2：函数名：pb_1。Clicked()
作用：插入一条新记录
代码：dw_1.insertrow(0)
3：函数名：pb_2。Clicked()
作用：删除一条当前记录
代码：dw_1.deleterow(0)
4：函数名：pb_3。Clicked()
作用：向数据库提交插入，删除和修改的操作，如果成功就发到数据库
代码：
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4：函数名：pb_4。Clicked()
作用：关闭当前窗口，回到主界面
代码：
open(w_main)
close(parent)
六：员工考勤统计窗口中的函数
1：函数名：open( )
作用：将数据窗口和数据库连接，并且显示数据库存在的数据
代码：dw_1.settransobject(sqlca)
dw_1.retrieve()
2：函数名：ddlb_1。Selectchange()
作用： 改变数据窗口中数据的大小
代码：dw_1.modify('DataWindow.Zoom = '+ trim(ddlb_1.text))
3：函数名：cb1。Clicked（）
作用： 回到数据窗口中上一页
代码：dw_1.scrollpriorpage()
4：函数名：cb2。Clicked（）
作用： 回到数据窗口中下一页
代码：dw_1.scrollnextpage()
5：函数名：cb3。Clicked（）
作用： 打印数据窗口
代码：dw_1.print()
6：函数名：cb4。Clicked（）
作用： 打印设置
代码：printsetup()
7：函数名：cb5。Clicked（）
作用： 打印预览
代码：
dw_1.Modify("DataWindow.Print.Orientation = '1'") //横向
dw_1.Modify("DataWindow.Print.Orientation = '2'") //纵向
dw_1.Modify("DataWindow.Print.Preview = yes")
dw_1.Modify("DataWindow.Print.Preview.Rulers = yes")
dw_1.modify('DataWindow.Print.Preview.Zoom = '+ trim(ddlb_1.text))
8：函数名：cb5。Clicked（）
作用： 打印预览
9：函数名：ddlb_2。Selectchange()
作用： 改变打印预览窗口的大小
代码：
dw_1.modify('DataWindow.Print.Preview.Zoom = '+ trim(ddlb_2.text))
：函数名：cb6。Clicked（）
作用： 将数据窗口中的数据保存为表格形式的文件
代码：string ls_path, ls_file
int li_rc
ls_path = sle_1.Text
li_rc = GetFileSaveName ( "Select File", ls_path, ls_file, "xls", "*.xls,*.xls" )
//得到路径名
IF li_rc = 1 Then
OLEObject ole_object , ole_workbooks
ole_object = CREATE OLEObject
//创建Excel对象
IF ole_object.ConnectToNewObject("Excel.Application") <> 0 THEN
MessageBox('OLE错误','OLE无法连接!')
return
END IF
ole_object.workbooks.add
ole_object.Visible = True
ole_workbooks = ole_object.Worksheets(1)
ole_workbooks.cells(1,1).value="员工号"
ole_workbooks.cells(1,2).value="时间"
ole_workbooks.cells(1,3).value="天数"
ole_workbooks.cells(1,4).value="类型"
ole_workbooks.cells(1,5).value="原因"
long l_row
for l_row = 2 to dw_1.rowcount()+1
ole_workbooks.cells(l_row,1).value=dw_1.getitemstring(l_row - 1,1)
ole_workbooks.cells(l_row,2).value=dw_1.getitemstring(l_row - 1,2)
ole_workbooks.cells(l_row,3).value=dw_1.getitemstring(l_row - 1,3)
ole_workbooks.cells(l_row,4).value=dw_1.getitemstring(l_row - 1,4)
ole_workbooks.cells(l_row,5).value=dw_1.getitemstring(l_row - 1,5)
next
ole_workbooks.SaveAs ( ls_path)
ole_object.quit()
Ole_Object.DisConnectObject()
Destroy Ole_Object
destroy ole_workbooks
messagebox("!","文件保存到"+ ls_path)
End If
：函数名：sel。modify（）
作用： 将数据窗口中的数据按输入的员工号显示
代码：
string emp_no
string condition
if sle_1.text <> "" then
emp_no=trim(sle_1.text)
condition="emp_no="+"'"+ emp_no+"'"
dw_1.setfilter( condition)
filter(dw_1)
dw_1.retrieve()
end if
2024-12-29 01:41
2024-12-29 01:27
2024-12-29 01:11
2024-12-29 01:09
2024-12-29 00:22
2024-12-29 00:10
2024-12-28 23:54
2024-12-28 23:31