!*** MODULE $SMGTRMPTR *** !DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN ! Terminal Capability Pointers for RTL SMG$ facility ! ! Boolean capabilities here - 1 - 220 ! PARAMETER SMG$K_ADVANCED_VIDEO = '00000001'X PARAMETER SMG$K_ANSI_CRT = '00000002'X PARAMETER SMG$K_AUTO_MARGIN = '00000003'X PARAMETER SMG$K_BACKSPACE = '00000004'X PARAMETER SMG$K_BLOCK_MODE = '00000005'X PARAMETER SMG$K_DEC_CRT = '00000006'X PARAMETER SMG$K_EDIT = '00000007'X PARAMETER SMG$K_EIGHT_BIT = '00000008'X PARAMETER SMG$K_FULLDUP = '00000009'X PARAMETER SMG$K_IGNORE_NEWLINE = '0000000A'X PARAMETER SMG$K_INSERT_MODE_NULLS = '0000000B'X PARAMETER SMG$K_LOWERCASE = '0000000C'X PARAMETER SMG$K_NO_ERASE = '0000000D'X PARAMETER SMG$K_NO_SCROLL = '0000000E'X PARAMETER SMG$K_OVERSTRIKE = '0000000F'X PARAMETER SMG$K_PRINTER_PORT = '00000010'X PARAMETER SMG$K_REGIS = '00000011'X PARAMETER SMG$K_SCOPE = '00000012'X PARAMETER SMG$K_SIXEL_GRAPHICS = '00000013'X PARAMETER SMG$K_SOFT_CHARACTERS = '00000014'X PARAMETER SMG$K_PHYSICAL_TABS = '00000015'X PARAMETER SMG$K_PHYSICAL_FF = '00000016'X PARAMETER SMG$K_UNDERLINE = '00000017'X PARAMETER SMG$K_CURSOR_REPORT_ANSI = '00000018'X PARAMETER SMG$K_DEC_CRT_2 = '00000019'X PARAMETER SMG$K_DEC_CRT_3 = '0000001A'X PARAMETER SMG$K_SET_CURSOR_COL_ROW = '0000001B'X PARAMETER SMG$K_TEXT16 = '0000001C'X PARAMETER SMG$K_DEC_CRT_4 = '0000001D'X PARAMETER SMG$K_DEC_CRT_5 = '0000001E'X PARAMETER SMG$K_ANSI_COLOR = '0000001F'X ! ! Private capabilities reserved for customer use. ! Put them at the end of the range. ! PARAMETER SMG$K_PRIVATE_BOO_1 = '000000D3'X PARAMETER SMG$K_PRIVATE_BOO_2 = '000000D4'X PARAMETER SMG$K_PRIVATE_BOO_3 = '000000D5'X PARAMETER SMG$K_PRIVATE_BOO_4 = '000000D6'X PARAMETER SMG$K_PRIVATE_BOO_5 = '000000D7'X PARAMETER SMG$K_PRIVATE_BOO_6 = '000000D8'X PARAMETER SMG$K_PRIVATE_BOO_7 = '000000D9'X PARAMETER SMG$K_PRIVATE_BOO_8 = '000000DA'X PARAMETER SMG$K_PRIVATE_BOO_9 = '000000DB'X PARAMETER SMG$K_PRIVATE_BOO_10 = '000000DC'X PARAMETER SMG$K_MAX_BOOLEAN_CODE = '000000DC'X ! ! Numeric capabilities here - 221 to 440 ! PARAMETER SMG$K_COLUMNS = '000000DD'X PARAMETER SMG$K_CR_FILL = '000000DE'X PARAMETER SMG$K_FRAME = '000000DF'X PARAMETER SMG$K_LF_FILL = '000000E0'X PARAMETER SMG$K_NUMBER_FN_KEYS = '000000E1'X PARAMETER SMG$K_ROWS = '000000E2'X PARAMETER SMG$K_VMS_TERMINAL_NUMBER = '000000E3'X PARAMETER SMG$K_WIDE_SCREEN_COLUMNS = '000000E4'X ! ! Private capabilities for customer use. ! Put them at the end of the range. ! PARAMETER SMG$K_PRIVATE_NUM_1 = '000001AF'X PARAMETER SMG$K_PRIVATE_NUM_2 = '000001B0'X PARAMETER SMG$K_PRIVATE_NUM_3 = '000001B1'X PARAMETER SMG$K_PRIVATE_NUM_4 = '000001B2'X PARAMETER SMG$K_PRIVATE_NUM_5 = '000001B3'X PARAMETER SMG$K_PRIVATE_NUM_6 = '000001B4'X PARAMETER SMG$K_PRIVATE_NUM_7 = '000001B5'X PARAMETER SMG$K_PRIVATE_NUM_8 = '000001B6'X PARAMETER SMG$K_PRIVATE_NUM_9 = '000001B7'X PARAMETER SMG$K_PRIVATE_NUM_10 = '000001B8'X PARAMETER SMG$K_MAX_NUMERIC_CODE = '000001B8'X ! ! String capabilities here - 441 - 660 ! PARAMETER SMG$K_BEGIN_ALTERNATE_CHAR = '000001B9'X PARAMETER SMG$K_BEGIN_BLINK = '000001BA'X PARAMETER SMG$K_BEGIN_BOLD = '000001BB'X PARAMETER SMG$K_BEGIN_DELETE_MODE = '000001BC'X PARAMETER SMG$K_BEGIN_INSERT_MODE = '000001BD'X PARAMETER SMG$K_BEGIN_LINE_DRAWING_CHAR = '000001BE'X PARAMETER SMG$K_BEGIN_REVERSE = '000001BF'X PARAMETER SMG$K_BEGIN_UNDERSCORE = '000001C0'X PARAMETER SMG$K_BOTTOM_T_CHAR = '000001C1'X PARAMETER SMG$K_CLEAR_TAB = '000001C2'X PARAMETER SMG$K_CROSS_CHAR = '000001C3'X PARAMETER SMG$K_CURSOR_DOWN = '000001C4'X PARAMETER SMG$K_CURSOR_LEFT = '000001C5'X PARAMETER SMG$K_CURSOR_RIGHT = '000001C6'X PARAMETER SMG$K_CURSOR_UP = '000001C7'X PARAMETER SMG$K_DARK_SCREEN = '000001C8'X PARAMETER SMG$K_DELETE_CHAR = '000001C9'X PARAMETER SMG$K_DELETE_LINE = '000001CA'X PARAMETER SMG$K_DEVICE_ATTRIBUTES = '000001CB'X PARAMETER SMG$K_DOUBLE_HIGH_BOTTOM = '000001CC'X PARAMETER SMG$K_DOUBLE_HIGH_TOP = '000001CD'X PARAMETER SMG$K_DOUBLE_WIDE = '000001CE'X PARAMETER SMG$K_DUPLICATE = '000001CF'X PARAMETER SMG$K_END_ALTERNATE_CHAR = '000001D0'X PARAMETER SMG$K_END_BLINK = '000001D1'X PARAMETER SMG$K_END_BOLD = '000001D2'X PARAMETER SMG$K_END_DELETE_MODE = '000001D3'X PARAMETER SMG$K_END_INSERT_MODE = '000001D4'X PARAMETER SMG$K_END_LINE_DRAWING_CHAR = '000001D5'X PARAMETER SMG$K_END_REVERSE = '000001D6'X PARAMETER SMG$K_END_UNDERSCORE = '000001D7'X PARAMETER SMG$K_ERASE_TO_END_DISPLAY = '000001D8'X PARAMETER SMG$K_ERASE_TO_END_LINE = '000001D9'X PARAMETER SMG$K_ERASE_WHOLE_DISPLAY = '000001DA'X PARAMETER SMG$K_ERASE_WHOLE_LINE = '000001DB'X PARAMETER SMG$K_HOME = '000001DC'X PARAMETER SMG$K_HORIZONTAL_BAR = '000001DD'X PARAMETER SMG$K_INIT_STRING = '000001DE'X PARAMETER SMG$K_INSERT_CHAR = '000001DF'X PARAMETER SMG$K_INSERT_LINE = '000001E0'X PARAMETER SMG$K_INSERT_PAD = '000001E1'X PARAMETER SMG$K_KEY_0 = '000001E2'X PARAMETER SMG$K_KEY_1 = '000001E3'X PARAMETER SMG$K_KEY_2 = '000001E4'X PARAMETER SMG$K_KEY_3 = '000001E5'X PARAMETER SMG$K_KEY_4 = '000001E6'X PARAMETER SMG$K_KEY_5 = '000001E7'X PARAMETER SMG$K_KEY_6 = '000001E8'X PARAMETER SMG$K_KEY_7 = '000001E9'X PARAMETER SMG$K_KEY_8 = '000001EA'X PARAMETER SMG$K_KEY_9 = '000001EB'X PARAMETER SMG$K_KEY_BACKSPACE = '000001EC'X PARAMETER SMG$K_KEY_COMMA = '000001ED'X PARAMETER SMG$K_KEY_DOWN_ARROW = '000001EE'X PARAMETER SMG$K_KEY_E1 = '000001EF'X PARAMETER SMG$K_KEY_E2 = '000001F0'X PARAMETER SMG$K_KEY_E3 = '000001F1'X PARAMETER SMG$K_KEY_E4 = '000001F2'X PARAMETER SMG$K_KEY_E5 = '000001F3'X PARAMETER SMG$K_KEY_E6 = '000001F4'X PARAMETER SMG$K_KEY_ENTER = '000001F5'X PARAMETER SMG$K_KEY_F1 = '000001F6'X PARAMETER SMG$K_KEY_F2 = '000001F7'X PARAMETER SMG$K_KEY_F3 = '000001F8'X PARAMETER SMG$K_KEY_F4 = '000001F9'X PARAMETER SMG$K_KEY_F5 = '000001FA'X PARAMETER SMG$K_KEY_F6 = '000001FB'X PARAMETER SMG$K_KEY_F7 = '000001FC'X PARAMETER SMG$K_KEY_F8 = '000001FD'X PARAMETER SMG$K_KEY_F9 = '000001FE'X PARAMETER SMG$K_KEY_F10 = '000001FF'X PARAMETER SMG$K_KEY_F11 = '00000200'X PARAMETER SMG$K_KEY_F12 = '00000201'X PARAMETER SMG$K_KEY_F13 = '00000202'X PARAMETER SMG$K_KEY_F14 = '00000203'X PARAMETER SMG$K_KEY_F15 = '00000204'X PARAMETER SMG$K_KEY_F16 = '00000205'X PARAMETER SMG$K_KEY_F17 = '00000206'X PARAMETER SMG$K_KEY_F18 = '00000207'X PARAMETER SMG$K_KEY_F19 = '00000208'X PARAMETER SMG$K_KEY_F20 = '00000209'X PARAMETER SMG$K_KEY_LEFT_ARROW = '0000020A'X PARAMETER SMG$K_KEY_MINUS = '0000020B'X PARAMETER SMG$K_KEY_PERIOD = '0000020C'X PARAMETER SMG$K_KEY_PF1 = '0000020D'X PARAMETER SMG$K_KEY_PF2 = '0000020E'X PARAMETER SMG$K_KEY_PF3 = '0000020F'X PARAMETER SMG$K_KEY_PF4 = '00000210'X PARAMETER SMG$K_KEY_RIGHT_ARROW = '00000211'X PARAMETER SMG$K_KEY_UP_ARROW = '00000212'X PARAMETER SMG$K_LABEL_F1 = '00000213'X PARAMETER SMG$K_LABEL_F2 = '00000214'X PARAMETER SMG$K_LABEL_F3 = '00000215'X PARAMETER SMG$K_LABEL_F4 = '00000216'X PARAMETER SMG$K_LABEL_F5 = '00000217'X PARAMETER SMG$K_LABEL_F6 = '00000218'X PARAMETER SMG$K_LABEL_F7 = '00000219'X PARAMETER SMG$K_LABEL_F8 = '0000021A'X PARAMETER SMG$K_LABEL_F9 = '0000021B'X PARAMETER SMG$K_LABEL_F10 = '0000021C'X PARAMETER SMG$K_LABEL_F11 = '0000021D'X PARAMETER SMG$K_LABEL_F12 = '0000021E'X PARAMETER SMG$K_LABEL_F13 = '0000021F'X PARAMETER SMG$K_LABEL_F14 = '00000220'X PARAMETER SMG$K_LABEL_F15 = '00000221'X PARAMETER SMG$K_LABEL_F16 = '00000222'X PARAMETER SMG$K_LABEL_F17 = '00000223'X PARAMETER SMG$K_LABEL_F18 = '00000224'X PARAMETER SMG$K_LABEL_F19 = '00000225'X PARAMETER SMG$K_LABEL_F20 = '00000226'X PARAMETER SMG$K_LEFT_T_CHAR = '00000227'X PARAMETER SMG$K_LIGHT_SCREEN = '00000228'X PARAMETER SMG$K_LOWER_LEFT_CORNER = '00000229'X PARAMETER SMG$K_LOWER_RIGHT_CORNER = '0000022A'X PARAMETER SMG$K_NAME = '0000022B'X PARAMETER SMG$K_NEWLINE_CHAR = '0000022C'X PARAMETER SMG$K_PAD_CHAR = '0000022D'X PARAMETER SMG$K_RESTORE_CURSOR = '0000022E'X PARAMETER SMG$K_RIGHT_T_CHAR = '0000022F'X PARAMETER SMG$K_SAVE_CURSOR = '00000230'X PARAMETER SMG$K_SCROLL_FORWARD = '00000231'X PARAMETER SMG$K_SCROLL_REVERSE = '00000232'X PARAMETER SMG$K_SEL_ERASE_TO_END_DISPLAY = '00000233'X PARAMETER SMG$K_SEL_ERASE_TO_END_LINE = '00000234'X PARAMETER SMG$K_SEL_ERASE_WHOLE_DISPLAY = '00000235'X PARAMETER SMG$K_SEL_ERASE_WHOLE_LINE = '00000236'X PARAMETER SMG$K_SET_APPLICATION_KEYPAD = '00000237'X PARAMETER SMG$K_SET_CHAR_NOT_SEL_ERASE = '00000238'X PARAMETER SMG$K_SET_CHAR_SEL_ERASE = '00000239'X PARAMETER SMG$K_SET_CURSOR_ABS = '0000023A'X PARAMETER SMG$K_SET_NUMERIC_KEYPAD = '0000023B'X PARAMETER SMG$K_SET_SCROLL_REGION = '0000023C'X PARAMETER SMG$K_SET_TAB = '0000023D'X PARAMETER SMG$K_SINGLE_HIGH = '0000023E'X PARAMETER SMG$K_TAB_CHAR = '0000023F'X PARAMETER SMG$K_TOP_T_CHAR = '00000240'X PARAMETER SMG$K_UNDERLINE_CHAR = '00000241'X PARAMETER SMG$K_UPPER_LEFT_CORNER = '00000242'X PARAMETER SMG$K_UPPER_RIGHT_CORNER = '00000243'X PARAMETER SMG$K_VERTICAL_BAR = '00000244'X PARAMETER SMG$K_WIDTH_NARROW = '00000245'X PARAMETER SMG$K_WIDTH_WIDE = '00000246'X PARAMETER SMG$K_CURSOR_POSITION_REPORT = '00000247'X PARAMETER SMG$K_REQUEST_CURSOR_POSITION = '00000248'X PARAMETER SMG$K_CR_GRAPHIC = '00000249'X PARAMETER SMG$K_FF_GRAPHIC = '0000024A'X PARAMETER SMG$K_LF_GRAPHIC = '0000024B'X PARAMETER SMG$K_HT_GRAPHIC = '0000024C'X PARAMETER SMG$K_VT_GRAPHIC = '0000024D'X PARAMETER SMG$K_TRUNCATION_ICON = '0000024E'X PARAMETER SMG$K_CURSOR_NEXT_LINE = '0000024F'X PARAMETER SMG$K_CURSOR_PRECEDING_LINE = '00000250'X PARAMETER SMG$K_INDEX = '00000251'X PARAMETER SMG$K_REVERSE_INDEX = '00000252'X PARAMETER SMG$K_BEGIN_NORMAL_RENDITION = '00000253'X PARAMETER SMG$K_BEGIN_AUTOWRAP_MODE = '00000254'X PARAMETER SMG$K_END_AUTOWRAP_MODE = '00000255'X PARAMETER SMG$K_BEGIN_AUTOREPEAT_MODE = '00000256'X PARAMETER SMG$K_END_AUTOREPEAT_MODE = '00000257'X PARAMETER SMG$K_SET_ORIGIN_RELATIVE = '00000258'X PARAMETER SMG$K_SET_ORIGIN_ABSOLUTE = '00000259'X PARAMETER SMG$K_ERASE_LINE_TO_CURSOR = '0000025A'X PARAMETER SMG$K_NEXT_LINE = '0000025B'X PARAMETER SMG$K_BEGIN_AUTOPRINT_MODE = '0000025C'X PARAMETER SMG$K_END_AUTOPRINT_MODE = '0000025D'X PARAMETER SMG$K_PRINT_SCREEN = '0000025E'X PARAMETER SMG$K_SET_CURSOR_ON = '0000025F'X PARAMETER SMG$K_SET_CURSOR_OFF = '00000260'X PARAMETER SMG$K_SET_PRINTER_OUTPUT = '00000261'X PARAMETER SMG$K_SET_SCREEN_OUTPUT = '00000262'X PARAMETER SMG$K_ERASE_DISPLAY_TO_CURSOR = '00000263'X PARAMETER SMG$K_REQUEST_PRINTER_STATUS = '00000264'X PARAMETER SMG$K_PRINTER_READY = '00000265'X PARAMETER SMG$K_PRINTER_NOT_READY = '00000266'X PARAMETER SMG$K_NO_PRINTER = '00000267'X PARAMETER SMG$K_SET_JUMP_SCROLL = '00000268'X PARAMETER SMG$K_SET_SMOOTH_SCROLL = '00000269'X PARAMETER SMG$K_ERROR_ICON = '0000026A'X PARAMETER SMG$K_PAGE_LENGTH = '0000026B'X ! ! Private capabilities reserved for customer use. ! Put them at the end of the range. ! PARAMETER SMG$K_PRIVATE_STR_1 = '0000028B'X PARAMETER SMG$K_PRIVATE_STR_2 = '0000028C'X PARAMETER SMG$K_PRIVATE_STR_3 = '0000028D'X PARAMETER SMG$K_PRIVATE_STR_4 = '0000028E'X PARAMETER SMG$K_PRIVATE_STR_5 = '0000028F'X PARAMETER SMG$K_PRIVATE_STR_6 = '00000290'X PARAMETER SMG$K_PRIVATE_STR_7 = '00000291'X PARAMETER SMG$K_PRIVATE_STR_8 = '00000292'X PARAMETER SMG$K_PRIVATE_STR_9 = '00000293'X PARAMETER SMG$K_PRIVATE_STR_10 = '00000294'X PARAMETER SMG$K_MAX_STRING_CODE = '00000294'X ! ! Second string capabilities here - 661 - 880 ! PARAMETER SMG$K_BEGIN_USER1 = '00000295'X PARAMETER SMG$K_BEGIN_USER2 = '00000296'X PARAMETER SMG$K_BEGIN_USER3 = '00000297'X PARAMETER SMG$K_BEGIN_USER4 = '00000298'X PARAMETER SMG$K_BEGIN_USER5 = '00000299'X PARAMETER SMG$K_BEGIN_USER6 = '0000029A'X PARAMETER SMG$K_BEGIN_USER7 = '0000029B'X PARAMETER SMG$K_BEGIN_USER8 = '0000029C'X PARAMETER SMG$K_END_USER1 = '0000029D'X PARAMETER SMG$K_END_USER2 = '0000029E'X PARAMETER SMG$K_END_USER3 = '0000029F'X PARAMETER SMG$K_END_USER4 = '000002A0'X PARAMETER SMG$K_END_USER5 = '000002A1'X PARAMETER SMG$K_END_USER6 = '000002A2'X PARAMETER SMG$K_END_USER7 = '000002A3'X PARAMETER SMG$K_END_USER8 = '000002A4'X PARAMETER SMG$K_BLACK_SCREEN = '000002A5'X PARAMETER SMG$K_BLUE_SCREEN = '000002A6'X PARAMETER SMG$K_CYAN_SCREEN = '000002A7'X PARAMETER SMG$K_MAGENTA_SCREEN = '000002A8'X PARAMETER SMG$K_GREEN_SCREEN = '000002A9'X PARAMETER SMG$K_RED_SCREEN = '000002AA'X PARAMETER SMG$K_WHITE_SCREEN = '000002AB'X PARAMETER SMG$K_YELLOW_SCREEN = '000002AC'X PARAMETER SMG$K_USER1_SCREEN = '000002AD'X PARAMETER SMG$K_USER2_SCREEN = '000002AE'X PARAMETER SMG$K_BEGIN_STATUS_LINE = '000002AF'X PARAMETER SMG$K_END_STATUS_LINE = '000002B0'X PARAMETER SMG$K_BEGIN_LOCATOR = '000002B1'X PARAMETER SMG$K_END_LOCATOR = '000002B2'X PARAMETER SMG$K_KEY_FIRST_DOWN = '000002B3'X PARAMETER SMG$K_KEY_SECOND_DOWN = '000002B4'X PARAMETER SMG$K_KEY_THIRD_DOWN = '000002B5'X PARAMETER SMG$K_KEY_FOURTH_DOWN = '000002B6'X PARAMETER SMG$K_KEY_FIRST_UP = '000002B7'X PARAMETER SMG$K_KEY_SECOND_UP = '000002B8'X PARAMETER SMG$K_KEY_THIRD_UP = '000002B9'X PARAMETER SMG$K_KEY_FOURTH_UP = '000002BA'X PARAMETER SMG$K_USER3_SCREEN = '000002BB'X PARAMETER SMG$K_USER4_SCREEN = '000002BC'X PARAMETER SMG$K_USER5_SCREEN = '000002BD'X PARAMETER SMG$K_USER6_SCREEN = '000002BE'X PARAMETER SMG$K_USER7_SCREEN = '000002BF'X PARAMETER SMG$K_USER8_SCREEN = '000002C0'X PARAMETER SMG$K_SET_ASCII = '000002C1'X PARAMETER SMG$K_SET_SPEC_GRAPHICS = '000002C2'X PARAMETER SMG$K_SET_SUPPLEMENTAL = '000002C3'X PARAMETER SMG$K_SET_JIS_KANA = '000002C4'X PARAMETER SMG$K_SET_KANJI = '000002C5'X PARAMETER SMG$K_SET_JIS_ROMAN = '000002C6'X PARAMETER SMG$K_SET_HANZI = '000002C7'X PARAMETER SMG$K_SET_HANYU = '000002C8'X PARAMETER SMG$K_SET_HANGUL = '000002C9'X PARAMETER SMG$K_SET_KS_ROMAN = '000002CA'X PARAMETER SMG$K_MAX_STRING2_CODE = '00000370'X !DEC$ END OPTIONS