From 2166f4c025736b8f5ec80bc09712811b7253d412 Mon Sep 17 00:00:00 2001 From: anderson.peterle@previdencia.gov.br Date: Thu, 19 Jun 2008 19:18:28 +0000 Subject: [PATCH] Ajustes no versionamento dos agentes para 2.4.0.371 --- cacic2.dof | 2 +- cacic2.res | Bin 4900 -> 0 bytes chkcacic/chkcacic.dof | 2 +- chkcacic/chkcacic.res | Bin 5212 -> 0 bytes chksis/chksis.dof | 2 +- chksis/chksis.res | Bin 5164 -> 0 bytes col_anvi/col_anvi.dof | 2 +- col_anvi/col_anvi.res | Bin 16320 -> 0 bytes col_hard/col_hard.dof | 2 +- col_hard/col_hard.res | Bin 16316 -> 0 bytes col_moni/col_moni.dof | 2 +- col_moni/col_moni.res | Bin 16276 -> 0 bytes col_patr/col_patr.dof | 2 +- col_patr/col_patr.res | Bin 16320 -> 0 bytes col_soft/col_soft.dof | 2 +- col_soft/col_soft.res | Bin 16336 -> 0 bytes col_undi/col_undi.dof | 2 +- col_undi/col_undi.res | Bin 16336 -> 0 bytes ger_cols/ger_cols.dof | 2 +- ger_cols/ger_cols.res | Bin 4824 -> 0 bytes ini_cols/ini_cols.dof | 2 +- ini_cols/ini_cols.res | Bin 6736 -> 0 bytes main.pas | 9 ++++++--- mapa/mapacacic.dof | 2 +- mapa/mapacacic.res | Bin 5148 -> 0 bytes testacrypt/testacrypt.dof | 12 ++++++------ testacrypt/testacrypt.res | Bin 876 -> 0 bytes vaca/vaca.dof | 2 +- vaca/vaca.res | Bin 1856 -> 0 bytes vacon/vacon.dof | 2 +- vacon/vacon.res | Bin 4860 -> 0 bytes 31 files changed, 26 insertions(+), 23 deletions(-) diff --git a/cacic2.dof b/cacic2.dof index c74d9ac..a97b3d0 100755 --- a/cacic2.dof +++ b/cacic2.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Cacic - Agente Principal -ProductVersion=2.2.0.30 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlUnitAliases] Count=1 diff --git a/cacic2.res b/cacic2.res index e2c90c8..b4ec4fc 100755 Binary files a/cacic2.res and b/cacic2.res differ diff --git a/chkcacic/chkcacic.dof b/chkcacic/chkcacic.dof index ccd7437..8495f2b 100755 --- a/chkcacic/chkcacic.dof +++ b/chkcacic/chkcacic.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=ChkCACIC -ProductVersion=2.2.0.32 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlUnitAliases] Count=1 diff --git a/chkcacic/chkcacic.res b/chkcacic/chkcacic.res index 5eeb957..369cc87 100755 Binary files a/chkcacic/chkcacic.res and b/chkcacic/chkcacic.res differ diff --git a/chksis/chksis.dof b/chksis/chksis.dof index adebc43..66ff513 100755 --- a/chksis/chksis.dof +++ b/chksis/chksis.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=ChkSIS -ProductVersion=2.2.0.29 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/chksis/chksis.res b/chksis/chksis.res index 6c53354..f103d16 100755 Binary files a/chksis/chksis.res and b/chksis/chksis.res differ diff --git a/col_anvi/col_anvi.dof b/col_anvi/col_anvi.dof index 3948dab..553d760 100755 --- a/col_anvi/col_anvi.dof +++ b/col_anvi/col_anvi.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_ANVI -ProductVersion=2.2.0.1 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/col_anvi/col_anvi.res b/col_anvi/col_anvi.res index 9db2436..9a596b2 100755 Binary files a/col_anvi/col_anvi.res and b/col_anvi/col_anvi.res differ diff --git a/col_hard/col_hard.dof b/col_hard/col_hard.dof index 79055ed..2c41ba1 100755 --- a/col_hard/col_hard.dof +++ b/col_hard/col_hard.dof @@ -132,5 +132,5 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_Hard -ProductVersion=2.2.0.1 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) diff --git a/col_hard/col_hard.res b/col_hard/col_hard.res index 85d8ae3..5517281 100755 Binary files a/col_hard/col_hard.res and b/col_hard/col_hard.res differ diff --git a/col_moni/col_moni.dof b/col_moni/col_moni.dof index ab5ae11..496331d 100755 --- a/col_moni/col_moni.dof +++ b/col_moni/col_moni.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_MONI -ProductVersion=2.2.0.2 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/col_moni/col_moni.res b/col_moni/col_moni.res index 82d53ed..dd9ff41 100755 Binary files a/col_moni/col_moni.res and b/col_moni/col_moni.res differ diff --git a/col_patr/col_patr.dof b/col_patr/col_patr.dof index 4aad29f..394f480 100755 --- a/col_patr/col_patr.dof +++ b/col_patr/col_patr.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_PATR -ProductVersion=2.2.0.3 +ProductVersion=2.4.0.371 Comments=Baseado na Licença GPL(General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/col_patr/col_patr.res b/col_patr/col_patr.res index aebf687..a01b291 100755 Binary files a/col_patr/col_patr.res and b/col_patr/col_patr.res differ diff --git a/col_soft/col_soft.dof b/col_soft/col_soft.dof index 693eb4b..215fda5 100755 --- a/col_soft/col_soft.dof +++ b/col_soft/col_soft.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_SOFT -ProductVersion=2.2.0.1 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/col_soft/col_soft.res b/col_soft/col_soft.res index 1e57819..77ef841 100755 Binary files a/col_soft/col_soft.res and b/col_soft/col_soft.res differ diff --git a/col_undi/col_undi.dof b/col_undi/col_undi.dof index 63e4c9e..8696f55 100755 --- a/col_undi/col_undi.dof +++ b/col_undi/col_undi.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Col_UNDI -ProductVersion=2.2.0.2 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/col_undi/col_undi.res b/col_undi/col_undi.res index 9909099..e4b81ae 100755 Binary files a/col_undi/col_undi.res and b/col_undi/col_undi.res differ diff --git a/ger_cols/ger_cols.dof b/ger_cols/ger_cols.dof index be5e9a4..b6132fb 100755 --- a/ger_cols/ger_cols.dof +++ b/ger_cols/ger_cols.dof @@ -132,5 +132,5 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Ger_COLS -ProductVersion=2.2.0.34 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) diff --git a/ger_cols/ger_cols.res b/ger_cols/ger_cols.res index cd78338..fa55997 100755 Binary files a/ger_cols/ger_cols.res and b/ger_cols/ger_cols.res differ diff --git a/ini_cols/ini_cols.dof b/ini_cols/ini_cols.dof index 0141302..ed123c6 100755 --- a/ini_cols/ini_cols.dof +++ b/ini_cols/ini_cols.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName=Ini_COLS -ProductVersion=2.2.0.2 +ProductVersion=2.4.0.371 Comments=Baseado na licença GPL (General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/ini_cols/ini_cols.res b/ini_cols/ini_cols.res index 17ecb04..2c83f1a 100755 Binary files a/ini_cols/ini_cols.res and b/ini_cols/ini_cols.res differ diff --git a/main.pas b/main.pas index 202f3de..3378710 100755 --- a/main.pas +++ b/main.pas @@ -2067,6 +2067,7 @@ var strXML, intAux : integer; boolOK : boolean; begin + // ********************************************************************************************************** // Esta procedure tratará os comandos e suas ações, enviados em um pacote XML na requisição, conforme abaixo: // ********************************************************************************************************** @@ -2110,7 +2111,10 @@ begin strCmd := XML_RetornaValor('cmd',strXML); // As ações terão seus valores - if (strCmd in ['Execute','Ask','Erase','Exit']) then + if (strCmd = 'Execute') or + (strCmd = 'Ask') or + (strCmd = 'Erase') or + (strCmd = 'Exit') then AResponseinfo.ContentText := 'OK' else AResponseinfo.ContentText := 'COMANDO NÃO PERMITIDO!'; @@ -2119,7 +2123,7 @@ begin AResponseinfo.ContentText := 'ACESSO NÃO PERMITIDO!'; if (strCmd = 'Execute') then - ExecutaCacic(nil); + ExecutaCacic(nil) else if (strCmd = 'Ask') then Begin strFileName := XML_RetornaValor('FileName',strXML); @@ -2128,7 +2132,6 @@ begin else if (strCmd = 'Erase') then else if (strCmd = 'Exit') then Finaliza; - end; procedure TFormularioGeral.IdFTPServer1UserLogin(ASender: TIdFTPServerThread; const AUsername, APassword: String; var AAuthenticated: Boolean); diff --git a/mapa/mapacacic.dof b/mapa/mapacacic.dof index 591e53b..ce51674 100755 --- a/mapa/mapacacic.dof +++ b/mapa/mapacacic.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= -ProductVersion=1.0.0.11 +ProductVersion=2.4.0.371 Comments=Baseado na Licença GPL(General Public License) [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/mapa/mapacacic.res b/mapa/mapacacic.res index 62c7c2f..986779c 100755 Binary files a/mapa/mapacacic.res and b/mapa/mapacacic.res differ diff --git a/testacrypt/testacrypt.dof b/testacrypt/testacrypt.dof index 33f0201..d53ce45 100755 --- a/testacrypt/testacrypt.dof +++ b/testacrypt/testacrypt.dof @@ -110,12 +110,12 @@ ActiveLang= ProjectLang= RootDir=C:\Arquivos de programas\Borland\Delphi7\Bin\ [Version Info] -IncludeVerInfo=0 +IncludeVerInfo=1 AutoIncBuild=0 -MajorVer=1 -MinorVer=0 +MajorVer=2 +MinorVer=4 Release=0 -Build=0 +Build=371 Debug=0 PreRelease=0 Special=0 @@ -126,13 +126,13 @@ CodePage=1252 [Version Info Keys] CompanyName= FileDescription= -FileVersion=1.0.0.0 +FileVersion=2.4.0.371 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= -ProductVersion=1.0.0.0 +ProductVersion=2.4.0.371 Comments= [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/testacrypt/testacrypt.res b/testacrypt/testacrypt.res index 03109fc..acb25f5 100755 Binary files a/testacrypt/testacrypt.res and b/testacrypt/testacrypt.res differ diff --git a/vaca/vaca.dof b/vaca/vaca.dof index c30af36..4862cc6 100755 --- a/vaca/vaca.dof +++ b/vaca/vaca.dof @@ -132,4 +132,4 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= -ProductVersion=1.0.0.0 +ProductVersion=2.4.0.371 diff --git a/vaca/vaca.res b/vaca/vaca.res index b588411..c36235b 100755 Binary files a/vaca/vaca.res and b/vaca/vaca.res differ diff --git a/vacon/vacon.dof b/vacon/vacon.dof index f786c14..222d497 100755 --- a/vacon/vacon.dof +++ b/vacon/vacon.dof @@ -132,7 +132,7 @@ LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= -ProductVersion=1.0.0.0 +ProductVersion=2.4.0.371 Comments= [HistoryLists\hlDebugSourcePath] Count=1 diff --git a/vacon/vacon.res b/vacon/vacon.res index d60a685..ef3ee0d 100755 Binary files a/vacon/vacon.res and b/vacon/vacon.res differ -- libgit2 0.21.2