18. August 2007 12:00
CREATE VIEW dbo.[Server DateTime]
AS
SELECT '' AS [Primary Key], GETUTCDATE() AS [Server DateTime]
GO
GRANT SELECT ON [Server DateTime] TO [public]
GO
OBJECT Table 50000 Server DateTime
{
OBJECT-PROPERTIES
{
Date=18.08.07;
Time=12:00:00;
Modified=Yes;
Version List=SDT1.00;
}
PROPERTIES
{
DataPerCompany=No;
LinkedObject=Yes;
LinkedInTransaction=No;
}
FIELDS
{
{ 1 ; ;Primary Key ;Code10 }
{ 2 ; ;Server DateTime ;DateTime }
}
KEYS
{
{ ;Primary Key ;Clustered=Yes }
}
CODE
{
BEGIN
END.
}
}
OBJECT Codeunit 50000 SDT Test
{
OBJECT-PROPERTIES
{
Date=18.08.07;
Time=12:00:00;
Modified=Yes;
Version List=SDT1.00;
}
PROPERTIES
{
OnRun=BEGIN
SDT.GET;
MESSAGE('%1', SDT."Server DateTime");
END;
}
CODE
{
VAR
SDT@1000000000 : Record 50000;
BEGIN
END.
}
}