- Recompilado para D2007 UPD3

- Cambiado el formato de fechas de 'MM/DD/YYYY' a 'DD/MM/YYYY' (da problemas con SQL Server).

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.UserControl@15 970f2627-a9d2-4748-b3d4-b5283c4fe7db
This commit is contained in:
David Arranz 2008-04-14 16:54:50 +00:00
parent 630e91ec0c
commit 785004c326
70 changed files with 13 additions and 13 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -12,5 +12,5 @@ STRINGTABLE
BEGIN
END
/* C:\UserControl\Packages\Connectors\UCADOConn\pckUCADOConn.res */
/* C:\UserControl\Packages\Connectors\UCADOConn\pckUCADOConn.drf */
/* C:\User Control\Packages\Connectors\UCADOConn\pckUCADOConn.res */
/* C:\User Control\Packages\Connectors\UCADOConn\pckUCADOConn.drf */

View File

@ -12,5 +12,5 @@ STRINGTABLE
BEGIN
END
/* C:\UserControl\Packages\Connectors\UCBDEConn\pckUCBDEConn.res */
/* C:\UserControl\Packages\Connectors\UCBDEConn\pckUCBDEConn.drf */
/* C:\User Control\Packages\Connectors\UCBDEConn\pckUCBDEConn.res */
/* C:\User Control\Packages\Connectors\UCBDEConn\pckUCBDEConn.drf */

View File

@ -12,5 +12,5 @@ STRINGTABLE
BEGIN
END
/* C:\UserControl\Packages\Connectors\UCDBXConn\pckUCDBXConn.res */
/* C:\UserControl\Packages\Connectors\UCDBXConn\pckUCDBXConn.drf */
/* C:\User Control\Packages\Connectors\UCDBXConn\pckUCDBXConn.res */
/* C:\User Control\Packages\Connectors\UCDBXConn\pckUCDBXConn.drf */

View File

@ -12,5 +12,5 @@ STRINGTABLE
BEGIN
END
/* C:\UserControl\Packages\Connectors\UCIBXConn\pckUCIBXConn.res */
/* C:\UserControl\Packages\Connectors\UCIBXConn\pckUCIBXConn.drf */
/* C:\User Control\Packages\Connectors\UCIBXConn\pckUCIBXConn.res */
/* C:\User Control\Packages\Connectors\UCIBXConn\pckUCIBXConn.drf */

View File

@ -1850,7 +1850,7 @@ begin
Profile,
QuotedStr('U'),
QuotedStr(Key),
QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FLogin.fDaysOfSunExpired) ), {By vicente Barros Leonel }
QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FLogin.fDaysOfSunExpired) ), {By vicente Barros Leonel } { Rodax Software }
UserExpired,
DaysExpired ]); {By vicente Barros Leonel }
DataConnector.UCExecSQL(SQLStmt);
@ -1893,13 +1893,13 @@ begin
cPadrao: cSql := 'Update ' + TableUsers.TableName +
' Set ' + TableUsers.FieldPassword + ' = ' + QuotedStr(Encrypt(NewPassword,EncryptKey)) +
', ' + TableUsers.FieldKey + ' = ' + QuotedStr(Key) +
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel { Rodax Software }
' Where ' + TableUsers.FieldUserID + ' = ' + IntToStr(IdUser);
cMD5: cSql := 'Update ' + TableUsers.TableName +
' Set ' + TableUsers.FieldPassword + ' = ' + QuotedStr(MD5Sum(NewPassword)) +
', ' + TableUsers.FieldKey + ' = ' + QuotedStr(Key) +
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel { Rodax Software }
' Where ' + TableUsers.FieldUserID + ' = ' + IntToStr(IdUser);
end;
@ -2096,7 +2096,7 @@ begin
Sql := Format('update %s set %s = %s where %s = ''U''',
[ FTableUsers.TableName,
FTableUsers.FieldDateExpired,
QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FLogin.fDaysOfSunExpired ) ),
QuotedStr( FormatDateTime('dd/mm/yyyy', Date + FLogin.fDaysOfSunExpired ) ),{ Rodax Software }
FTableUsers.FieldTypeRec ] );
DataConnector.UCExecSQL( Sql );
End;
@ -4821,7 +4821,7 @@ begin
[ fUserControl.TableHistory.TableName ,
QuotedStr(AppID),
UserID,
QuotedStr( FormatDateTime('mm/dd/yyyy',date) ),
QuotedStr( FormatDateTime('dd/mm/yyyy',date) ), { Rodax Software }
QuotedStr( FormatDateTime('hh:mm:ss',time) ),
QuotedStr( Form ),
QuotedStr( FormCaption ),