## TCB

PURPOSE:
Return miscellaneous information.

    STATEMENT SYNTAX:
    {stno} TCB (X)

where:

X= | Return Value
--- | ---
2 | Line # that caused RECOMP / RENUM to abort
3 | 0
4 | The current Line Number
5 | The Line Number that executes on a RETRY
6 | The SETESC Line Number
7 | The SETERR Line Number
8 | An integer that can be passed to GEC (Get Exit Code Function) to check the status of a Launched Windows program. Note that once TCB(8) is accessed it is imediately set back to 0 so the programmer must save TCB(8) after accessing it.
9 | Program Entry # SEE CALL.
10 | The Last Error Number
11 | Last Channel # with Error
12 | Last Channel # used
13 | Call Depth
14 | Current Precision
16 | Length of string matched by MASK function
20 | =1 if FreeSM32 else =0