· 8 years ago · Dec 21, 2017, 07:30 PM
1IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors')) DROP TABLE #tmpErrors
2GO
3CREATE TABLE #tmpErrors ([Message] nvarchar(255))
4GO
5
6
7BEGIN TRANSACTION
8
9DECLARE @SourceURL AS nvarchar(max)
10DECLARE @TargetURL AS nvarchar(max)
11DECLARE @ChangeToRelative as bit
12DECLARE @NewURL AS nvarchar(max)
13DECLARE @Error AS int
14
15/*******VARIABLES A MODIFICAR POR LAS URLS DE LA INSTALACION*********/
16
17SET @SourceURL = N'http://aura.bs.intranet.tiauto.com/'
18SET @TargetURL = N'http://aura2.extranet.tiauto.com/'
19SET @ChangeToRelative = 0 /*NO = 0, Yes = 1*/
20
21/*******************************************************************/
22
23IF(@ChangeToRelative = 1)
24 SET @NewURL = N'./'
25ELSE
26 SET @NewURL = @TargetURL
27
28IF(@SourceURL = '' OR @TargetURL = '')
29 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: SourceURL & TargetURL value')
30
31--Forms
32 IF(@ChangeToRelative = 1)
33 UPDATE AP__PaginaFormulario WITH(ROWLOCK)
34 SET HtmlPagina = CAST(REPLACE(REPLACE(REPLACE(CAST(HtmlPagina AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL),@SourceURL, @TargetURL) AS ntext)
35 ELSE
36 UPDATE AP__PaginaFormulario WITH(ROWLOCK)
37 SET HtmlPagina = CAST(REPLACE(CAST(HtmlPagina AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
38
39
40 IF(@@Error > 0)
41 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__PaginaFormulario')
42
43--Divisions
44 IF(@ChangeToRelative = 1)
45 UPDATE AP__DivisionPaginaFormulario WITH(ROWLOCK)
46 SET htmlDivision = CAST(REPLACE(REPLACE(REPLACE(CAST(htmlDivision AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext),
47 TextoCuerpo = CAST(REPLACE(REPLACE(REPLACE(CAST(TextoCuerpo AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
48 ELSE
49 UPDATE AP__DivisionPaginaFormulario WITH(ROWLOCK)
50 SET htmlDivision = CAST(REPLACE(CAST(htmlDivision AS nvarchar(max)), @SourceURL, @NewURL) AS ntext),
51 TextoCuerpo = CAST(REPLACE(CAST(TextoCuerpo AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
52
53 IF(@@Error > 0)
54 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__DivisionPaginaFormulario')
55
56--Fields
57 IF(@ChangeToRelative = 1)
58 UPDATE AP__BPM_CampoFormulario WITH(ROWLOCK)
59 SET HtmlCampo = CAST(REPLACE(REPLACE(REPLACE(CAST(HtmlCampo AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext),
60 Url = CAST(REPLACE(REPLACE(REPLACE(CAST(Url AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext),
61 TextoCuerpo = CAST(REPLACE(REPLACE(REPLACE(CAST(TextoCuerpo AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext),
62 TextoCabecera = CAST(REPLACE(REPLACE(REPLACE(CAST(TextoCabecera AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
63 ELSE
64 UPDATE AP__BPM_CampoFormulario WITH(ROWLOCK)
65 SET HtmlCampo = CAST(REPLACE(CAST(HtmlCampo AS nvarchar(max)), @SourceURL, @NewURL) AS ntext),
66 Url = CAST(REPLACE(CAST(Url AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext),
67 TextoCuerpo = CAST(REPLACE(CAST(TextoCuerpo AS nvarchar(max)), @SourceURL, @NewURL) AS ntext),
68 TextoCabecera = CAST(REPLACE(CAST(TextoCabecera AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
69
70 IF(@@Error > 0)
71 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_CampoFormulario')
72
73 IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors'))
74BEGIN
75 IF EXISTS (SELECT * FROM #tmpErrors)
76 BEGIN
77 SELECT * FROM #tmpErrors
78 ROLLBACK TRANSACTION
79 PRINT 'DataBase update failed'
80 END
81 ELSE
82 BEGIN
83 INSERT INTO #tmpErrors ([Message]) VALUES ('DataBase update succeeded')
84 SELECT * FROM #tmpErrors
85 COMMIT TRANSACTION
86 PRINT 'step 1 update succeeded'
87 END
88END
89
90 Begin transaction
91--Instructions
92 IF(@ChangeToRelative = 1)
93 UPDATE AP__BPM_TareasClases_Personal WITH(ROWLOCK)
94 SET Instrucciones = CAST(REPLACE(REPLACE(REPLACE(CAST(Instrucciones AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
95 ELSE
96 UPDATE AP__BPM_TareasClases_Personal WITH(ROWLOCK)
97 SET Instrucciones = CAST(REPLACE(CAST(Instrucciones AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
98
99 IF(@@Error > 0)
100 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareasClases_Personal')
101
102--Notify
103
104 IF(@ChangeToRelative = 1)
105 UPDATE AP__BPM_TareaNotificacion WITH(ROWLOCK)
106 SET ContenidoNotificacion = CAST(REPLACE(REPLACE(REPLACE(CAST(ContenidoNotificacion AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
107 ELSE
108 UPDATE AP__BPM_TareaNotificacion WITH(ROWLOCK)
109 SET ContenidoNotificacion = CAST(REPLACE(CAST(ContenidoNotificacion AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
110
111 IF(@@Error > 0)
112 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareaNotificacion')
113
114 IF(@ChangeToRelative = 1)
115 UPDATE AP__BPM_TareasSistClases_Notificacion WITH(ROWLOCK)
116 SET ContenidoTexto = CAST(REPLACE(REPLACE(REPLACE(CAST(ContenidoTexto AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
117 where IdTareaSistClaseAsc in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (1,3))--Notificaciones empleados y externos
118 ELSE
119 UPDATE AP__BPM_TareasSistClases_Notificacion WITH(ROWLOCK)
120 SET ContenidoTexto = CAST(REPLACE(CAST(ContenidoTexto AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
121 where IdTareaSistClaseAsc in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (1,3))--Notificaciones empleados y externos
122
123 IF(@@Error > 0)
124 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareasSistClases_Notificacion')
125
126--Notify via email
127 IF(((@ChangeToRelative = 1) and (@TargetURL <> '')) or (@ChangeToRelative = 0))
128 begin
129 UPDATE AP__BPM_TareasSistClases_EMFormulario WITH(ROWLOCK)
130 SET ContenidoTexto = CAST(REPLACE(CAST(ContenidoTexto AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext)
131
132 IF(@@Error > 0)
133 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareasSistClases_EMFormulario')
134
135 UPDATE AP__BPM_TareasSistClases_Notificacion WITH(ROWLOCK)
136 SET ContenidoTexto = CAST(REPLACE(CAST(ContenidoTexto AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext)
137 where IdTareaSistClaseAsc in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (5,31,24))--Notificaciones via email, notifica via sms, confirmar email
138
139 IF(@@Error > 0)
140 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareasSistClases_Notificacion')
141
142 UPDATE AP__BPM_TareaEnvioFormulario WITH(ROWLOCK)
143 SET ContenidoMail = CAST(REPLACE(CAST(ContenidoMail AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext)
144
145 IF(@@Error > 0)
146 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_TareaEnvioFormulario')
147 end
148
149--Base Doc
150 IF(@ChangeToRelative = 1)
151 UPDATE AP__DocumentosBase WITH(ROWLOCK)
152 SET DocBaseTexto = CAST(REPLACE(REPLACE(REPLACE(CAST(DocBaseTexto AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
153 ELSE
154 UPDATE AP__DocumentosBase WITH(ROWLOCK)
155 SET DocBaseTexto = CAST(REPLACE(CAST(DocBaseTexto AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
156
157 IF(@@Error > 0)
158 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__DocumentosBase')
159
160 IF(@ChangeToRelative = 1)
161 UPDATE AP__DocumentosBaseProcesos WITH(ROWLOCK)
162 SET DocBaseTexto = CAST(REPLACE(REPLACE(REPLACE(CAST(DocBaseTexto AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
163 ELSE
164 UPDATE AP__DocumentosBaseProcesos WITH(ROWLOCK)
165 SET DocBaseTexto = CAST(REPLACE(CAST(DocBaseTexto AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
166
167 IF(@@Error > 0)
168 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__DocumentosBaseProcesos')
169
170 IF(@ChangeToRelative = 1)
171 UPDATE AP__BPM_ParrafoRepetible WITH(ROWLOCK)
172 SET Contenido = CAST(REPLACE(REPLACE(REPLACE(CAST(Contenido AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
173 ELSE
174 UPDATE AP__BPM_ParrafoRepetible WITH(ROWLOCK)
175 SET Contenido = CAST(REPLACE(CAST(Contenido AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
176
177 IF(@@Error > 0)
178 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__BPM_ParrafoRepetible')
179
180--Navigation Buttons
181 IF(@ChangeToRelative = 1)
182 UPDATE AP__NavigationMenuItems WITH(ROWLOCK)
183 SET Navigation = CAST(REPLACE(REPLACE(REPLACE(CAST(Navigation AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
184 WHERE NavigationType = 0 AND UrlType = 0
185 ELSE
186 UPDATE AP__NavigationMenuItems WITH(ROWLOCK)
187 SET Navigation = CAST(REPLACE(CAST(Navigation AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
188 WHERE NavigationType = 0 AND UrlType = 0
189
190 IF(@@Error > 0)
191 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__NavigationMenuItems')
192
193--Content HTML
194 IF(@ChangeToRelative = 1)
195 UPDATE AP__ContentManual WITH(ROWLOCK)
196 SET Content = CAST(REPLACE(REPLACE(REPLACE(CAST(Content AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
197 ELSE
198 UPDATE AP__ContentManual WITH(ROWLOCK)
199 SET Content = CAST(REPLACE(CAST(Content AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
200
201 IF(@@Error > 0)
202 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__ContentManual')
203
204-- Content Plugin
205 IF(@ChangeToRelative = 1)
206 UPDATE AP__ContentPlugin WITH(ROWLOCK)
207 SET Content = CAST(REPLACE(REPLACE(REPLACE(CAST(Content AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
208 ELSE
209 UPDATE AP__ContentPlugin WITH(ROWLOCK)
210 SET Content = CAST(REPLACE(CAST(Content AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
211
212 IF(@@Error > 0)
213 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__ContentPlugin')
214
215--External Page
216 IF(@ChangeToRelative = 1)
217 UPDATE AP__ContentWebPage WITH(ROWLOCK)
218 SET WebPage = CAST(REPLACE(REPLACE(REPLACE(CAST(WebPage AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
219 WHERE UrlType = 0
220 ELSE
221 UPDATE AP__ContentWebPage WITH(ROWLOCK)
222 SET WebPage = CAST(REPLACE(CAST(WebPage AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
223 WHERE UrlType = 0
224
225 IF(@@Error > 0)
226 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__ContentWebPage')
227
228--Links
229 IF(@ChangeToRelative = 1)
230 UPDATE AP__Links WITH(ROWLOCK)
231 SET LinkPath = REPLACE(REPLACE(REPLACE(LinkPath, @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL)
232 WHERE LinkType = 0
233 ELSE
234 UPDATE AP__Links WITH(ROWLOCK)
235 SET LinkPath = REPLACE(LinkPath, @SourceURL, @NewURL)
236 WHERE LinkType = 0
237
238 IF(@@Error > 0)
239 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__Links')
240
241
242 IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors'))
243BEGIN
244 IF EXISTS (SELECT * FROM #tmpErrors)
245 BEGIN
246 SELECT * FROM #tmpErrors
247 ROLLBACK TRANSACTION
248 PRINT 'DataBase update failed'
249 END
250 ELSE
251 BEGIN
252 INSERT INTO #tmpErrors ([Message]) VALUES ('DataBase update succeeded')
253 SELECT * FROM #tmpErrors
254 COMMIT TRANSACTION
255 PRINT 'step 2 update succeeded'
256 END
257
258END
259
260Begin Transaction
261--MultiLanguage
262 IF(((@ChangeToRelative = 1) and (@TargetURL <> '')) or (@ChangeToRelative = 0))--Notificaciones que hacen envio de email
263 begin
264
265 UPDATE AP__Multiidioma WITH(ROWLOCK)
266 SET Descripcion = CAST(REPLACE(CAST(Descripcion AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext)
267 WHERE ((TipoTermino in (37,36)) and (IdTerminoCampo in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (8,5,31,24))))
268
269
270 IF(@@Error > 0)
271 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__Multiidioma (Notify via Email)')
272
273 end
274
275 IF(@ChangeToRelative = 1)
276 begin
277 UPDATE AP__Multiidioma WITH(ROWLOCK)
278 SET Descripcion = CAST(REPLACE(REPLACE(REPLACE(CAST(Descripcion AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
279 WHERE TipoTermino NOT IN (36,37)
280
281 UPDATE AP__Multiidioma WITH(ROWLOCK)
282 SET Descripcion = CAST(REPLACE(REPLACE(REPLACE(CAST(Descripcion AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + N'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
283 WHERE (TipoTermino in (37,36)) and (IdTerminoCampo in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (1,3)))--Notificación empleado y externo
284
285 end
286 ELSE
287 begin
288 UPDATE AP__Multiidioma WITH(ROWLOCK)
289 SET Descripcion = CAST(REPLACE(CAST(Descripcion AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
290 WHERE TipoTermino NOT IN (36,37)
291
292 UPDATE AP__Multiidioma WITH(ROWLOCK)
293 SET Descripcion = CAST(REPLACE(CAST(Descripcion AS nvarchar(max)), @SourceURL, @NewURL) AS ntext)
294 WHERE (TipoTermino in (37,36)) and (IdTerminoCampo in (select ID from AP__BPM_TareasSistClases with(nolock) where IdFuncion in (1,3)))--Notificación empleado y externo
295 end
296
297 IF(@@Error > 0)
298 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__Multiidioma')
299
300--External Query
301 IF(@ChangeToRelative = 1)
302 UPDATE AP__LineaConsulta WITH(ROWLOCK)
303 SET Valor = CAST(REPLACE(REPLACE(REPLACE(CAST(Valor AS nvarchar(max)), @SourceURL + N'Home/', @NewURL), @SourceURL + 'AP/', @NewURL), @SourceURL, @TargetURL) AS ntext)
304 FROM AP__CabeceraConsulta Con WITH(NOLOCK)
305 WHERE Con.ID = AP__LineaConsulta.IdCabecera
306 AND Con.PaginaWeb = 10
307 ELSE
308 UPDATE AP__LineaConsulta WITH(ROWLOCK)
309 SET Valor = CAST(REPLACE(CAST(Valor AS nvarchar(max)), @SourceURL, @TargetURL) AS ntext)
310 FROM AP__CabeceraConsulta Con WITH(NOLOCK)
311 WHERE Con.ID = AP__LineaConsulta.IdCabecera
312 AND Con.PaginaWeb = 10
313
314 IF(@@Error > 0)
315 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update AP__LineaConsulta')
316
317IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors'))
318BEGIN
319 IF EXISTS (SELECT * FROM #tmpErrors)
320 BEGIN
321 SELECT * FROM #tmpErrors
322 ROLLBACK TRANSACTION
323 PRINT 'DataBase update failed'
324 END
325 ELSE
326 BEGIN
327 INSERT INTO #tmpErrors ([Message]) VALUES ('DataBase update succeeded')
328 SELECT * FROM #tmpErrors
329 COMMIT TRANSACTION
330 PRINT 'step 3 update succeeded'
331 END
332
333END
334
335Begin transaction
336--Update Value multiLine Rich
337 DECLARE @FieldName AS NVARCHAR(255)
338 DECLARE @TableName AS NVARCHAR(255)
339 DECLARE @RealTableName AS NVARCHAR(255)
340 DECLARE @OverFlow AS INT
341 DECLARE @SQL AS NVARCHAR(MAX)
342
343
344 DECLARE cursor_field CURSOR FOR
345
346 SELECT cmp.NombreInterno, cmp.NombreTabla, cmp.IdTablaOverflow
347 FROM AP__CamposTabla cmp WITH(NOLOCK)
348 WHERE cmp.TipoCampo = 19
349
350 OPEN cursor_field
351
352 FETCH NEXT FROM cursor_field
353 INTO @FieldName, @TableName, @OverFlow
354
355 WHILE @@FETCH_STATUS = 0
356 BEGIN
357
358 IF(@OverFlow > 0)
359 SET @RealTableName = @TableName + N'_o' + CAST(@OverFlow AS NVARCHAR(5))
360 ELSE
361 SET @RealTableName = @TableName
362
363 IF EXISTS(SELECT * FROM dbo.syscolumns WHERE Name = @FieldName and ID = Object_ID(@RealTableName))
364 BEGIN
365 IF(@ChangeToRelative = 1)
366 SET @SQL = N'UPDATE [' + @RealTableName + N'] WITH(ROWLOCK) SET [' + @FieldName + N'] = CAST(REPLACE(REPLACE(REPLACE(CAST([' + @FieldName
367 + N'] AS nvarchar(max)), ''' + @SourceURL + N'Home/'', ''' + @NewURL + N'''), ''' + @SourceURL + N'AP/'', ''' + @NewURL + N'''), ''' + @SourceURL + N''', '''
368 + @TargetURL + ''') AS ntext)'
369 ELSE
370 SET @SQL = N'UPDATE [' + @RealTableName + N'] WITH(ROWLOCK) SET [' + @FieldName + N'] = CAST(REPLACE(CAST([' + @FieldName + N'] AS nvarchar(max)), ''' + @SourceURL
371 + N''', ''' + @NewURL + N''') AS ntext)'
372
373 BEGIN TRY
374 EXECUTE sp_executesql @SQL
375 END TRY
376 BEGIN CATCH
377 INSERT INTO #tmpErrors ([Message]) VALUES ('Error: Update '+@RealTableName)
378 END CATCH
379 END
380
381 FETCH NEXT FROM cursor_field
382 INTO @FieldName, @TableName, @OverFlow
383
384 END
385 CLOSE cursor_field
386 DEALLOCATE cursor_field
387
388IF EXISTS (SELECT * FROM tempdb..sysobjects WHERE id=OBJECT_ID('tempdb..#tmpErrors'))
389BEGIN
390 IF EXISTS (SELECT * FROM #tmpErrors)
391 BEGIN
392 SELECT * FROM #tmpErrors
393 ROLLBACK TRANSACTION
394 PRINT 'DataBase update failed'
395 END
396 ELSE
397 BEGIN
398 INSERT INTO #tmpErrors ([Message]) VALUES ('DataBase update succeeded')
399 SELECT * FROM #tmpErrors
400 COMMIT TRANSACTION
401 PRINT 'DataBase update succeeded'
402 END
403 DROP TABLE #tmpErrors
404END