Compare View
Commits (2)
-
…omercial, buscando maior performance quando necessário.
-
…o para não mostrar erro para o usuário quando a divisão da cota do no der zero
Showing
8 changed files
Show diff stats
db/SqlServer/jobs/jobAtualizaTabelasSistemaComercial.sql
0 → 100644
... | ... | @@ -0,0 +1,67 @@ |
1 | +USE [msdb] | |
2 | +GO | |
3 | + | |
4 | +/****** Object: Job [jobAtualizaTabelasSistemaComercial] Script Date: 02/24/2022 23:51:46 ******/ | |
5 | +BEGIN TRANSACTION | |
6 | +DECLARE @ReturnCode INT | |
7 | +SELECT @ReturnCode = 0 | |
8 | +/****** Object: JobCategory [[Uncategorized (Local)]]] Script Date: 02/24/2022 23:51:46 ******/ | |
9 | +IF NOT EXISTS (SELECT name FROM msdb.dbo.syscategories WHERE name=N'[Uncategorized (Local)]' AND category_class=1) | |
10 | +BEGIN | |
11 | +EXEC @ReturnCode = msdb.dbo.sp_add_category @class=N'JOB', @type=N'LOCAL', @name=N'[Uncategorized (Local)]' | |
12 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
13 | + | |
14 | +END | |
15 | + | |
16 | +DECLARE @jobId BINARY(16) | |
17 | +EXEC @ReturnCode = msdb.dbo.sp_add_job @job_name=N'jobAtualizaTabelasSistemaComercial', | |
18 | + @enabled=1, | |
19 | + @notify_level_eventlog=0, | |
20 | + @notify_level_email=0, | |
21 | + @notify_level_netsend=0, | |
22 | + @notify_level_page=0, | |
23 | + @delete_level=0, | |
24 | + @description=N'No description available.', | |
25 | + @category_name=N'[Uncategorized (Local)]', | |
26 | + @owner_login_name=N'sa', @job_id = @jobId OUTPUT | |
27 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
28 | +/****** Object: Step [atualizarTodasTabelas] Script Date: 02/24/2022 23:51:46 ******/ | |
29 | +EXEC @ReturnCode = msdb.dbo.sp_add_jobstep @job_id=@jobId, @step_name=N'atualizarTodasTabelas', | |
30 | + @step_id=1, | |
31 | + @cmdexec_success_code=0, | |
32 | + @on_success_action=1, | |
33 | + @on_success_step_id=0, | |
34 | + @on_fail_action=2, | |
35 | + @on_fail_step_id=0, | |
36 | + @retry_attempts=0, | |
37 | + @retry_interval=0, | |
38 | + @os_run_priority=0, @subsystem=N'TSQL', | |
39 | + @command=N'exec dbo.atualizaTabelasSistemaComercial', | |
40 | + @database_name=N'geosan', | |
41 | + @flags=0 | |
42 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
43 | +EXEC @ReturnCode = msdb.dbo.sp_update_job @job_id = @jobId, @start_step_id = 1 | |
44 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
45 | +EXEC @ReturnCode = msdb.dbo.sp_add_jobschedule @job_id=@jobId, @name=N'Final expediente', | |
46 | + @enabled=1, | |
47 | + @freq_type=8, | |
48 | + @freq_interval=62, | |
49 | + @freq_subday_type=1, | |
50 | + @freq_subday_interval=0, | |
51 | + @freq_relative_interval=0, | |
52 | + @freq_recurrence_factor=1, | |
53 | + @active_start_date=20220225, | |
54 | + @active_end_date=99991231, | |
55 | + @active_start_time=10000, | |
56 | + @active_end_time=235959, | |
57 | + @schedule_uid=N'2cf5b330-de94-4dbc-9071-e23bbccc9bd7' | |
58 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
59 | +EXEC @ReturnCode = msdb.dbo.sp_add_jobserver @job_id = @jobId, @server_name = N'(local)' | |
60 | +IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback | |
61 | +COMMIT TRANSACTION | |
62 | +GOTO EndSave | |
63 | +QuitWithRollback: | |
64 | + IF (@@TRANCOUNT > 0) ROLLBACK TRANSACTION | |
65 | +EndSave: | |
66 | + | |
67 | +GO | |
0 | 68 | \ No newline at end of file | ... | ... |
db/SqlServer/procedures/atualizaClientesDoSistemaComercial.sql
0 → 100644
... | ... | @@ -0,0 +1,27 @@ |
1 | +USE [geosan] | |
2 | +GO | |
3 | +/****** Object: StoredProcedure [dbo].[atualizaClientesDoSistemaComercial] Script Date: 02/24/2022 17:33:50 ******/ | |
4 | +SET ANSI_NULLS ON | |
5 | +GO | |
6 | +SET QUOTED_IDENTIFIER ON | |
7 | +GO | |
8 | +-- ============================================= | |
9 | +-- Author: José Maria Villac Pinheiro | |
10 | +-- Create date: 24/02/2022 | |
11 | +-- Description: Atualiza a tabela com os dados so sistema comercial, com o objetivo do sistema rodar maisr rapidamente | |
12 | +-- NXGS_V_LIG_COMERCIAL_CONEXAO - é a vista conectada diretamente ao sistema comercial | |
13 | +-- ============================================= | |
14 | +ALTER PROCEDURE [dbo].[atualizaClientesDoSistemaComercial] | |
15 | +AS | |
16 | +BEGIN | |
17 | + IF OBJECT_ID ('dbo.NXGS_V_LIG_COMERCIAL') IS NOT NULL | |
18 | + BEGIN | |
19 | + DROP TABLE [dbo].[NXGS_V_LIG_COMERCIAL]; | |
20 | + SELECT * INTO [dbo].[NXGS_V_LIG_COMERCIAL] FROM [dbo].[NXGS_V_LIG_COMERCIAL_CONEXAO]; | |
21 | + END | |
22 | + ELSE | |
23 | + BEGIN | |
24 | + SELECT * INTO [dbo].[NXGS_V_LIG_COMERCIAL] FROM [dbo].[NXGS_V_LIG_COMERCIAL_CONEXAO]; | |
25 | + END | |
26 | + SET NOCOUNT ON; | |
27 | +END | ... | ... |
... | ... | @@ -0,0 +1,26 @@ |
1 | +USE [geosan] | |
2 | +GO | |
3 | +/****** Object: StoredProcedure [dbo].[atualizaConsumoMedio] Script Date: 02/24/2022 17:38:51 ******/ | |
4 | +SET ANSI_NULLS ON | |
5 | +GO | |
6 | +SET QUOTED_IDENTIFIER ON | |
7 | +GO | |
8 | +-- ============================================= | |
9 | +-- Author: José Maria Villac Pinheiro | |
10 | +-- Create date: 24/02/2022 | |
11 | +-- Description: Atualiza a tabela com os dados so sistema comercial, com o objetivo do sistema rodar maisr rapidamente | |
12 | +-- ============================================= | |
13 | +ALTER PROCEDURE [dbo].[atualizaConsumoMedio] | |
14 | +AS | |
15 | +BEGIN | |
16 | + IF OBJECT_ID ('dbo.NXGS_V_LIG_COM_CONSUMO_MEDIO') IS NOT NULL | |
17 | + BEGIN | |
18 | + DROP TABLE [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO]; | |
19 | + SELECT * INTO [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO] FROM [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO_CONEXAO]; | |
20 | + END | |
21 | + ELSE | |
22 | + BEGIN | |
23 | + SELECT * INTO [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO] FROM [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO_CONEXAO]; | |
24 | + END | |
25 | + SET NOCOUNT ON; | |
26 | +END | |
0 | 27 | \ No newline at end of file | ... | ... |
... | ... | @@ -0,0 +1,26 @@ |
1 | +USE [geosan] | |
2 | +GO | |
3 | +/****** Object: StoredProcedure [dbo].[atualizaConsumoMedio] Script Date: 02/24/2022 17:38:51 ******/ | |
4 | +SET ANSI_NULLS ON | |
5 | +GO | |
6 | +SET QUOTED_IDENTIFIER ON | |
7 | +GO | |
8 | +-- ============================================= | |
9 | +-- Author: José Maria Villac Pinheiro | |
10 | +-- Create date: 24/02/2022 | |
11 | +-- Description: Atualiza a tabela com os dados so sistema comercial, com o objetivo do sistema rodar maisr rapidamente | |
12 | +-- ============================================= | |
13 | +ALTER PROCEDURE [dbo].[atualizaConsumoMedio] | |
14 | +AS | |
15 | +BEGIN | |
16 | + IF OBJECT_ID ('dbo.NXGS_V_LIG_COM_CONSUMO_MEDIO') IS NOT NULL | |
17 | + BEGIN | |
18 | + DROP TABLE [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO]; | |
19 | + SELECT * INTO [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO] FROM [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO_CONEXAO]; | |
20 | + END | |
21 | + ELSE | |
22 | + BEGIN | |
23 | + SELECT * INTO [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO] FROM [dbo].[NXGS_V_LIG_COM_CONSUMO_MEDIO_CONEXAO]; | |
24 | + END | |
25 | + SET NOCOUNT ON; | |
26 | +END | |
0 | 27 | \ No newline at end of file | ... | ... |
db/SqlServer/procedures/atualizaTabelasSistemaComercial.sql
0 → 100644
... | ... | @@ -0,0 +1,20 @@ |
1 | +USE [geosan] | |
2 | +GO | |
3 | +/****** Object: StoredProcedure [dbo].[atualizaTabelasSistemaComercial] Script Date: 02/24/2022 23:02:08 ******/ | |
4 | +SET ANSI_NULLS ON | |
5 | +GO | |
6 | +SET QUOTED_IDENTIFIER ON | |
7 | +GO | |
8 | +-- ============================================= | |
9 | +-- Author: José Maria Villac Pinheiro | |
10 | +-- Create date: 24/02/2022 | |
11 | +-- Description: Atualiza as tabelas com os dados so sistema comercial, com o objetivo do sistema rodar maisr rapidamente | |
12 | +-- ============================================= | |
13 | +ALTER PROCEDURE [dbo].[atualizaTabelasSistemaComercial] | |
14 | +AS | |
15 | +BEGIN | |
16 | + EXEC dbo.atualizaClientesDoSistemaComercial; | |
17 | + EXEC dbo.atualizaConsumoMedio; | |
18 | + EXEC dbo.atualizaConsumo; | |
19 | + SET NOCOUNT ON; | |
20 | +END | |
0 | 21 | \ No newline at end of file | ... | ... |
install/GeraSetupGeoSan/Codigo Gerador Instalador Geosan com TerraComponents.iss
trunk/Modules/Global.bas
... | ... | @@ -201,7 +201,7 @@ Public Sub Main() |
201 | 201 | End If |
202 | 202 | 'Configura a versão atual do GeoSan |
203 | 203 | Versao_Geo = App.Major & "." & App.Minor & "." & App.Revision |
204 | - Versao_Geo = "08.02.00" | |
204 | + Versao_Geo = "08.02.01" | |
205 | 205 | glo.diretorioGeoSan = App.path 'salva globalmente o caminho onde encontra-se o GeoSan.exe |
206 | 206 | SaveLoadGlobalData glo.diretorioGeoSan + "/controles/variaveisGlobais.txt", True 'salva em um arquivo todas as variáveis globais para poderem ser acessadas por outras aplicações |
207 | 207 | connn = "" | ... | ... |
trunk/classes/CIntBilinear.cls
... | ... | @@ -50,7 +50,7 @@ Trata_Erro: |
50 | 50 | If Err.Number = 0 Or Err.Number = 20 Then |
51 | 51 | Resume Next |
52 | 52 | Else |
53 | - ErroUsuario.Registra "CIntBilinear", "CalcInterpolacao - divisão por zero no MDT", CStr(Err.Number), CStr(Err.Description), True, glo.enviaEmails | |
53 | + ErroUsuario.Registra "CIntBilinear", "CalcInterpolacao - divisão por zero no MDT", CStr(Err.Number), CStr(Err.Description), False, glo.enviaEmails | |
54 | 54 | End If |
55 | 55 | End Function |
56 | 56 | ... | ... |