Commit 2166f4c025736b8f5ec80bc09712811b7253d412

Authored by anderson.peterle@previdencia.gov.br
1 parent d665ff76
Exists in master

Ajustes no versionamento dos agentes para 2.4.0.371

git-svn-id: http://svn.softwarepublico.gov.br/svn/cacic/cacic/trunk/agente-windows@514 fecfc0c7-e812-0410-ae72-849f08638ee7
cacic2.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Cacic - Agente Principal
135   -ProductVersion=2.2.0.30
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlUnitAliases]
138 138 Count=1
... ...
cacic2.res
No preview for this file type
chkcacic/chkcacic.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=ChkCACIC
135   -ProductVersion=2.2.0.32
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlUnitAliases]
138 138 Count=1
... ...
chkcacic/chkcacic.res
No preview for this file type
chksis/chksis.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=ChkSIS
135   -ProductVersion=2.2.0.29
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
chksis/chksis.res
No preview for this file type
col_anvi/col_anvi.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_ANVI
135   -ProductVersion=2.2.0.1
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
col_anvi/col_anvi.res
No preview for this file type
col_hard/col_hard.dof
... ... @@ -132,5 +132,5 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_Hard
135   -ProductVersion=2.2.0.1
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
... ...
col_hard/col_hard.res
No preview for this file type
col_moni/col_moni.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_MONI
135   -ProductVersion=2.2.0.2
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
col_moni/col_moni.res
No preview for this file type
col_patr/col_patr.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_PATR
135   -ProductVersion=2.2.0.3
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na Licença GPL(General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
col_patr/col_patr.res
No preview for this file type
col_soft/col_soft.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_SOFT
135   -ProductVersion=2.2.0.1
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
col_soft/col_soft.res
No preview for this file type
col_undi/col_undi.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Col_UNDI
135   -ProductVersion=2.2.0.2
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
col_undi/col_undi.res
No preview for this file type
ger_cols/ger_cols.dof
... ... @@ -132,5 +132,5 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Ger_COLS
135   -ProductVersion=2.2.0.34
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
... ...
ger_cols/ger_cols.res
No preview for this file type
ini_cols/ini_cols.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=Ini_COLS
135   -ProductVersion=2.2.0.2
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na licença GPL (General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
ini_cols/ini_cols.res
No preview for this file type
main.pas
... ... @@ -2067,6 +2067,7 @@ var strXML,
2067 2067 intAux : integer;
2068 2068 boolOK : boolean;
2069 2069 begin
  2070 +
2070 2071 // **********************************************************************************************************
2071 2072 // Esta procedure tratará os comandos e suas ações, enviados em um pacote XML na requisição, conforme abaixo:
2072 2073 // **********************************************************************************************************
... ... @@ -2110,7 +2111,10 @@ begin
2110 2111 strCmd := XML_RetornaValor('cmd',strXML);
2111 2112 // As ações terão seus valores
2112 2113  
2113   - if (strCmd in ['Execute','Ask','Erase','Exit']) then
  2114 + if (strCmd = 'Execute') or
  2115 + (strCmd = 'Ask') or
  2116 + (strCmd = 'Erase') or
  2117 + (strCmd = 'Exit') then
2114 2118 AResponseinfo.ContentText := 'OK'
2115 2119 else
2116 2120 AResponseinfo.ContentText := 'COMANDO NÃO PERMITIDO!';
... ... @@ -2119,7 +2123,7 @@ begin
2119 2123 AResponseinfo.ContentText := 'ACESSO NÃO PERMITIDO!';
2120 2124  
2121 2125 if (strCmd = 'Execute') then
2122   - ExecutaCacic(nil);
  2126 + ExecutaCacic(nil)
2123 2127 else if (strCmd = 'Ask') then
2124 2128 Begin
2125 2129 strFileName := XML_RetornaValor('FileName',strXML);
... ... @@ -2128,7 +2132,6 @@ begin
2128 2132 else if (strCmd = 'Erase') then
2129 2133 else if (strCmd = 'Exit') then
2130 2134 Finaliza;
2131   -
2132 2135 end;
2133 2136  
2134 2137 procedure TFormularioGeral.IdFTPServer1UserLogin(ASender: TIdFTPServerThread; const AUsername, APassword: String; var AAuthenticated: Boolean);
... ...
mapa/mapacacic.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=
135   -ProductVersion=1.0.0.11
  135 +ProductVersion=2.4.0.371
136 136 Comments=Baseado na Licença GPL(General Public License)
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
mapa/mapacacic.res
No preview for this file type
testacrypt/testacrypt.dof
... ... @@ -110,12 +110,12 @@ ActiveLang=
110 110 ProjectLang=
111 111 RootDir=C:\Arquivos de programas\Borland\Delphi7\Bin\
112 112 [Version Info]
113   -IncludeVerInfo=0
  113 +IncludeVerInfo=1
114 114 AutoIncBuild=0
115   -MajorVer=1
116   -MinorVer=0
  115 +MajorVer=2
  116 +MinorVer=4
117 117 Release=0
118   -Build=0
  118 +Build=371
119 119 Debug=0
120 120 PreRelease=0
121 121 Special=0
... ... @@ -126,13 +126,13 @@ CodePage=1252
126 126 [Version Info Keys]
127 127 CompanyName=
128 128 FileDescription=
129   -FileVersion=1.0.0.0
  129 +FileVersion=2.4.0.371
130 130 InternalName=
131 131 LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=
135   -ProductVersion=1.0.0.0
  135 +ProductVersion=2.4.0.371
136 136 Comments=
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
testacrypt/testacrypt.res
No preview for this file type
vaca/vaca.dof
... ... @@ -132,4 +132,4 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=
135   -ProductVersion=1.0.0.0
  135 +ProductVersion=2.4.0.371
... ...
vaca/vaca.res
No preview for this file type
vacon/vacon.dof
... ... @@ -132,7 +132,7 @@ LegalCopyright=
132 132 LegalTrademarks=
133 133 OriginalFilename=
134 134 ProductName=
135   -ProductVersion=1.0.0.0
  135 +ProductVersion=2.4.0.371
136 136 Comments=
137 137 [HistoryLists\hlDebugSourcePath]
138 138 Count=1
... ...
vacon/vacon.res
No preview for this file type