Adding a Sub Screen
In the Entry Argument List field (16) of SGP add arguments to match the IDs
of the drop-down screen. Argument Description is optional. In this example
the drop-down screen has two IDs, Student ID and Year. A.GEO.ID is for the
Student ID and A.YEAR is for the year.
--------------------------------------------------------------------------------
| 01/25/02 15:12 SCREEN GLOBAL PARAMETERS ST SGP |
| Menu.......: Contract Entry Screen Process: XJAS02 |
| Gen Version: 99/10/17 Process Type: Screen |
| Created On.: 01/23/02 By: Changed On: 01/25/02 By: |
|------------------------------------------------------------------------------|
| 1 Process Mnemonic: |
| 2 Description.....: Contract Entry Screen |
| 3 VOC Synonyms....: 1: |
| 4 Release Status..: D Developing |
| 5 Release Modules.: 1: BASE 2: AC 3: |
| 6 * Tech Doc......: 1: Dec 10 2001 02:25pm |
|------- Process Characteristics -------- |
| 7 Catalog Disposition.........: L |--------- Screen Dimensions ----------|
| 8 Allow Delete of Primary Rec.: Yes | 12 Maximum/Minimum Lines...: 22 22 |
| 9 Inquiry Process (No Update).: No | 13 Maximum/Minimum Columns.: 80 80 |
| 10 Detail Process (Not on Menu): No | 14 Absolute Origin Line/Col: 1 1 |
| 11 Process Uses Standard I/O...: Yes | 15 Issue Final Prompt Before End.: Y |
|--------- Entry Argument List ------------------------------------------------|
| 16 Argument Name Argument Description |
| 1: A.GEO.ID GEODEMIC ID |
| 2: A.YEAR YEAR STUDENT WORKED |
|XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX|
With the top or first screen in the Painter detail down (F2) in the field that
the second or drop-down screen is to be attached.
--------------------------------------------------------------------------------
| aaaaaaaa bbbbbb efg ccccccccccccccccccccccccccccc dddddd |
| hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh |
| Year iiii |
|------------------------------------------------------------------------------|
| |
| 1 Class Code: jjjjjjjjjjjj 2 Campus: kkkkkkkkkkkkkkkkkk |
| |
| 3 Dept Award Amt Rate Start Dt End Dt |
| |
| .1: llllllllllllll mmm nnnnnn ooooo pppppppp qqqqqqqq |
| |
| .2: .............. ... ...... ..... ........ ........ |
| |
| .3: .............. ... ...... ..... ........ ........ |
| |
| .4: .............. ... ...... ..... ........ ........ |
| |
| |
| |
| |
| |
|X ST XJAS01 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX|
Select SEIO (2).
--------------------------------------------------------------------------------
| aaaaaaaa bbbbbb efg ccccccccccccccccccccccccccccc dddddd |
| hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh |
| Year iiii |
|------------------------------------------------------------------------------|
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
X X
X 1 HLP Process/Field Help Definition 8 SWD Screen Window Definition X
X 2 SEIO Screen Element Input/Output 9 SGH Screen Global Hooks X
X 3 LPTD Process LookUp Specifications 10 SXR Screen External Resources X
X 4 DEP Database Element Presentation 11 SCSS Screen Client/Server Specs X
X 5 LCTD Element LookUp Specifications 12 SFLD Screen Element Fields X
X 6 SEH Screen Element Hooks 13 EDOC Process Element Tech Doc X
X 7 SWC Screen Window Characteristics 14 STWO Screen Table Window Overview X
X X
X Enter Mnemonic or Selection Number, or press CANCEL: X
X X
XXXXXXXXXXXXXXXXXXXXXXXXXXX Press HELP for assistance XXXXXXXXXXXXXXXXXXXXXXXXXX
| |
| |
| |
| |
|X ST XJAS01 XXXXXXXXXXXXXX X.CNTRT.DEPT XX|
Add the code shown below to the Input Editing.
--------------------------------------------------------------------------------
| 01/25/02 15:31 SCREEN ELEMENT INPUT/OUTPUT ST SEIO |
| Menu: XCES Contract Entry Screen Process: XJAS01 |
| File: Z99.CONTRAC *** X.CNTRT.DEPT *** |
| Output Convert: Mask: |
|------------------------------------------------------------------------------|
| 1 * Output Editing: 1: TRANSLATE " " |
| 2: |
| 3: |
|------------------------------------------------------------------------------|
| 2 * Input Editing.: 1: IF COMMAND = CMD.DT THEN |
| 2: A.GEO.ID = V.X.CNTRT.STU.ID |
| 3: A.YEAR = V.X.CNTRT.YEAR |
| 3 * Delete Hook...: 1: |
| 2: |
| 4 * Input Source..: 1: |
| 2: |
|------------------------------------------------------------------------------|
| 5 Field Label...........: |
| 6 * Val/Xlat Table......: 1: DEPTS |
| 7 * Default Code........: 1: |
| 8 CDD Element To Inherit: |
|XX Controller Input Editing XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX Value 1/6 XXXXXXXXX|
Detail (F2) into the Input Editing field to see the full code segment.
I_INPUT
Top of "RECORD56283" in "UFD", 6 lines, 186 characters.
*--: p
001: IF COMMAND = CMD.DT THEN
002: A.GEO.ID = V.X.CNTRT.STU.ID
003: A.YEAR = V.X.CNTRT.YEAR
005: CALL_SCREEN XJAS02(A.GEO.ID, A.YEAR)
006: END
Bottom.
*--:
V.X.CNTRT.STU.ID is the dictionary item with a V. in front that is used for the Student
ID in the top or first
screen. It holds the value to be passed to the first argument placed in SGP, A.GEO.ID.
Place a V in front of the dictionary name used for the Student ID in the top or first
screen, V.X.CNTRT.STU.ID.
V.X.CNTRT.YEAR is the dictionary name used for the Year in the top or first screen.