|
midrange.com
Hello Booth,
You wrote:
> 1) What is a good terminal model number to use for a device that will be a
> Client access PC? Choices seem to be 3197, 3179, and 3477 or another?
>
> 2) same question, for attached PC printers. Model 5224, 4214, 3812, or
> another?
Depends on the support you require in the emulated devices. If in doubt pick
the most recent device type.
> 3) I want to display a record with many fields on the screen. Depending
> on why and who is displaying the screen, I want some, all, or none of the
> fields to be input capable. Is it possible to have 2 lines something like
> this:
> A 31 CHGINPDFT(HI
> UL)
> A N31 CHGINPDFT(PR)
> instead of coding every single field, or having two formats?
Already answered by Charlie Massoglia.
>
> Here's two questions I already didn't know the answer to:
>
> 4) MOUBTN keyword: What is an EVENT-ID? How would it be used?
The event-id is a hexadecimal value associated with the mouse button event and
is used to program the mouse
buttons. There are 18 mouse events possible: 3 buttons with 3 events; each
event (up, down, and double click)
and two keyboard states (shifted and unshifted) The event values used within
the 5250 data stream as part of
the Programmable Mouse Buttons Structured Field are:
x'00' reserved
x'01' Left button pressed
x'02' Left button released
x'03' Left button double-clicked
x'04' Right button pressed
x'05' Right button released
x'06' Right button double-clicked
x'07' Middle button pressed
x'08' Middle button released
x'09' Middle button double-clicked
x'0A' Shifted left button pressed
x'0B' Shifted left button released
x'0C' Shifted left button double-clicked
x'0D' Shifted right button pressed
x'0E' Shifted right button released
x'0F' Shifted right button double-clicked
x'10' Shifted middle button pressed
x'11' Shifted middle button released
x'12' Shifted middle button double-clicked
x'13'-x'FF' reserved
However the EVENT-ID mentioned in the DDS Reference refers to associating the
mouse buttons with an AID value
much like the AID associated with function keys. They should be returned in
the same AID byte as the function
keys. You can associate any of these EVENT-ID values with a mouse event. For
example
MOUBTN(*ULP E07)
associates the "unshifted left button pressed" event with the EVENT-ID E07.
The actual value of the Enn event
is described by the constants below. Your program can use these values to
handle mouse actions in the same way
as it should handle function keys. The EVENT-ID values are as follows:
For RPG IV
* Mouse events (V3R1 DDS enhancement)
D $ME00 C CONST(X'70')
D $ME01 C CONST(X'71')
D $ME02 C CONST(X'72')
D $ME03 C CONST(X'73')
D $ME04 C CONST(X'74')
D $ME05 C CONST(X'75')
D $ME06 C CONST(X'76')
D $ME07 C CONST(X'77')
D $ME08 C CONST(X'78')
D $ME09 C CONST(X'79')
D $ME10 C CONST(X'7A')
D $ME11 C CONST(X'7B')
D $ME12 C CONST(X'7C')
D $ME13 C CONST(X'7D')
D $ME14 C CONST(X'7E')
D $ME15 C CONST(X'7F')
For RPG/400
* Mouse events (V3R1 DDS enhancement)
I X'70' C $ME00
I X'71' C $ME01
I X'72' C $ME02
I X'73' C $ME03
I X'74' C $ME04
I X'75' C $ME05
I X'76' C $ME06
I X'77' C $ME07
I X'78' C $ME08
I X'79' C $ME09
I X'7A' C $ME10
I X'7B' C $ME11
I X'7C' C $ME12
I X'7D' C $ME13
I X'7E' C $ME14
I X'7F' C $ME15
>
> 5) Is it possible to put a scrollbar on a subfile window?
>
Yes. SFLEND(*SCRBAR) will do it but check the DDS Reference to be sure you
understand what happens on different
display devices and also how page-at-a-time subfiles are shown.
Regards,
Simon Coulter.
//----------------------------------------------------------
// FlyByNight Software AS/400 Technical Specialists
// Phone: +61 3 9419 0175 Mobile: +61 3 0411 091 400
// Fax: +61 3 9419 0175 E-mail: shc@flybynight.com.au
//
// Windoze should not be open at Warp speed.
//--- forwarded letter -------------------------------------------------------
> X-Mailer: MR/2 Internet Cruiser Edition for OS/2 v1.46b b46b
> Date: Thu, 30 Apr 98 20:19:28 -0400
> From: boothm@ibm.net
> To: MIDRANGE-L@midrange.com
> Reply-To: MIDRANGE-L@midrange.com
> Subject: re: answers cause questions
>
> When people give answers on here it causes questions. Ah well, so it
> goes.
>
> Here are some questions I already "knew" the answers to, and now I wonder
> if I do.
>
>
>
> Here's two questions I already didn't know the answer to:
>
> 4) MOUBTN keyword: What is an EVENT-ID? How would it be used?
>
> 5) Is it possible to put a scrollbar on a subfile window?
>
> --
> -----------------------------------------------------------
> boothm@ibm.net
> -----------------------------------------------------------
>
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
