ajustes

bin/Agiliza.config

 <?xml version="1.0" encoding="UTF-8" ?>
 <Config>
    <Application DefaultSecurityDriver="NativeSecurityDriver" EnabledChannels="All">
+      <Options SessionTimeout="1800" AllowPasswordChange="1" URL=""/>
       <Service Name="svAgiliza" DisplayName="EVOLOGICA - Agiliza" Description="Agiliza" Port="9801"/>
       <Database ActiveConnectionString="ConnectionString1">
-        <ConnectionString1>Provider=SQLOLEDB.1;Password=conexo;Persist Security Info=True;User ID=sa;Initial Catalog=BD_CURIO_DEMO;Data Source=srvd1;Application Name=Produto;cxsqldialect=SQLServer</ConnectionString1>
+         <ConnectionString1>Provider=SQLOLEDB.1;Password=conexo;Persist Security Info=True;User ID=sa;Initial Catalog=BD_AGILIZA;Data Source=srvd1;Application Name=Agiliza;cxsqldialect=SQLServer</ConnectionString1>
       </Database>
-      <UseXMLEncode version="1"/>
+      <Dynamo ActiveConnectionString="ConnectionStringDefault">
+        <ConnectionStringDefault>ServerName=srp1vp1;portNumber=8300;systemCode=92;Username=integracao_sistema;Password=jj58Pd02</ConnectionStringDefault>
+      </Dynamo>
 	</Application>
+   <Systems>
+      <System Code="19" Name="SISEG" ServerName="localhost" ServicePort="9801" ClientBPLName="siseg_cli.bpl" EnabledChannels="All"/>
+   </Systems>	 
 </Config>
\ No newline at end of file

sql/MSSQL/deploy/sql_03.sql

@@ -39,4 +39,4 @@ INSERT SEGETSINAU (SEGEIDSIST, SEGEIDNAUS)
 VALUES (1, 1)
 
 INSERT SEGATUSUAR (SEGAIDUSUA, SEGACDUSUA, SEGASENHAU, SEGADTULSE, SEGADTCADU, SEGAINCANC, SEGACDHERA, SEGACDREFE, SEGAIDNAUS, SEGAFORMSE, SEGASALTSE, SEGAMOBILE, SEGAEEMAIL, SEGALEMAIL, SEGASENHAQ, SEGASENHAA, SEGABLOQUE, SEGAULTLGN, SEGAULTBLQ, SEGAFSACOU, SEGAFSAWST, SEGAFSAACO, SEGAFSAAWS, SEGACOMMEN, SEGAULTACT, SEGAPRSETC) 
-VALUES (1, 'Administrador', '', NULL, CAST(0x00009BBE00000000 AS DateTime), 'N', -6, NULL, 1, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL)
+VALUES (1, 'Administrador', '', NULL, CAST(0x00009BBE00000000 AS DateTime), '0', -6, NULL, 1, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL)
\ No newline at end of file

svuAgiliza.pas

-unit svuAgiliza;
+unit svuAgiliza;
 
 {$IFDEF FPC}
   {$MODE Delphi}