diff --git a/PROMS/VEPROMS User Interface/PROMSFixes.Sql b/PROMS/VEPROMS User Interface/PROMSFixes.Sql index d8c470f5..1bbc54ab 100644 --- a/PROMS/VEPROMS User Interface/PROMSFixes.Sql +++ b/PROMS/VEPROMS User Interface/PROMSFixes.Sql @@ -17320,7 +17320,7 @@ GO [RofstID] [int] NOT NULL, [roid] [varchar](50) NOT NULL, [value] [varchar](max) NOT NULL, - [AccPageID] [varchar](max) NULL, + [AccPageID] [varchar](100) NULL, CONSTRAINT [PK_RofstDefaultValue] PRIMARY KEY CLUSTERED ( [RofstID] ASC, @@ -24293,6 +24293,56 @@ Go --- end changes for: ---C2025-023 - Electronic Procedures - Modifications to PROMS +/* +========================================================================================================== + Begin: C2025-045: Improve Performance loading procedures with Alarms +========================================================================================================== +*/ + +IF Exists(SELECT 1 from information_schema.columns where character_maximum_length=-1 and column_name = 'AccPageID' and table_name = 'RofstDefaultValue') +Begin +ALTER TABLE RofstDefaultValue ALTER COLUMN AccPageID varchar(100) +END +GO + +IF (@@Error = 0) PRINT 'Updating size of RofstDefaultValue.AccPageID Succeeded' +ELSE PRINT 'Updating size of RofstDefaultValue.AccPageID Failed to Execute' +GO + +EXEC sp_refreshview [dbo.vwRofstData_RofstDefaultValues] +EXEC sp_refreshview [dbo.vwRofstData_RofstBaseRoids] +GO + +IF (@@Error = 0) PRINT 'Refreshing views: (vwRofstData_RofstDefaultValues,vwRofstData_RofstBaseRoids) Succeeded' +ELSE PRINT 'Refreshing views: (vwRofstData_RofstDefaultValues,vwRofstData_RofstBaseRoids) Failed to Execute' +GO + +IF NOT EXISTS (SELECT * FROM dbo.sysindexes WHERE name = 'IX_RofstDefaultValue_RofstID_AccPageID') +BEGIN +CREATE NONCLUSTERED INDEX [IX_RofstDefaultValue_RofstID_AccPageID] ON [dbo].[RofstDefaultValue] +( + [RofstID] ASC, + [AccPageID] ASC +) +INCLUDE +( + [roid] + ,[value] +) +WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, SORT_IN_TEMPDB = OFF, DROP_EXISTING = OFF, ONLINE = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] + +END +GO + +IF (@@Error = 0) PRINT 'Adding Index IX_RofstDefaultValue_RofstID_AccPageID Succeeded' +ELSE PRINT 'Adding Index IX_RofstDefaultValue_RofstID_AccPageID Failed to Execute' +GO + +/* +========================================================================================================== + End: C2025-045: Improve Performance loading procedures with Alarms +========================================================================================================== +*/ /* --------------------------------------------------------------------------- @@ -24327,8 +24377,8 @@ BEGIN TRY -- Try Block DECLARE @RevDate varchar(255) DECLARE @RevDescription varchar(255) - set @RevDate = '08/12/2025 4:12 PM' - set @RevDescription = 'Updated Fix Hyphen Characters' + set @RevDate = '08/13/2025 8:07 AM' + set @RevDescription = 'Improve Performance loading procedures with Alarms' Select cast(@RevDate as datetime) RevDate, @RevDescription RevDescription PRINT 'SQL Code Revision ' + @RevDate + ' - ' + @RevDescription