人机料法环是属于什么管理(人机料)

本文介绍人、机、料、法、环管理中的方法管理。

这里的法泛指软性内容的管理,如法律法规,操作手册,公司组织,工艺流程等等一些指导性文件的管理。

人机料法环是属于什么管理(人机料)(1)

如果一个企业忽略了对于法的管理,那么就不会长久存在下去,也会出现各种各样的安全问题,法是一种规范,是一种保护机制,没有法的规范,任何生产过程都将是一种冒险行为。

所以,法是一个企业的神经系统,和指挥控制系统,要十分重视。

下图为“法"项目的基本内容。

人机料法环是属于什么管理(人机料)(2)

有法律法规、规章制度、操作规程、工艺流程、隐患排查、巡检管理6个部分组成。

前4项基本就是文本或图片的一些数据集合。

操作界面如下图所示:

人机料法环是属于什么管理(人机料)(3)

可以实现新建法律制度和操作规程文本,左侧树形结构进行检索,单击后自动在右侧显示出来,进行修改添加等操作。

功能很简单,重点是工作当中提供进行翻阅浏览。

人机料法环是属于什么管理(人机料)(4)

这部分的操作还是,很简单的,只要把本公司成形的制度文本添加进来就可以了。

便于平时需要的时候查看。

人机料法环是属于什么管理(人机料)(5)

代码:

Private Sub ShowText() '双击显示文本内容 On Error Resume Next Me.TextBox1.Text = "" Me.TextBox2.Text = "" Dim xSheetName As String Dim xBoot As Object Set xBoot = Me.TreeView1.SelectedItem.Parent If Not xBoot Is Nothing Then xSheetName = Me.TreeView1.SelectedItem.Key Dim fs As Object, ts As Object Set fs = CreateObject("Scripting.Filesystemobject") Set ts = fs.opentextfile(xSheetName, 1, False) If Not ts.atendofstream Then Me.TextBox2.Text = Me.TreeView1.SelectedItem.Text Me.TextBox1.Text = ts.readall() End If ts.Close Set fs = Nothing End If Set xBoot = Nothing End Sub

后面3项,还是有一些复杂,所以制作起来需要考虑很多实际应用层面的流程问题。

期待更新。

欢迎关注\收藏

--END--

,

免责声明:本文仅代表文章作者的个人观点,与本站无关。其原创性、真实性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容文字的真实性、完整性和原创性本站不作任何保证或承诺,请读者仅作参考,并自行核实相关内容。文章投诉邮箱:anhduc.ph@yahoo.com

    分享
    投诉
    首页