Informationen zu aufgetretenem Laufzeitzustand beschaffen

EXEC TAA
  GETINFO [FOR [CURRENT]] CONDITION
END-EXEC
EXEC TAA
   GETINFO [FOR] CONDITION (<Feldangabe>|<num. Literal>)
END-EXEC
 
<Feldangabe> = {COBOL-Variable | <objektname>.<feldname>[(indices)]}

Diese Anweisung beschafft Informationen zu einem Laufzeitzustand. Dies kann entweder der zuletzt gesetzte oder ein früherer Laufzeitzustand sein. Der in dieser Anweisung angegebene Laufzeitzustand ist anschließend der aktuelle (CURRENT), z.B. in den Anweisungen DELETE, RAISE oder GETINFO ASSOCIATION.

Die aktualisierten Informationen stehen anschließend in den von der TAA bereitgestellten Datenelementen (TC-CND-TIMESTAMP usw.).

Die Auswahl des Laufzeitzustandes erfolgt durch die Angabe CURRENT für den zuletzt gesetzten, oder die Angabe eines Indexes für einen früheren Laufzeitzustand. Wenn als Index ein Datenname angegeben wird, muss dies eine numerische COBOL-Variable sein.

Beispiel:

sample.cbl
EXEC TAA GETINFO FOR CONDITION(2) END-EXEC
IF TC-CND-GROUP = "IOSYS"
    EXEC TAA
        GETINFO ASSOCIATION FILENAME INTO MK-FILENAME
    END-EXEC
END-IF

Den Inhalt von Datenverbindungen (Associations) und Argumenten können Sie über die Anweisungen GETINFO ASSOCIATION bzw. GETINFO ARGUMENT beschaffen.