r5iyp9fL

1CREATE TABLE F5_RESULT (
2	OBJETO VARCHAR(100) NOT NULL,
3	STATUS VARCHAR(10) NOT NULL
4)
5GO
6-- 1 - Create Table TWEB_Log_Integracao
7IF OBJECT_ID('TWEB_Log_Integracao') IS NOT NULL
8	BEGIN
9		INSERT INTO F5_RESULT VALUES ('1 - Create Table TWEB_Log_Integracao', 'Sucesso')
10	END
11ELSE
12	BEGIN
13		INSERT INTO F5_RESULT VALUES ('1 - Create Table TWEB_Log_Integracao', 'Erro')
14	END
15GO
16-- 2 - Create Table TWEB_Ligue_me_Atendimento_Lista
17IF OBJECT_ID('TWEB_Ligue_me_Atendimento_Lista') IS NOT NULL
18	BEGIN
19		INSERT INTO F5_RESULT VALUES ('2 - Create Table TWEB_Ligue_me_Atendimento_Lista', 'Sucesso')
20	END
21ELSE
22	BEGIN
23		INSERT INTO F5_RESULT VALUES ('2 - Create Table TWEB_Ligue_me_Atendimento_Lista', 'Erro')
24	END
25GO
26-- 3.1 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_from
27IF EXISTS(SELECT 1 FROM sys.columns 
28          WHERE Name = N'dc_horario_from'
29          AND Object_ID = Object_ID(N'TWEB_Ligue_me_Solicitacao'))
30	BEGIN
31		INSERT INTO F5_RESULT VALUES ('3.1 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_from', 'Sucesso')
32	END
33ELSE
34	BEGIN
35		INSERT INTO F5_RESULT VALUES ('3.1 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_from', 'Erro')
36	END
37GO
38-- 3.2 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_until
39IF EXISTS(SELECT 1 FROM sys.columns 
40          WHERE Name = N'dc_horario_until'
41          AND Object_ID = Object_ID(N'TWEB_Ligue_me_Solicitacao'))
42	BEGIN
43		INSERT INTO F5_RESULT VALUES ('3.2 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_until', 'Sucesso')
44	END
45ELSE
46	BEGIN
47		INSERT INTO F5_RESULT VALUES ('3.2 - Alter Table TWEB_Ligue_me_Solicitacao.dc_horario_until', 'Erro')
48	END
49GO
50-- 4.1 - Alter Table TWEB_LPPJ.dc_horario_from
51IF EXISTS(SELECT 1 FROM sys.columns 
52          WHERE Name = N'dc_horario_from'
53          AND Object_ID = Object_ID(N'TWEB_LPPJ'))
54	BEGIN
55		INSERT INTO F5_RESULT VALUES ('4.1 - Alter Table TWEB_LPPJ.dc_horario_from', 'Sucesso')
56	END
57ELSE
58	BEGIN
59		INSERT INTO F5_RESULT VALUES ('4.1 - Alter Table TWEB_LPPJ.dc_horario_from', 'Erro')
60	END
61GO
62-- 4.2 - Alter Table TWEB_LPPJ.dc_horario_until
63IF EXISTS(SELECT 1 FROM sys.columns 
64          WHERE Name = N'dc_horario_until'
65          AND Object_ID = Object_ID(N'TWEB_LPPJ'))
66	BEGIN
67		INSERT INTO F5_RESULT VALUES ('4.2 - Alter Table TWEB_LPPJ.dc_horario_until', 'Sucesso')
68	END
69ELSE
70	BEGIN
71		INSERT INTO F5_RESULT VALUES ('4.2 - Alter Table TWEB_LPPJ.dc_horario_until', 'Erro')
72	END
73GO
74-- 6 - Create Procedure P_WEB_INSERT_LOG_INTEGRACAO
75IF OBJECT_ID('P_WEB_INSERT_LOG_INTEGRACAO') IS NOT NULL
76	BEGIN
77		INSERT INTO F5_RESULT VALUES ('6 - Create Procedure P_WEB_INSERT_LOG_INTEGRACAO', 'Sucesso')
78	END
79ELSE
80	BEGIN
81		INSERT INTO F5_RESULT VALUES ('6 - Create Procedure P_WEB_INSERT_LOG_INTEGRACAO', 'Erro')
82	END
83GO
84-- 7 - Alter Procedure P_WEB_INSERT_LPPJ
85IF EXISTS (SELECT 1
86           FROM SYS.OBJECTS
87           WHERE TYPE = 'P'
88           AND NAME = 'P_WEB_INSERT_LPPJ'
89	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
90	BEGIN
91		INSERT INTO F5_RESULT VALUES ('7 - Alter Procedure P_WEB_INSERT_LPPJ', 'Sucesso')
92	END
93ELSE
94	BEGIN
95		INSERT INTO F5_RESULT VALUES ('7 - Alter Procedure P_WEB_INSERT_LPPJ', 'Erro')
96	END
97GO
98-- 8 - Alter Procedure P_WEB_INSERT_SOLICITACAO
99IF EXISTS (SELECT 1
100           FROM SYS.OBJECTS
101           WHERE TYPE = 'P'
102           AND NAME = 'P_WEB_INSERT_SOLICITACAO'
103	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
104	BEGIN
105		INSERT INTO F5_RESULT VALUES ('8 - Alter Procedure P_WEB_INSERT_SOLICITACAO', 'Sucesso')
106	END
107ELSE
108	BEGIN
109		INSERT INTO F5_RESULT VALUES ('8 - Alter Procedure P_WEB_INSERT_SOLICITACAO', 'Erro')
110	END
111GO
112-- 9 - Create Procedure P_WEB_SEL_HORARIO_ATENDIMENTO_LISTA
113IF OBJECT_ID('P_WEB_SEL_HORARIO_ATENDIMENTO_LISTA') IS NOT NULL
114	BEGIN
115		INSERT INTO F5_RESULT VALUES ('9 - Create Procedure P_WEB_SEL_HORARIO_ATENDIMENTO_LISTA', 'Sucesso')
116	END
117ELSE
118	BEGIN
119		INSERT INTO F5_RESULT VALUES ('9 - Create Procedure P_WEB_SEL_HORARIO_ATENDIMENTO_LISTA', 'Erro')
120	END
121GO
122-- 10 - Create Procedure PADNX_I_TWEB_LIGUE_ME_ATENDIMENTO_LISTA
123IF OBJECT_ID('PADNX_I_TWEB_LIGUE_ME_ATENDIMENTO_LISTA') IS NOT NULL
124	BEGIN
125		INSERT INTO F5_RESULT VALUES ('10 - Create Procedure PADNX_I_TWEB_LIGUE_ME_ATENDIMENTO_LISTA', 'Sucesso')
126	END
127ELSE
128	BEGIN
129		INSERT INTO F5_RESULT VALUES ('10 - Create Procedure PADNX_I_TWEB_LIGUE_ME_ATENDIMENTO_LISTA', 'Erro')
130	END
131GO
132-- 11 - Create Procedure PADNX_S_HORARIO_ATENDIMENTO_LISTA
133IF OBJECT_ID('PADNX_S_HORARIO_ATENDIMENTO_LISTA') IS NOT NULL
134	BEGIN
135		INSERT INTO F5_RESULT VALUES ('11 - Create Procedure PADNX_S_HORARIO_ATENDIMENTO_LISTA', 'Sucesso')
136	END
137ELSE
138	BEGIN
139		INSERT INTO F5_RESULT VALUES ('11 - Create Procedure PADNX_S_HORARIO_ATENDIMENTO_LISTA', 'Erro')
140	END
141GO
142-- 12 - Create Procedure PADNX_S_LISTA_CAMPANHA_POR_CAMPANHA
143IF OBJECT_ID('PADNX_S_LISTA_CAMPANHA_POR_CAMPANHA') IS NOT NULL
144	BEGIN
145		INSERT INTO F5_RESULT VALUES ('12 - Create Procedure PADNX_S_LISTA_CAMPANHA_POR_CAMPANHA', 'Sucesso')
146	END
147ELSE
148	BEGIN
149		INSERT INTO F5_RESULT VALUES ('12 - Create Procedure PADNX_S_LISTA_CAMPANHA_POR_CAMPANHA', 'Erro')
150	END
151GO
152-- 13 - Alter Procedure PADNX_S_TWEB_LPPJ
153IF EXISTS (SELECT 1
154           FROM SYS.OBJECTS
155           WHERE TYPE = 'P'
156           AND NAME = 'PADNX_S_TWEB_LPPJ'
157	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
158	BEGIN
159		INSERT INTO F5_RESULT VALUES ('13 - Alter Procedure PADNX_S_TWEB_LPPJ', 'Sucesso')
160	END
161ELSE
162	BEGIN
163		INSERT INTO F5_RESULT VALUES ('13 - Alter Procedure PADNX_S_TWEB_LPPJ', 'Erro')
164	END
165GO
166-- 14 - Alter Procedure PANDX_SEARCH_LIGUEME
167IF EXISTS (SELECT 1
168           FROM SYS.OBJECTS
169           WHERE TYPE = 'P'
170           AND NAME = 'PANDX_SEARCH_LIGUEME'
171	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
172	BEGIN
173		INSERT INTO F5_RESULT VALUES ('14 - Alter Procedure PANDX_SEARCH_LIGUEME', 'Sucesso')
174	END
175ELSE
176	BEGIN
177		INSERT INTO F5_RESULT VALUES ('14 - Alter Procedure PANDX_SEARCH_LIGUEME', 'Erro')
178	END
179GO
180-- 16 - Create Procedure PADNX_S_TWEB_PARCEIROS_LISTA
181IF OBJECT_ID('PADNX_S_TWEB_PARCEIROS_LISTA') IS NOT NULL
182	BEGIN
183		INSERT INTO F5_RESULT VALUES ('16 - Create Procedure PADNX_S_TWEB_PARCEIROS_LISTA', 'Sucesso')
184	END
185ELSE
186	BEGIN
187		INSERT INTO F5_RESULT VALUES ('16 - Create Procedure PADNX_S_TWEB_PARCEIROS_LISTA', 'Erro')
188	END
189GO
190-- 17 - Create Procedure PADNX_S_TWEB_LOG_INTEGRACAO
191IF OBJECT_ID('PADNX_S_TWEB_LOG_INTEGRACAO') IS NOT NULL
192	BEGIN
193		INSERT INTO F5_RESULT VALUES ('17 - Create Procedure PADNX_S_TWEB_LOG_INTEGRACAO', 'Sucesso')
194	END
195ELSE
196	BEGIN
197		INSERT INTO F5_RESULT VALUES ('17 - Create Procedure PADNX_S_TWEB_LOG_INTEGRACAO', 'Erro')
198	END
199GO
200-- 18 - Alter Table TWEB_LPPJ.dc_utm_content
201IF EXISTS(SELECT 1 FROM sys.columns 
202          WHERE Name = N'dc_utm_content'
203          AND Object_ID = Object_ID(N'TWEB_LPPJ'))
204	BEGIN
205		INSERT INTO F5_RESULT VALUES ('18 - Alter Table TWEB_LPPJ.dc_utm_content', 'Sucesso')
206	END
207ELSE
208	BEGIN
209		INSERT INTO F5_RESULT VALUES ('18 - Alter Table TWEB_LPPJ.dc_utm_content', 'Erro')
210	END
211GO
212-- 19 - Alter Procedure P_WEB_INSERT_LPPJ
213IF EXISTS (SELECT 1
214           FROM SYS.OBJECTS
215           WHERE TYPE = 'P'
216           AND NAME = 'P_WEB_INSERT_LPPJ'
217	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
218	BEGIN
219		INSERT INTO F5_RESULT VALUES ('19 - Alter Procedure P_WEB_INSERT_LPPJ', 'Sucesso')
220	END
221ELSE
222	BEGIN
223		INSERT INTO F5_RESULT VALUES ('19 - Alter Procedure P_WEB_INSERT_LPPJ', 'Erro')
224	END
225GO
226-- 20 - Alter Procedure PADNX_S_TWEB_LPPJ
227IF EXISTS (SELECT 1
228           FROM SYS.OBJECTS
229           WHERE TYPE = 'P'
230           AND NAME = 'PADNX_S_TWEB_LPPJ'
231	       AND MODIFY_DATE > DATEADD(DAY, -5, GETDATE()))
232	BEGIN
233		INSERT INTO F5_RESULT VALUES ('20 - Alter Procedure PADNX_S_TWEB_LPPJ', 'Sucesso')
234	END
235ELSE
236	BEGIN
237		INSERT INTO F5_RESULT VALUES ('20 - Alter Procedure PADNX_S_TWEB_LPPJ', 'Erro')
238	END
239GO
240SELECT * FROM F5_RESULT
241GO
242DROP TABLE F5_RESULT