RE: Programs that didn't need to be written - ScreenSaver5250

I vaguely recall seeing it used years ago for a self-refreshing screen like a large clock or counter or real-time (refreshed) display of info.


Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power



-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Scott Klement
Sent: Monday, August 15, 2022 9:16 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Programs that didn't need to be written - ScreenSaver5250

Frank,

INVITE, essentially, "unlocks the keyboard" so you can do an output-only
operation to a screen, but still allow keyboard input (in the case of a
screen saver, I'm assuming you'd use it so a key like enter or an F-key
will stop the screen saver.)

While you could use it with ACQ to handle multiple displays, that's only
one potential use.

-SK

On 8/15/22 5:39 PM, Frank Kolmann wrote:

Quite confused.  Not sure how INVITE would work as a screen saver.

I was never aware that OS400 disconnected inactive jobs.

INVITE is used with ACQ op-code for multiple device coding.  I rarely
used MRT programs,
INVITE is used with UDDS to get input from the device, also rarely used.

From the manual
-----
INVITE (Invite) keyword for display files
Use this file- or record-level keyword to invite the device for a
later read. To send an invite to a specific
device, your program sends an output operation to the device with the
INVITE keyword in effect. If the
record format used has output-capable fields, the data is sent to the
device before the device is invited.
This keyword has no parameters.
INVITE must be used if the display file can have multiple _acquired_
devices and your program does read
from invited devices operations.
-----

Frank

On 15/08/2022 11:41 am, Chris Pando wrote:

I use this program to keep the system from thinking my job is
inactive, and
disconnecting me.  A recursive implementation of quicksort, it uses the
INVITE keyword to update the screen every n seconds. It also uses a
Fisher-Yates shuffle, with the bindable procedure CEERAN0.

https://nam12.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.brilligware.com%2Fcp1329.html&amp;data=05%7C01%7C%7C774ff245b31a48d3168808da7f3e175f%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637962201894506865%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=ZbTc2BjdWbRavbmCir9dVLsOlq6qTSAnG2dnhuSjyNE%3D&amp;reserved=0

Chris Pando
chris@xxxxxxxxx
https://nam12.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.brilligware.com%2F&amp;data=05%7C01%7C%7C774ff245b31a48d3168808da7f3e175f%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637962201894506865%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&amp;sdata=7FyNlMarRJwJ0%2FqYHCxTSkKb7r2WJac8gTfkeQ1nL6g%3D&amp;reserved=0 - Home to MineSweeper5250