[MES]制造执行系统（三）

最新推荐文章于 2024-08-19 15:45:00 发布

Jasson

最新推荐文章于 2024-08-19 15:45:00 发布

阅读量887

点赞数

分类专栏： ZcoderLife 文章标签：制造 null table user sql server 数据库服务器

本文链接：https://blog.csdn.net/jiali765/article/details/5902269

版权

ZcoderLife 专栏收录该内容

28 篇文章 0 订阅

订阅专栏

这几天忙着开会，都忘记更新blog了。可能要做一个看板程式，需要画曲线图。大概是下一个需求了。继续书写[MES]制造执行系统（三）噩梦的根源。

有做过苹果客服的朋友都应该知道苹果是个要求很严格的厂家。而我做的这个MES正好是为他们服务的。这就包括随时的跟踪订单生产状况，产品的质量。其实就要挂个生产看板，他们过来可以随时看看板数据。当然，他们也可以在外网（VNC）上访问到这些看板。

看板样式如下图：

运行了几个月，老是down机。查找出一些问题，当然，有很多的方面需要更改，出问题了就不是一个人的错，也不是一个地方的错。我也找过很多资料，希望改进数据库服务器的速度。我在下个月的博文中给出。

昨天晚上B40MES出現了點問題，根據我的瞭解以及現場人員的反映，問題主要有：

1，NPS回報的時間過長，現場說在下午19點左右，一般要2-3分鐘，我是7點48接到電話。8點中到達的現場。我測試的時候是OK的，沒有那麼慢，幾秒鐘即可。

2，包裝站回報慢，我有注意到現場的回報大部分都在快交班的時候刷回報，這樣大量的回報在短時間內回報，也會對速度有影響的。現場工作人員是否能夠分批回報呢？以減輕服務器負荷。

3，看板數據在那個時間段（下午19點左右），會有空白的現象出現，沒有數據顯示。

出現上面的問題主要會有兩個時間段一個是白班的19點左右，一個是晚班的4點鐘左右。

為了改善速度，更加方便現場作業我建議如下：

1，由IT來查找程式的不足，以便做即時的改進，提高處理的速度。

2，現場刷回報正常操作，分批進行。不要短時間內做大量的回報，麻煩現場人員配合一下！

3，隨著不斷的生產，數據庫裏的數據量會越來越大，我建議資料做個歸檔動作，我希望參考B40報表的同事們能夠提供我個時間，你們需要看多久之前的報表，我們好在那之前的資料做個歸檔！

PS:可能要分幾個方面查找原因：網路，本機電腦，連接服務器，MES服務器，MES數據庫服務器（孟課提示出問題的時候該機cpu占70%左右）

数据量越来越大。动作之一

1、將上次給你的資料庫連線程式(DBObject)更新至MES上。

l DBobject.dll更新至Lib，DBAccess.cs更新至App_Code/Class下

l 所有使用到AdGroup.DBObject.DBAdapter的都要修改，將”MsSql”的parameter拿掉，只保留後面的connectionstirng

l 記得所有程式先在你電腦上點過正常，再整個更新到Server上。

2、Review MES DB的備份。我有看到兩個CNMESDB備份計劃，都有在正常執行嗎？Log還是很大..

3、增加一個Rebuild QCAVN及QCAVDN Index的排程。

4、QCAVN及QCAVDN的資料量越來越大… 問一下B40專案的相關人員，他們在看歷史資料通常會看多久以前的？

要開始準備將舊的歷史資料做歸檔。

(目前約200萬筆，預估到500萬筆以上效能會開始受影響)

哎！还是一样的效果。效果不明显。动作之二

做好数据库的迁移做了两个排程：

检查表存储过程：

USE [ArchMES] GO /****** Object: StoredProcedure [dbo].[CheckMESArchTable] Script Date: 09/24/2010 08:55:28 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO -- ============================================= -- Author: <Mephis.Lin> -- Create date: <2010-06-24> -- Description: <Check MES Archive Tablel:QCAVN & QCAVDN EXISTS> --suit for SQL SERVER 2000 -- ============================================= ALTER PROC [dbo].[CheckMESArchTable] ( @tbNameQv varchar(11) = NULL, @tbNameQvd varchar(12) = NULL ) AS BEGIN SET NOCOUNT ON BEGIN IF @tbNameQv = NULL BEGIN SET @tbNameQv = 'QCAVN'+(CONVERT(varchar,DATEPART(year,CURRENT_TIMESTAMP))+RIGHT('0'+CONVERT(varchar,DATEPART(mm,CURRENT_TIMESTAMP)),2)) END IF @tbNameQvd = NULL BEGIN SET @tbNameQvd = 'QCAVDN'+(CONVERT(varchar,DATEPART(year,CURRENT_TIMESTAMP))+RIGHT('0'+CONVERT(varchar,DATEPART(mm,CURRENT_TIMESTAMP)),2)) END IF NOT EXISTS (SELECT * FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_NAME=@tbNameQv) BEGIN EXECUTE('CREATE TABLE [dbo].['+@tbNameQv+']( [WorkID] [char](4) NOT NULL, [JobID] [bigint] NOT NULL, [LotNo] [smallint] NOT NULL, [Seq] [smallint] NOT NULL, [CavitySeq] [tinyint] NOT NULL, [InspStationID] [varchar](20) NOT NULL, [OK] [bit] NOT NULL, [PpgLotNo] [varchar](11) NULL, [MoldID] [varchar](50) NULL, [CarverID] [varchar](10) NULL, [ReportDate] [datetime] NULL, [Modi_User] [varchar](20) NOT NULL, [Modi_Time] [datetime] NOT NULL, CONSTRAINT [PK_'+@tbNameQv+'_1] PRIMARY KEY CLUSTERED ( [WorkID] ASC, [JobID] ASC, [LotNo] ASC, [Seq] ASC, [CavitySeq] ASC ) ) ON [PRIMARY]') EXECUTE('ALTER TABLE [dbo].['+@tbNameQv+'] ADD CONSTRAINT [DF_'+@tbNameQv+'_OK] DEFAULT (1) FOR [OK]; ALTER TABLE [dbo].['+@tbNameQv+'] ADD CONSTRAINT [DF_'+@tbNameQv+'_Modi_User_1] DEFAULT (''DB_Modi'') FOR [Modi_User]; ALTER TABLE [dbo].['+@tbNameQv+'] ADD CONSTRAINT [DF_'+@tbNameQv+'_Modi_Time_1] DEFAULT (getdate()) FOR [Modi_Time];') END IF NOT EXISTS (SELECT * FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' AND TABLE_NAME=@tbNameQvd) BEGIN EXECUTE('CREATE TABLE [dbo].['+@tbNameQvd+']( [WorkID] [char](4) NOT NULL, [JobID] [bigint] NOT NULL, [LotNo] [smallint] NOT NULL, [Seq] [smallint] NOT NULL, [InspStationID] [varchar](20) NOT NULL, [CavitySeq] [tinyint] NOT NULL, [InspItem01] [bit] NOT NULL, [InspItem02] [bit] NOT NULL, [InspItem03] [bit] NOT NULL, [InspItem04] [bit] NOT NULL, [InspItem05] [bit] NOT NULL, [InspItem06] [bit] NOT NULL, [InspItem07] [bit] NOT NULL, [InspItem08] [bit] NOT NULL, [InspItem09] [bit] NOT NULL, [InspItem10] [bit] NOT NULL, [InspItem11] [bit] NOT NULL, [InspItem12] [bit] NOT NULL, [InspItem13] [bit] NOT NULL, [InspItem14] [bit] NOT NULL, [InspItem15] [bit] NOT NULL, [InspItem16] [bit] NOT NULL, [InspItem17] [bit] NOT NULL, [InspItem18] [bit] NOT NULL, [InspItem19] [bit] NOT NULL, [InspItem20] [bit] NOT NULL, [OK] [bit] NOT NULL, [IsReport] [bit] NOT NULL, [ReportDate] [datetime] NULL, [Modi_User] [varchar](20) NOT NULL, [Modi_Time] [datetime] NOT NULL, CONSTRAINT [PK_'+@tbNameQvd+'_1] PRIMARY KEY CLUSTERED ( [WorkID] ASC, [JobID] ASC, [LotNo] ASC, [Seq] ASC, [InspStationID] ASC, [CavitySeq] ASC ) ) ON [PRIMARY]') EXECUTE('ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem01] DEFAULT (0) FOR [InspItem01]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem02] DEFAULT (0) FOR [InspItem02]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem03] DEFAULT (0) FOR [InspItem03]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem04] DEFAULT (0) FOR [InspItem04]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem05] DEFAULT (0) FOR [InspItem05]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem06] DEFAULT (0) FOR [InspItem06]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem07] DEFAULT (0) FOR [InspItem07]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem08] DEFAULT (0) FOR [InspItem08]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem09] DEFAULT (0) FOR [InspItem09]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem10] DEFAULT (0) FOR [InspItem10]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem11] DEFAULT (0) FOR [InspItem11]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem12] DEFAULT (0) FOR [InspItem12]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem13] DEFAULT (0) FOR [InspItem13]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem14] DEFAULT (0) FOR [InspItem14]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem15] DEFAULT (0) FOR [InspItem15]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem16] DEFAULT (0) FOR [InspItem16]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem17] DEFAULT (0) FOR [InspItem17]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem18] DEFAULT (0) FOR [InspItem18]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem19] DEFAULT (0) FOR [InspItem19]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_InspItem20] DEFAULT (0) FOR [InspItem20]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_OK] DEFAULT (0) FOR [OK]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_IsReport] DEFAULT (0) FOR [IsReport]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_Modi_User_1] DEFAULT (''DB_Modi'') FOR [Modi_User]; ALTER TABLE [dbo].['+@tbNameQvd+'] ADD CONSTRAINT [DF_'+@tbNameQvd+'_Modi_Time_1] DEFAULT (getdate()) FOR [Modi_Time];') END END END

迁移数据存储过程：

USE [ArchMES] GO /****** Object: StoredProcedure [dbo].[ArchMES] Script Date: 09/24/2010 08:56:40 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER PROC [dbo].[ArchMES] ( @CutOffDate datetime = NULL ) AS BEGIN DECLARE @tbNameQv varchar(11) DECLARE @tbNameQvd varchar(12) DECLARE @CutOffDateString varchar(10) SET NOCOUNT ON IF @CutOffDate IS NULL BEGIN SET @CutOffDate = DATEADD(dd,-(DAY(DATEADD(mm,1,getdate()))-1),DATEADD(mm,-1,getdate())) END ELSE BEGIN IF @CutOffDate > DATEADD(dd, -30, CURRENT_TIMESTAMP) BEGIN RAISERROR ('Cannot delete from last 30 days', 16, 1) RETURN -1 END END SET @tbNameQv = 'QCAVN'+(CONVERT(varchar,DATEPART(year,@CutOffDate))+RIGHT('0'+CONVERT(varchar,DATEPART(mm,DATEADD(dd,-1,@CutOffDate))),2)) SET @tbNameQvd = 'QCAVDN'+(CONVERT(varchar,DATEPART(year,@CutOffDate))+RIGHT('0'+CONVERT(varchar,DATEPART(mm,DATEADD(dd,-1,@CutOffDate))),2)) SET @CutOffDateString = CONVERT(varchar,@CutOffDate,102) EXEC dbo.CheckMESArchTable @tbNameQv,@tbNameQvd BEGIN TRAN EXECUTE('INSERT INTO '+@tbNameQv+' SELECT * FROM [MES].[dbo].[QCAVN] WHERE Modi_Time < '''+ @CutOffDateString+ '''') IF @@ERROR <> 0 BEGIN ROLLBACK TRAN RAISERROR ('Error occured while copying data to MES.dbo.QCAVN', 16, 1) RETURN -1 END EXECUTE('INSERT INTO '+@tbNameQvd+' SELECT * FROM [MES].[dbo].[QCAVDN] WHERE Modi_Time < '''+@CutOffDateString+'''') IF @@ERROR <> 0 BEGIN ROLLBACK TRAN RAISERROR ('Error occured while copying data to MES.dbo.QCAVDN', 16, 1) RETURN -1 END DELETE FROM [MES].[dbo].[QCAVN] WHERE Modi_Time < @CutOffDate IF @@ERROR <> 0 BEGIN ROLLBACK TRAN RAISERROR ('Error occured while deleting data to MES.dbo.QCAVN', 16, 1) RETURN -1 END DELETE FROM [MES].[dbo].[QCAVDN] WHERE Modi_Time < @CutOffDate IF @@ERROR <> 0 BEGIN ROLLBACK TRAN RAISERROR ('Error occured while deleting data to MES.dbo.QCAVDN', 16, 1) RETURN -1 END IF @@TRANCOUNT > 0 BEGIN COMMIT TRAN RETURN 0 END END

开始还可以CPU能够保持75%左右。但噩梦还在继续.....