HP3000-L Archives

February 2003, Week 2

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Remap the num pad ENTER key to work like RETURN
From:
KENT WALLACE <[log in to unmask]>
Reply To:
KENT WALLACE <[log in to unmask]>
Date:
Tue, 11 Feb 2003 08:56:23 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (42 lines) 
Display this for Block mode enter key:

01 LINE01-BLOCK-MODER.
  03 NOUSE45.
   05    FILLER PIC X(1) VALUE %33.
   05    FILLER PIC X(15) VALUE "&o1GSub Main".
   05    FILLER PIC X(1) VALUE %15.
 03 LINE03.
   05    FILLER PIC X(50) VALUE
'application.ReturnEqualsEnter=true'.
   05    FILLER PIC X(1) VALUE %15.
 03 LINE05.
   05    FILLER PIC X(7) VALUE
'End Sub'.
   05    FILLER PIC X(1) VALUE %15.
   05    FILLER PIC X(1) VALUE %33.
   05    FILLER PIC X(3)  VALUE '&oH'.

Display This to put it back to character mode:

01 LINE01-CHARACTER-MODER.
  03 NOUSE45C.
   05    FILLER PIC X(1) VALUE %33.
   05    FILLER PIC X(15) VALUE "&o0GSub Main".
   05    FILLER PIC X(1) VALUE %15.
 03 LINE03C.
   05    FILLER PIC X(50) VALUE
'application.ReturnEqualsEnter=FALSE'.
   05    FILLER PIC X(1) VALUE %15.
 03 LINE05C.
   05    FILLER PIC X(7) VALUE
'End Sub'.
   05    FILLER PIC X(1) VALUE %15.
   05    FILLER PIC X(1) VALUE %33.
   05    FILLER PIC X(3)  VALUE '&oH'.

Kent Wallace
Boise Id

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2