RE: INDARA INDDS() not working

Thanks Craig.

It always good to hear of other options and new possibilities.


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Craig Richards
Sent: Thursday, July 19, 2018 2:54 AM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: Re: INDARA INDDS() not working

Hi Paul,

Another thing thing occurred to me when I read your email - around the comment *"Once the record is found I exit the screen"*

When I first started dabbling in java and playing with the some of the basic patterns like MVC, it got me thinking more about event driven processing and if / how I could apply it to some of my RPG Code.

To that end I had a bit of a play using data queues with Display Files - you can specify a data queue on CRTDSPF and then if I remember correctly you write to the screen formats but you always read from the data queue.
This means that an external process can also put data on the queue and influence your program.

So you could for example do something on program startup to register your screen as an observer of some data or process.
Then whatever is changing the data or whatever conditions you are interested in knows to send an entry to your data queue when things change.

In the program when you read from the data queue - you can tell whether it has come from the screen or from an external source.

It was a long time ago when I looked at this and I think I just found it too messy - there was something awkward around CF and/or CA keys and I thought it might be unusual and inconvenient for someone looking at the screen to have it suddenly update on them.

However I mention it because in amongst the awkwardness there are some interesting possibilities.

best regards,
Craig

On 19 July 2018 at 01:02, Mark Murphy <jmarkmurphy@xxxxxxxxx> wrote:

Good thing you weren't using Qualified on that file. The K indicators
don't work for that.

On Wed, Jul 18, 2018 at 4:53 PM Paul Therrien <
paultherrien@xxxxxxxxxxxxxxxxxx> wrote:

Oh Crap! Of course!. That's what i get for copying someone else's
display file!

Thanks!

Paul

On 2018-07-18 16:42, Craig Richards wrote:

In your Display File do you have:

CF03(03)

On 18 July 2018 at 21:36, Therrien, Paul <ptherrien@xxxxxxxxxxx>

wrote:

Hey all. I am working with a display file that has INDARA defined.
I have an RPG file Spec for the DSPF with an INDDS()
specification

for a

data structure.

DCL-DS DSPIndicators;
F3Exit ind pos(3);
F12Cancel ind pos(12);
End-DS;

This has ALWAYS worked.

The thing that is different about this DSPF is I am using the
INVITE keyword and I am attempting to do an auto-update screen
that shows the

time

progressing a second at-a-time.

For each loop of the screen (Write to the record, read from the

file), I

am accessing a database file looking for a record. Once the
record is found I exit the screen.
This is also a window DSPF. I have window format and a flat
record

format

that references the window. I am writing to the flat format
reading

from

the display file.

I seem to have the logic working well enough. But I cannot get
the
INDARA/INDDS() logic working.
The users have the ability to hit F3 or F12 to cancel.
But, I am having to check for *INKC for F3 instead of F3Exit.
In

debug I

never see the F3Exit getting set ON, but I do see *INKC getting
set

on.

What am I not understanding?

Any help appreciated.

Thanks,

PJT

+++++ This email and related attachments may contain confidential
information intended exclusively for the addressee. Unauthorized
use, disclosure or distribution of this material is prohibited.
If you

received

this message in error, please advise the sender and delete all
copies

of

it. Content is provided by the individual sender and does not

necessarily

reflect the views of the Company. Though sender believes this

transmission

to be virus-free, it is the recipient's responsibility to ensure
that

it is.

--
This is the RPG programming on the IBM i (AS/400 and iSeries)

(RPG400-L)

mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please
take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our

affiliate

link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email:
RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list
options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take
a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our
affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD