Dear Peg,
I need a push in the right direction. I have written a simple
event driven program (only my second), a table maintenance program.
It works fine and I am satisfied with it except for one thing: I
would like to include mfnp.i (include for next/prev logic)
functionality so that the user can down-arrow to a given record. I
use mfnp.i in all my procedural programs and the users like it (and I
like it when I'm the user).
I have two frames--one for the table keys and one for the rest of the
table fields; I wish to include mfnp.i in the table keys frame only.
I tried using the same kind of code that I would use in an editing
phrase (see below) but I get strange results.
1. Every other keystroke seems to be ignored.
2. Arrowing down will not show me all the records in the table.
3. My custom status line is being replaced with a standard Mfg/Pro
status line.
I've tried several changes to my program but nothing I do helps.
Looking at mfnp.i, I see that there is a lot going on in there and
maybe it just isn't compatible with event-driven programming.
Can anyone tell me how to get mfnp.i to work in an event-driven
program or how to achieve the same functionality in another way?
Thanks much in advance.
Progress 8.2C CHUI
Mfg/Pro 8.5F
Jack Kaufman
Sr. Programmer/Analyst
Systems Department
Ingersoll-Rand Corporation
101 North Main Street
Athens, PA 18810
Phone: 570-882-0366
Fax: 570-882-0452
Email: Jack_Kaufman@ingerrand.com
----------------------------------------------
<BLOCKQUOTE><font size="1" face="Arial, Verdana">code:</font><HR><pre>
on any-key of frame frm-ftpm-keys anywhere do:
{mfnp.i ftpm_mst
loc-code ftpm_loc_code
appl-code ftpm_appl_code
ftpm_loc_appl}
if recno <> ? then do:
loc-code = ftpm_loc_code.
appl-code = ftpm_appl_code.
display
loc-code
appl-code
with frame frm-ftpm-keys.
recno = ?.
end.
else do:
status input.
readkey.
apply lastkey.
end.
end.
[/code]
I need a push in the right direction. I have written a simple
event driven program (only my second), a table maintenance program.
It works fine and I am satisfied with it except for one thing: I
would like to include mfnp.i (include for next/prev logic)
functionality so that the user can down-arrow to a given record. I
use mfnp.i in all my procedural programs and the users like it (and I
like it when I'm the user).
I have two frames--one for the table keys and one for the rest of the
table fields; I wish to include mfnp.i in the table keys frame only.
I tried using the same kind of code that I would use in an editing
phrase (see below) but I get strange results.
1. Every other keystroke seems to be ignored.
2. Arrowing down will not show me all the records in the table.
3. My custom status line is being replaced with a standard Mfg/Pro
status line.
I've tried several changes to my program but nothing I do helps.
Looking at mfnp.i, I see that there is a lot going on in there and
maybe it just isn't compatible with event-driven programming.
Can anyone tell me how to get mfnp.i to work in an event-driven
program or how to achieve the same functionality in another way?
Thanks much in advance.
Progress 8.2C CHUI
Mfg/Pro 8.5F
Jack Kaufman
Sr. Programmer/Analyst
Systems Department
Ingersoll-Rand Corporation
101 North Main Street
Athens, PA 18810
Phone: 570-882-0366
Fax: 570-882-0452
Email: Jack_Kaufman@ingerrand.com
----------------------------------------------
<BLOCKQUOTE><font size="1" face="Arial, Verdana">code:</font><HR><pre>
on any-key of frame frm-ftpm-keys anywhere do:
{mfnp.i ftpm_mst
loc-code ftpm_loc_code
appl-code ftpm_appl_code
ftpm_loc_appl}
if recno <> ? then do:
loc-code = ftpm_loc_code.
appl-code = ftpm_appl_code.
display
loc-code
appl-code
with frame frm-ftpm-keys.
recno = ?.
end.
else do:
status input.
readkey.
apply lastkey.
end.
end.
[/code]