working-storage section. 77 hmenu pic s9(9) comp-4. ... screen section. ...   03 screen-1-ef-3 Entry-Field      pop-up menu hmenu      line 35.8      column 49.7      size 11.6 cells       lines 3.5 cells       id 20      3-d      proposal-delay 400      . ... *> Use w$menu in procedure division to build the pop-up menu ...  |