DATABASE

This is the default database used when opening database-related files and evaluating security classes. This field is initialized to the value of SELECTED DATABASE when a detached child is invoked. Once set, this value never changes during the life of a process.

        IF       --- DATABASE   EQ TST
  T     SET      --- PRINT ON SCREEN            =      Y

Related PDFs: NEXT DATABASE, SELECTED DATABASE