Application Development Blog Posts
Learn and share on deeper, cross technology development topics such as integration and connectivity, automation, cloud extensibility, developing at scale, and security.
cancel
Showing results for 
Search instead for 
Did you mean: 
rosenberg_eitan
Active Contributor
2,180

I was a little bit hesitant if there is a place for such a post but then I decided lets the public be the Judge....


Some time we have to create a program that involve multiple screens .

Program Y_R_EITAN_TEST_08_21 (attached) is a sample program for demonstration purpose .

The program navigation is done by using statements "SET SCREEN dynnr","LEAVE TO SCREEN dynnr" and "LEAVE TO SCREEN 0"
(There are other options please refer to the online help) .

The program will start with "selection screen" and then screen 0100 will be called using "CALL SCREEN 100" .

The program use two levels of "screen sequence":
- 0100,0200,0300,0400 .
- 1100,1200,1300,1400 .


Screens 0100,0200,0300,0400 navigation is done using "SET SCREEN dynnr" and "LEAVE TO SCREEN dynnr" .


Screen 0100 will use "LEAVE TO SCREEN 0" to terminate the "screen sequence" and return to the "selection screen" .

From screens 0100,0200,0300,0400 we can (Using "Function code") "go down" to screen 1100 so "CALL SCREEN 1100" is used
(a new "screen sequence" is started )

Screens 1100,1200,1300,1400 navigation is done using "SET SCREEN dynnr" and "LEAVE TO SCREEN dynnr" .

From screens 1100,1200,1300,1400 we can "go back" to the caller of this "screen sequence" so "LEAVE TO SCREEN 0" is used .

Screens:

Happy navigation .

Because of upload size limit:

- Screens 0200,0300,0400 are a copy of screen 0100
- Screens 1200,1300,1400 are a copy of screen 1100

The user interface:

Title text
TITLE_COMMON&1
Status
STATUS_COMMONSTATUS_COMMON
Function CodeFunctional TypeFunction TextIcon NameIcon TextInfo TextFast Path
BACKEBack
CANCELECancel
EXITEExit
LWR_LEVELELower level screensICON_NEXT_HIERARCHY_LEVEL
2 Comments
Labels in this area