DEFINE POPUP pat_pu ; PROMPT FIELD LEFT( work51.pat_no, 5 ) + '-' + RIGHT( work51.pat_no, 2 ) + ' ' + work51.NAME ; SCROLL ; MARGIN