×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




That did the trick thanks.....learned something new today.....


On Tue, 26 Jul 2005 08:17:58 -0700, Tony Carolla wrote
> When you create the dspf, specify DFRWRT(*NO). Without this, the 
> data isn't displayed on a display file until you do a READ (which, 
> it sounds like you aren't doing).
> 
> Another idea is, sometimes there are multiple 'stages' a program 
> goes through while the user is waiting. For this purpose, I create a 
> display format with a single long alpha field. This way, you can 
> EVAL the appropriate 'waiting' message to the buffer, and tell the 
> user what they are waiting for more specifically.
> 
> On 7/26/05, Douglas W. Palme <dpalme@xxxxxxxxxxx> wrote:
> > 
> > I am processing an sql call within an rpgle program....unfortunately it
> > takes about three minutes to build and extract the appropriate data.
> > 
> > I have been trying to display a simple display file to the screen so the 
> > end
> > user knows the program is still working but so far have been unable to 
get
> > it to work correctly.
> > 
> > I tried using WRITE which is supposed to display the record to the screen
> > and then return control to the program (begin sql processing) but nothing
> > ever gets displayed.
> > 
> > Is there something else I'm missing? I turned the KEEP RECORD ON DISPLAY 
> > on
> > but that did not make any difference either.
> > 
> > 
> > If you bought, it was hauled by a truck - somewhere, sometime.
> > 
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> > 
> >
> 
> -- 
> "Enter any 11-digit prime number to continue..."
> "In Hebrew SQL, how do you use right() and left()?..." - Random Thought
> "If all you have is a hammer, all your problems begin to look like nails"
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
>  mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To 
> subscribe, unsubscribe, or change list options, visit: 
> http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-
> L-request@xxxxxxxxxxxx Before posting, please take a moment to 
> review the archives at http://archive.midrange.com/rpg400-l.


If you bought, it was hauled by a truck - somewhere, sometime.


This thread ...

Replies:

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

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