× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Loyd,

At 03:54 AM 12/13/97 GMT, you wrote:
>On Fri, 12 Dec 1997 14:12:32 -0600, Vern Hamberg
><hambergv@goldengate.net> wrote:
>>>>>      FLVWEDGEDCF  E                    WORKSTN  
>>>>       F                                           KNUM    1
>...
>>>>       C                     REQD LVWEDGED           9999
>
>>>This worked the first time! So, having not done this, what does the
>>>KNUM 1 do??
>
>>Maximum number of devices this file can acquire.
>
>So... it won't work unless K NUM 1 is used... AND I must READ the
>actual display file... 
>
>OK, this is pretty neat. (Considering I've only been doing RPG for a
>few years.) Is there a way to change the WAITRCD parameter from within
>RPG, or is that at CL-only function. For instance, a patron runs their
>card through the machine, and the account is still on the system. (We
>merge accounts periodically and mail the patron new cards, but
>sometimes the old one gets used.) If the account is valid, I want the
>screen to time out after 10 seconds. But if the account number is
>invalid, I'd like a timeout of say, 5 seconds... 
>
>Can this be accomplished within RPG, or do I need to call a CL program
>from RPG with the # of seconds as a paramter, let the CL do the
>OVRDSPF, then call a second small RPG program to read the display?

 There is another method that you can use which uses the $$TIMER function
in ICF.  There was some code published in NEWS 3X/400 years ago that used
that method.  It was actually a S/36 function.

 Another method (by Pete?) that was posted to this board is the dataq method.

 Both allow you to dynamically change the wait time.

 -mark

+---
| 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 thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.