Download as
Browse Code »

Commit 4cc217d68048ab7fe8200cf18220a82b6fd480a3

Authored by Eric Menezes Noronha
1 parent cb922883
Exists in master

-Últimos acertos para força coleta.

Showing 1 changed file with 2 additions and 0 deletions   Show diff stats
gercols/gercols.dpr
  Diff comments   View file @4cc217d
... ... @@ -245,6 +245,7 @@ Begin
245 245 objCacic.setValueToFile('Configs','ConexaoOK','S', strGerColsInfFileName);
246 246 if (objCacic.getValueFromTags('WebManagerAddress', strRetorno,'<>') <> '') then
247 247 Begin
  248 + objCacic.setValueToFile('Configs','forca_coleta', objCacic.getValueFromTags('ForcaColeta', strRetorno,'<>'), strGerColsInfFileName);
248 249 objCacic.setValueToFile('Configs','WebManagerAddress' ,objCacic.getValueFromTags('WebManagerAddress' , strRetorno,'<>'), strChkSisInfFileName);
249 250 objCacic.setValueToFile('Configs','WebServicesFolderName',objCacic.getValueFromTags('WebServicesFolderName', strRetorno,'<>'), strChkSisInfFileName);
250 251 objCacic.setWebManagerAddress(objCacic.getValueFromTags('WebManagerAddress', strRetorno,'<>'));
... ... @@ -387,6 +388,7 @@ Begin
387 388 objCacic.setValueToFile('Configs','ConexaoOK','S', strGerColsInfFileName);
388 389 if (objCacic.getValueFromTags('WebManagerAddress', strRetorno,'<>') <> '') then
389 390 Begin
  391 + objCacic.setValueToFile('Configs','forca_coleta', objCacic.getValueFromTags('ForcaColeta', strRetorno,'<>'), strGerColsInfFileName);
390 392 objCacic.setValueToFile('Configs','WebManagerAddress' ,objCacic.getValueFromTags('WebManagerAddress' , strRetorno,'<>'), strChkSisInfFileName);
391 393 objCacic.setValueToFile('Configs','WebServicesFolderName',objCacic.getValueFromTags('WebServicesFolderName', strRetorno,'<>'), strChkSisInfFileName);
392 394 objCacic.setWebManagerAddress(objCacic.getValueFromTags('WebManagerAddress', strRetorno,'<>'));
... ...