Just in case anyone could use this tip.  A client wanted me to
print a report to the screen.  There is a related report that
sometimes they would also want to view but didn't want to have
to [esc] out of the first report and answer a yes/no question on
whether they wanted the second report.

What I did was locate the words 'PRESS [F4] TO VIEW PAYMENTS REPORT'
at the top of the first report.  Then I keymapped [F4] to an [esc].
Works like a charm!

      SET KEYMAP [F4] = [ESC]

      PRINT WinViewService WHERE servid = .vservid

      IF LASTKEY(1) = '[F4]' THEN
        PRINT WinViewPayServ WHERE servid = .vservid
      ENDIF

      SET KEYMAP [F4] OFF


Karen

Reply via email to