working-storage section. 77 hmenu pic s9(9) comp-4. ... screen section. ...   03 screen-1-lb-1 List-Box      pop-up menu hmenu      line 5.7      column 3.1      size 34.6 cells       lines 15.5 cells       id 1      . ... *> Use w$menu in procedure division to build the pop-up menu ...  |