Blame | Last modification | View Log | Download
USE [T10]GO/****** Object: StoredProcedure [dbo].[SB_AT_KRM_Mesal_Ins] Script Date: 14/03/2016 15:09:48 ******/SET ANSI_NULLS ONGOSET QUOTED_IDENTIFIER ONGO-- =============================================-- Author: <Author,,Name>-- Create date: <Create Date,,>-- Description: <Description,,>-- =============================================CREATE PROCEDURE [dbo].[SB_AT_KRM_Mesal_Ins]@inserted XML,@deleted XML = NULLASBEGIN-- SET NOCOUNT ON added to prevent extra result sets from-- interfering with SELECT statements.SET NOCOUNT ON;-- variabelen voor waarden welke net gelogd zijnDECLARE @MesalDatumTijd DATETIME;DECLARE @my_lotnr CHAR(40);DECLARE @my_machine SMALLINT ;DECLARE @my_hoogte FLOAT;DECLARE @my_gewicht FLOAT;DECLARE @my_soortgew FLOAT;DECLARE @my_temp FLOAT;DECLARE @my_gew_hoogte INT;DECLARE @my_hoogte_afk INT;DECLARE @my_gew_soortgew FLOAT;--- 12-09-2012 EW--- sg afkPlus/afkMin ivm asymetrische afkeur grenzenDECLARE @my_soortgew_afk_P FLOAT;DECLARE @my_soortgew_afk_M FLOAT;DECLARE @my_gew_temp INT;DECLARE @my_temp_afk INT;DECLARE @my_lotnr_found INT;--- 15-06-2010 EW--- tags toegevoegd waarin de reden van afkeur gelogd wordtDECLARE @my_AfkeurOorzaak SMALLINT;DECLARE @my_Afkeur SMALLINT;DECLARE @my_sectime INT;-- afhandeling loggen naar mesalDECLARE @SumCol INT = 0;DECLARE @HistLog INT = -1;-------------------------15-06-2010-------------------------------- 27-05-2011 EW--- Vanuit MPV wordt bepaald door welke system(en) een anode gemaakt is en in KRM gelogdDECLARE @My_LotNummer char(40);DECLARE @My_Systeem INT;DECLARE @My_R1 SMALLINT;DECLARE @My_R2 SMALLINT;DECLARE @My_R3 SMALLINT;-------------------------27-05-2011-----------------------------BEGIN TRYSET @my_lotnr_found = 0;--SELECT @MesalDatumTijd = CONVERT(datetime, inserted.[Tijd], 105),-- 4-4-2011 alleen 8 characters in lotnummer, voorloop "1" wordt er af gehaald@my_lotnr = substring(inserted.[LotNr],2,8),@My_LotNummer = inserted.[LotNr],@my_machine = inserted.[MachineNr],@my_hoogte = inserted.[Hoogte],@my_soortgew = inserted.[SGewicht],@my_temp = inserted.[Temp],@my_gew_hoogte = [flmassa].dbo.MPV.HOOGTE,@my_hoogte_afk = [flmassa].dbo.MPV.HOOGTE_AFK,@my_gew_soortgew = [flmassa].dbo.MPV.SG,--- 12-09-2012 EW--- sg afkPlus/afkMin ivm asymetrische afkeur grenzen@my_soortgew_afk_P = [flmassa].dbo.MPV.SG_REG,@my_soortgew_afk_M = [flmassa].dbo.MPV.SG_AFK,@my_gew_temp = [flmassa].dbo.MPV.TEMP,@my_temp_afk = [flmassa].dbo.MPV.TEMP_AFK-------------------------15-06-2010-----------------------------FROM inserted INNER JOIN [flmassa].dbo.MPV ON inserted.LotNr = [flmassa].dbo.MPV.LOTNR;--SELECT@MesalDatumTijd = CONVERT(datetime, inserted.[Tijd], 104)-- 4-4-2011 alleen 8 characters in lotnummer, voorloop "1" wordt er af gehaald,@my_lotnr = SUBSTRING(inserted.[LotNr],2,8),@My_LotNummer = ISNULL(inserted.[LotNr],''),@my_machine = ISNULL(inserted.[MachineNr], 0),@my_hoogte = ISNULL(inserted.[Hoogte], 0.0),@my_soortgew = ISNULL(inserted.[SGewicht], 0.0),@my_temp = ISNULL(inserted.[Temp], 0.0)@my_gew_hoogte = [flmassa].dbo.MPV.HOOGTE,@my_hoogte_afk = [flmassa].dbo.MPV.HOOGTE_AFK,@my_gew_soortgew = [flmassa].dbo.MPV.SG,--- 12-09-2012 EW--- sg afkPlus/afkMin ivm asymetrische afkeur grenzen@my_soortgew_afk_P = [flmassa].dbo.MPV.SG_REG,@my_soortgew_afk_M = [flmassa].dbo.MPV.SG_AFK,@my_gew_temp = [flmassa].dbo.MPV.TEMP,@my_temp_afk = [flmassa].dbo.MPV.TEMP_AFK,@S010_RB = ISNULL(inserted.[S010_RB],0),@S010_1_RB = ISNULL(inserted.[S010_1_RB],0),@S010_2_RB = ISNULL(inserted.[S010_2_RB],0)FROM(SELECTX.query('.').value('(row/Tijd)[1]', 'char(24)') AS DATUM_TIJD,X.query('.').value('(row/LotNr)[1]', 'char(40)') AS LotNr,X.query('.').value('(row/MachineNr)[1]', 'smallint') AS MachineNr,X.query('.').value('(row/Hoogte)[1]', 'float') AS Hoogte,X.query('.').value('(row/SGewicht)[1]', 'float') AS SGewicht,X.query('.').value('(row/Temp)[1]', 'float') AS TempFROM @inserted.nodes('inserted/row') AS T(X)) AS inserted-- update mesal tableEXEC master.dbo.msp_MesalUpdateTable 'S041_10_RB', @S010_RB, @MesalDatumTijd, @SumCol, @HistLog;END TRYBEGIN CATCH -- Error handling-- Error handling: sla record over indien ern een fout optreedt (alleen mesal-- wordt niet ijgewerkt).END CATCHENDGO