1 dcl  gct_charnames (128) char (8) varying static options (constant) initial
 2     ("nul",      "soh",      "stx",      "etx",      "eot",      "enq",      "ack",      "bel",
 3      "bs",       "ht",       "nl",       "vt",       "ff",       "cr",       "rrs",      "brs",
 4      "dle",      "dc1",      "dc2",      "dc3",      "dc4",      "nak",      "syn",      "etb",
 5      "can",      "em",       "sub",      "esc",      "fs",       "gs",       "rs",       "us",
 6      "space",    "excl_pt",  "dbl_quot", "sharp",    "dollar",   "percent",  "amprsnd",  "r_quote",
 7      "l_paren",  "r_paren",  "star",     "plus",     "comma",    "minus",    "dot",      "slash",
 8      "zero",     "one",      "two",      "three",    "four",     "five",     "six",      "seven",
 9      "eight",    "nine",     "colon",    "semi",     "lessthan", "equal",    "grthan",   "ques_mrk",
10      "atsign",   "A",        "B",        "C",        "D",        "E",        "F",        "G",
11      "H",        "I",        "J",        "K",        "L",        "M",        "N",        "O",
12      "P",        "Q",        "R",        "S",        "T",        "U",        "V",        "W",
13      "X",        "Y",        "Z",        "l_brack",  "backslsh", "r_brack",  "cirflex",  "underbar",
14      "l_quote",  "a",        "b",        "c",        "d",        "e",        "f",        "g",
15      "h",        "i",        "j",        "k",        "l",        "m",        "n",        "o",
16      "p",        "q",        "r",        "s",        "t",        "u",        "v",        "w",
17      "x",        "y",        "z",        "l_brace",  "vert_bar", "r_brace",  "tilde",    "del");