RE: Display Files in CL -- MIDRANGE-L

× 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.

Terry:

This works, but....if they DO press Enter on the SecondScreen it throws an 
error.

CPF0887 Data available from previous input request.

===========================================================

I just did somthing similar to this a week ago.
Declare the file:

DCLF       FILE(MYDSPF) RCDFMT(*ALL)

Send the first screen as:

SNDRCVF    RCDFMT(SCRNPARM)

Send subsequent screens as:

SNDRCVF    RCDFMT(WORKMSG) WAIT(*NO)

Terry

> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx 
> [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob Voltz
> Sent: Monday, August 08, 2005 11:43 AM
> To: midrange-l@xxxxxxxxxxxx
> Subject: Display Files in CL
> 
> 
> I want to display an informational screen in CL that does not 
> require a response, something like this:
> 
> FirstScreen = Get Parameters, press enter to continue
> SecondScreen =  Display Message: Work Files are being built, 
> please stand-by
> ThirdScreen = Display message: Files are ready for downloading
> 
> I want the CL program to continue running after displaying 
> SecondScreen, without the operator having to press enter, 
> then pause after displaying ThirdScreen.

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.