Informační tok Funkční structura Datová struktura ER model Modulová struktura Typová struktura Relační model Dokumentace


[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
Util_PrintIndex
(Review-Manager Utilities)

Vytvořeno: 02-01-2000 14:02:04
Poslední změna: 12-10-2002 11:27:42
Modul

Module: Review-Manager Utilities

Zdrojový kód:

PROCEDURE Util_PrintIndex(tid$, prop$, text$, reverse!)
BEGIN
    
    FOR Index WHERE Index.Tid = tid$ DO

        CALL Util_GetRelationBoxname(Index.Relation, r$);

        IF reverse! THEN
            PRINT r$, ".", Index.Name;
            
            IF prop$ <> "" THEN
                PRINT " (", Index.[prop$],")";
            END // IF
        ELSE
            PRINT Index.Name;
            
            IF prop$ <> "" THEN
                PRINT "(", Index.[prop$],")";
            END // IF
            
            PRINT ": ", r$;
        END // IF
        
        PRINT NL,
              tid$;

        CALL Util_PrintExtraPropertyAndText(prop$, text$);

    END // FOR Index

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\461307874.htm (C) microTOOL GmbH 2002