Solved

Background disappears when calling a window program multiple times

Posted on 2004-08-06
5
600 Views
Last Modified: 2012-05-05
I am wondering if anyone can help me on this....

I have a subfile (pgm A) into which the user can enter an option code
that will cause a window (pgm B) to pop up with more detailed
information. If the user enters this option on more than one subfile
record, the window will display multiple times before the
subfile/control records are written again in pgm A.

When the 2nd (and subsequent) windows of pgm B display, the screen
behind them (pgm A) goes black. If I select only one subfile record
at a time, everything displays okay. It is only when I am doing
multiple calls to pgm B without redisplaying pgm A inbetween, that I
run into the black background problem.

I been trying to use keywords such as KEEP, USRRSTDSP, RMVWVW, and
others to fix the problem, but with no success. I am sure that I
have written programs for previous employers that did this, but just
can't remember how. Guess I'm getting old.

Any help would be greatly appreciated.
0
Comment
Question by:briantoddburton
  • 3
5 Comments
 
LVL 14

Expert Comment

by:daveslater
Comment Utility
Hi
(this is from memory - I do not have access to the 400 till Monday)
You have the dummy definition with the Keep and Assume keywords.

I think when call pgm b. if you do not return with *inlr=*on this causes the problem.
Define the screen as usropn and close and open it on each call. I think that will solve it.

Dave


0
 
LVL 3

Expert Comment

by:Mind_nl
Comment Utility
have you compiled the displayfiles with RSTDSP(*YES)...
0
 
LVL 14

Accepted Solution

by:
daveslater earned 125 total points
Comment Utility
Hi
just tested the pgm
got it the wrong way roung. You need to exit pgmb with *inlr = *off.

Dave
0
 
LVL 14

Expert Comment

by:daveslater
Comment Utility
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:

Accept daveslater comment as answer
 

Please leave any comments here within the next four days.

PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER!
daveslater
Page Editor
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

Learn to move / copy / export exchange contacts to iPhone without using any software. Also see the issues in configuration of exchange with iPhone to migrate contacts.
A procedure for exporting installed hotfix details of remote computers using powershell
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now