case/4/0 Web Publishing: C:\Documents and Settings\hajsman\Dokumenty\Vyuka\Irs2\Projekt case40\Projekt03.csf - Vyhodnocovací funkce GetDateTime(modul: Miscellaneous Evaluating Functions)

[Celkový datový model] [Funkce] [Externí rohraní] [Stavové diagramy] [Datové elementy] [Entity] [Relace]
[Databáze] [Události] [Materiály] [Generovací funkce] [Vyhodnocovací funkce] [Konfigurace] [Uživatelé] [Projekt] [Home]

Vyhodnocovací funkce
GetDateTime
(Miscellaneous Evaluating Functions)

Vytvořeno:	12-08-1995 17:46:14
Poslední změna:	12-04-2002 14:17:48

Auxiliary function: Divides the "DateTime" attribute into two customizable strings for documentation purposes.

Modul

Module: Miscellaneous Evaluating Functions

Zdrojový kód:

PROCEDURE GetDateTime(TimeStamp$, BYREF Date$, BYREF Time$)
BEGIN
/* divides attribute "DateTime" into two
    strings formatted for document output

    called by: List_all_Queries,
               List_all_Generating_Functions
*/
    DateSeparator$ = "-";
    TimeSeparator$ = ":";

    Date$ = Left$(TimeStamp$, 10);
    Month$= Left$(Date$,2);
    Day$ = Mid$(Date$,4,2);
    Year$ = Right$(Date$,2);

    Date$ = Month$ + DateSeparator$ + Day$ + DateSeparator$ + Year$;

    Time$ = Right$(TimeStamp$, 8);
    Hour$ = Left$(Time$,2);
    Minute$ = Mid$(Time$,4,2);
    Second$ = Right$(Time$,2);

    Time$ = Hour$ + TimeSeparator$ + Minute$ + TimeSeparator$ + Second$;

END

Generováno: 16.10.2003 7:41	Systém: C:\Documents and Settings\hajsman\Dokumenty\Vyuka\Irs2\Projekt case40\Projekt03.csf	Generováno systémem case/4/0
Vygeneroval: Administrator	Soubor: C:\Documents and Settings\hajsman\Dokumenty\Vyuka\Irs2\Projekt case40\html\24382.htm	(C) microTOOL GmbH 2002