The Set Default State routine sets and/or returns the current
    default state for a key table.

    Format

      SMG$SET_DEFAULT_STATE  key-table-id [,new-state] [,old-state]