case/4/0 Web Publishing: C:\Documents and Settings\hajsman\Dokumenty\Vyuka\Irs2\Projekt case40\Projekt03.csf - Vyhodnocovací funkce GenDSDTitle(modul: OLE Functions for MS Word)

[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
GenDSDTitle
(OLE Functions for MS Word)

Vytvořeno:	12-08-1995 16:21:26
Poslední změna:	11-27-2002 14:11:25

Outputs a heading for a data structure evaluation.

Modul

Module: OLE Functions for MS Word

Zdrojový kód:

PROCEDURE GenDSDTitle(BYREF DiagName$)
BEGIN
    IF DiagName$ <> "" THEN
        IF LEN(DiagName$) > 51 THEN
            page$= RIGHT$(DiagName$, 2);
            DiagName$= LEFT$(DiagName$, 51);
            CALL RTRIM(DiagName$);
        ELSE
            page$= "";
        END
        PRINT {12, "Arial", BOLD} "Popis diagramu datové struktury ";
        PRINT {12, "Arial", BOLD, ITALIC} CONV$(DiagName$);
        IF page$ <> "" THEN
            PRINT {12, "Arial", BOLD} ", stránka diagramu ", page$;
        END
        PRINT {12, "Arial"} NL(2);
        DiagName$= "";
    END
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\13244.htm	(C) microTOOL GmbH 2002