working-storage section. 77 hmenu pic s9(9) comp-4. ... screen section. ... 03 screen-1-tc-1 Tab-Control pop-up menu hmenu line 26.8 column 32.4 size 20.4 cells lines 12.8 cells id 8 bitmap-width 16 . ... *> Use w$menu in procedure division to build the pop-up menu ... |