?
Solved

How to program in RPG/400 using a DDS with multiple WINDOWs

Posted on 2003-11-05
2
Medium Priority
?
1,059 Views
Last Modified: 2007-12-19
I'm doing this because I couldn't find a way to control the TAB order on a DDS screen.  There are 3 sections on my screen (the top half of the screen is divided into 3 "boxes" side-by side and each box contains some fields).  I wanted to be able to TAB through the fields in each section before TABBING to the next section.  I couldn't find a way to do that, so I'm trying to use WINDOWs for each section. . .

I have a DDS screen with 3 WINDOW records and 1 regular record.  I want to display all 3 WINDOW records and the regular record all at once.  The 3 WINDOW records do not overlap each other.  However, the regular record occupies the entire screen and is overlapped by all 3 WINDOW records.  All 3 WINDOW records and the regular records have Input/Output (B) fields.  I want the users to be able to enter data in all 4 records by TABBING through each WINDOW record in order, then the regular record.  Right now, the regular record gets displayed with no WINDOW records.  Then I press the ENTER key, and the first WINDOW record gets displayed (overlayed on top of the regular record).  Then each time I press the ENTER key, the next WINDOW record gets displayed.  I want them to come up all at once.  

My WINDOW records are defined like this (I get confused with all the possible parameters (OVERLAY, INZRCD,...)):
A          R WINDOW1                                    
A                                      INZRCD          
A                                      OVERLAY          
A                                      WINDOW(5 4 8 22)

My RPG code currently looks like:

C                     WRITEWINDOW1                    
C                     WRITEWINDOW2                    
C                     WRITEWINDOW3                    
C                     WRITESCRN1                      
C                     READ SCRN1                    96
C                     READ WINDOW1                  96
C                     READ WINDOW2                  96
C                     READ WINDOW3                  96

0
Comment
Question by:satoj
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
2 Comments
 
LVL 14

Expert Comment

by:daveslater
ID: 9692790
Hi
you can use the FLDCSRPRG key word in DSS to control the TAB

Dave
0
 
LVL 14

Accepted Solution

by:
daveslater earned 1000 total points
ID: 9692798
yet another typo

you can use the FLDCSRPRG key word in DDS to control the TAB
0

Featured Post

[Webinar] How Hackers Steal Your Credentials

Do You Know How Hackers Steal Your Credentials? Join us and Skyport Systems to learn how hackers steal your credentials and why Active Directory must be secure to stop them.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article lists the top 5 free OST to PST Converter Tools. These tools save a lot of time for users when they want to convert OST to PST after their exchange server is no longer available or some other critical issue with exchange server or impor…
I originally wrote this article to compare SARDU and YUMI, but have now added Easy2Boot, since that is the one I currently use and find the easiest to create and alter.
Michael from AdRem Software outlines event notifications and Automatic Corrective Actions in network monitoring. Automatic Corrective Actions are scripts, which can automatically run upon discovery of a certain undesirable condition in your network.…
Sometimes it takes a new vantage point, apart from our everyday security practices, to truly see our Active Directory (AD) vulnerabilities. We get used to implementing the same techniques and checking the same areas for a breach. This pattern can re…
Suggested Courses

765 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