16 進値列の非表示

16 進値列の非表示は、狭い (80 列) 画面のユーザーにとって役立つことがあります。Associated Storage Areas 画面の例の「16 進値 (Hex Value)」見出しの上にある負符号 (-) にカーソルを合わせて Enter キーを押すと、16 進値列が縮小表示された Associated Storage Areas 画面の例に示されている画面に変わります。

図 1. 16 進値列が縮小表示された Associated Storage Areas 画面の例

  File  View  Services  Help
───────────────────────────────────────────────────────────────────────────────
Event 1 Program COBLVL88 Storage Areas                         Line 1 Col 1 80
Command ===> ________________________________________________ Scroll ===> CSR 
JOBNAME: COBLVL88  SYSTEM ABEND: 0CB            FAE1      2019/06/24  14:22:45

Task Global Table (TGT) at address 17096448 for length 344

WORKING-STORAGE SECTION
     + Expand hex   - Collapse level 88
 Off Data Value         Source (Starting at Line # 000010 )                    
BLW=0000 at address 170BA0D0
   0 *WORKING-STORAGE *  01  FILLER                 PIC X(20)  VALUE 'WORKING-
  10 *                *
Suppressed Copybook
 2E8 *....            *  01  FIELD-1                PIC 999999 COMP-3.
 2F0 0                   01  FIELD-2                PIC 999999 COMP-4.
 2F8 *......          *  01  FIELD-3                PIC 999999.
                         01  TABLE-4.
                             03  TABLE-8 OCCURS 6 TIMES.
                              04  TABLE-8A OCCURS 3 TIMES.
 300 1.111100e+02              05 ELEMENT-1                           COMP-1.
 304 *....            *        05 ELEMENT-2 OCCURS 4 TIMES            PIC XXXX
                                  88 JACK VALUE 'JACK'.
                                  88 JILL VALUE 'JILL'.
                                  ELEMENT-2(1,1,2) to ELEMENT-2(1,1,4) same as
 314 *....            *        05 ELEMENT-3                  PIC 999999 COMP-3

ここで、「Data Value」列の上にある負符号 (-) のポイント・アンド・シュート・フィールドが、正符号に変わっています。このポイント・アンド・シュート・フィールドにカーソルを合わせると、「16 進値 (Hex Value)」が可視だった最初の画面に戻ります。

最後に選択した「16 進数の縮小表示/拡張 (Collapse/Expand hex)」オプションは、ユーザーの ISPF プロファイルに保管され、それ以降に Associated Storage Areas 画面を開くときのデフォルト表示モードとして使用されます。