From e7ac09920605fb819bc9ed71304bdce9e63a17f6 Mon Sep 17 00:00:00 2001 From: anderson.peterle@previdencia.gov.br Date: Fri, 4 Jul 2008 15:43:43 +0000 Subject: [PATCH] Identificacao dinamica de versao/correcao de S.O. habilitada no Gerente de Coletas para aplicacao em todas as versoes do S.O. MS-Windows. Torna-se necessario um DePara dos codigos fixos outrora gerados. Exemplo: O id_so codigo 8 identificava Windows XP. Com essa habilitacao esse codigo desmembra-se em 4: Windows XP, Windows XP-SP1, Windows XP-SP2 e Windows XP-SP3. Esta mesma observacao aplica-se aas demais versoes corrigidas deste S.O. --- ger_cols/ger_cols.dof | 4 ++-- ger_cols/ger_cols.dpr | 5 ++++- ger_cols/ger_cols.res | Bin 4824 -> 0 bytes 3 files changed, 6 insertions(+), 3 deletions(-) diff --git a/ger_cols/ger_cols.dof b/ger_cols/ger_cols.dof index b6132fb..4e3229e 100755 --- a/ger_cols/ger_cols.dof +++ b/ger_cols/ger_cols.dof @@ -115,7 +115,7 @@ AutoIncBuild=0 MajorVer=2 MinorVer=4 Release=0 -Build=371 +Build=569 Debug=0 PreRelease=0 Special=0 @@ -126,7 +126,7 @@ CodePage=1252 [Version Info Keys] CompanyName=Dataprev-Unidade Regional Espírito Santo FileDescription=Módulo Gerente de Coletas do Sistema CACIC -FileVersion=2.4.0.371 +FileVersion=2.4.0.569 InternalName= LegalCopyright= LegalTrademarks= diff --git a/ger_cols/ger_cols.dpr b/ger_cols/ger_cols.dpr index 974c08a..54ddcf9 100755 --- a/ger_cols/ger_cols.dpr +++ b/ger_cols/ger_cols.dpr @@ -540,8 +540,11 @@ begin IntToStr(minorVer) + ifThen(CSDVersion='','','.'+CSDVersion); + { + Forço o envio do identificador interno if (Result = 0) then - Result := abstraiCSD(v_te_so); + } + Result := abstraiCSD(v_te_so); end; procedure Matar(v_dir,v_files: string); diff --git a/ger_cols/ger_cols.res b/ger_cols/ger_cols.res index fa55997..07c4b14 100755 Binary files a/ger_cols/ger_cols.res and b/ger_cols/ger_cols.res differ -- libgit2 0.21.2