TCL Command ABASCHEDULES

Syntax

array set schedules [ABASCHEDULES   GET   LIST]

set schedID   [ABASCHEDULES   GET   SCHEDULE   schedname]

Beschreibung

Abfrage der Baupläne im Analyse-Modell

Abfrage der Existenz eines bestimmten Bauplans

Argument	Dimension	Bedeutung
GET	KEYWORD	Daten abfragen
LIST	KEYWORD	Bauplanliste abfragen
SCHEDULE	KEYWORD	Bauplan-ID oder -Existenz abfragen
schedname	TEXT	Name des Bauplans (arg2 = SCHEDULE)

Rückgabefeld für [ABASCHEDULES GET LIST]

Feldargument	Dimension	Bedeutung
error	INT	Fehlerstatus
info	TEXT	Fehlerinformation
first	OBJID	Objekt-ID des ersten Listeneintrages
last	OBJID	Objekt-ID des letzten Listeneintrages
count	INT	Anzahl der Listeneinträge

Rückgabe für [ABASCHEDULES GET SCHEDULE schedname]

Return	Dimension	Bedeutung
schedID	OBJID	Bauplan-ID oder 0

Scopes

All

Beispiele

# get list of schedules

array set schedules [ABASCHEDULES GET LIST]

if { $schedules(error) != 0 } { ABMERROR "Error: " $schedules(error) " Info: " $schedules(info) }

if { $schedules(count) > 0 } {

    set ID $schedules(first)

    for { set isched 0 } { $isched < $schedules(count) } { incr isched } {

        if { $isched > 0 } { set ID [OBJNEXT $ID] }

        array unset sched

        array set sched [ABASCHEDULE $ID GET]

        ABMINFO " Schedule " $sched(name) ":"

        ABMINFO " --------------------------"

        foreach {key value} [array get sched] {

            ABMINFO " " $key " = " $value

        }

    }

}

Die Liste der Baupläne wird abgefragt. Die Liste wird in einer for-Schleife durchlaufen und die Daten des jeweiligen Bauplanobjektes werden geloggt.