working-storage section. 77 hmenu pic s9(9) comp-4. ... screen section. ... 03 screen-1-la-1 Label line 4.3 column 36.7 size 12.4 cells lines 2.9 cells id 4 pop-up menu hmenu title "R-Click Menu" . ... *> Use w$menu in procedure division to build the pop-up menu ... |