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

[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
FSD_FuncListPopFirst
(Function Structure)

Vytvořeno:	12-08-1995 15:34:33
Poslední změna:	12-04-2002 10:18:59

Help function for list administration: Returns the first record (name of the function box, level) and deletes it from FuncList.

Modul

Module: Function Structure

Zdrojový kód:

PROCEDURE FSD_FuncListPopFirst(BYREF list$, BYREF txt$, BYREF num%)
BEGIN
    /*
       pre: mind. ein record in der Liste
       post: erster Record wird gelesen und aus der Liste entfernt
    */
    t1pos% = INSTR (list$, "@");
    t2pos% = INSTR (list$, "~");
    txt$ = LEFT$ (list$, t1pos%-1);
    num$ = MID$ (list$, t1pos%+1, t2pos%-1);
    num% = VAL (num$);
    list$= RIGHT$ (list$, LEN (list$) - t2pos%);
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\5064.htm	(C) microTOOL GmbH 2002