 |
| Change the display in SEU AS400 |
Introduction
There are several SEU commands that can change the SEU display at any time which means we can change which source statements are to be displayed on the display.
Position to the design report display
We can position the particular source statement line by using some commands on the SEU display
n
write n (1,2,3...) on any line number in the source member to move the display to the exact line number entered. Please note that if the source member has 10 lines in total and you write 11 and press ENTER will move the display to the last line i.e. 10 at the top on the SEU display.
In the below example, we move the display to the 5th line.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0005.00 A JDFTVAL 211201
0002.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
pressing ENTER will move the display to the 5th source line of the source member.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
+n
write +n (1,2,3...) on any line number in the source member to move the display forward by n number of the line number. Please note that if the source member has 10 lines in total and you write +11 and press ENTER will move the display to the *****End of Data**** source line on the SEU display.
In the below example, we move the display forward by +5 line.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
+501.00 A JDFTVAL 211201
0002.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Display move forward by 5 lines
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
-n
write -n (1,2,3...) on any line number in the source member to move the display backward by the n number of the line number.
In the below example, we move the display backward by a -5 line.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT ** ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8
-5 ****************** End of data ******************************************************************************************
Display move backward by 5 lines. pointing at the 3rd line on top since a total of 7 lines are there in a source member and we are at End of the Data line.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Exclude lines on the design report display
There are SEU commands which can exclude a single line or a block of lines in the SEU display source member.
X
Write X on the source line to exclude that line from the SEU display.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
X002.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
pressing ENTER will exclude Line no. 2 from the SEU display
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
- - - - ------------- 1 data records excluded -----------------------------------------------------------------------------------
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Xn
Write Xn on the source line to exclude n(1,2,3....) number of lines from the SEU display.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
X202.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
pressing ENTER will exclude Line no. 2 and Line no.3 from the SEU display
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
- - - - ------------- 2 data records excluded -----------------------------------------------------------------------------------
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
XX
Write XX on 2 lines to select a set/block of lines to exclude from the SEU display
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
XX02.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
0004.00 A JFLD(MANAGERID EMPID) 211201
0005.00 A EMPID JREF(1) 211201
XX06.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
pressing ENTER will exclude Line no. 2,2,4,5 and 6 from the SEU display
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
- - - - ------------- 5 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Re-Display the excluded lines on the design report display
We can show back the excluded source statement line excluded through commands such as X, Xn, XX by using some commands on the SEU display
SF
To display back the first line from the set of excluded lines.
Let's see an example where line numbers 2,3,4,5,6 are excluded
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
SF- - - ------------- 5 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Displayed back the first excluded line i.e line no.2
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
0002.00 A R RJLF1 JFILE(PF1 PF1) 211201
- - - - ------------- 4 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
SFn
To display back the first n(1,2,3...) number of lines from the set of excluded lines.
Let's see an example where line numbers 2,3,4,5,6 are excluded
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
SF2 - - ------------- 5 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Displayed back the first excluded 2 lines i.e line no.2 and 3
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
0002.00 A R RJLF1 JFILE(PF1 PF1) 211201
0003.00 A J JOIN(1 2) 211201
- - - - ------------- 3 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
SL
To display back the last line from the set of excluded lines.
Let's see an example where line numbers 2,3,4,5,6 are excluded
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
SL- - - ------------- 5 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Displayed back the last excluded line i.e line no.6
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
- - - - ------------- 4 data records excluded -----------------------------------------------------------------------------------
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
SLn
To display back the Last n(1,2,3...) number of lines from the set of excluded lines.
Let's see an example where line numbers 2,3,4,5,6 are excluded
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
SL2 - - ------------- 5 data records excluded -----------------------------------------------------------------------------------
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Displayed back the last excluded 2 lines i.e line no.5 and 6
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
0001.00 A JDFTVAL 211201
- - - - ------------- 3 data records excluded -----------------------------------------------------------------------------------
0005.00 A EMPID JREF(1) 211201
0006.00 A EMPNAME JREF(1) 211201
0007.00 A MANAGERNAM JREF(2) RENAME(EMPNAME) 211201
****************** End of data ******************************************************************************************
Note
You can press F5 at any time to display all the excluded records
Create horizontal windows
Following command used with horizontal windows
Shift lines without truncate source statement
Related Post
Read also :
- Source Entry Utility (SEU) in AS400
- Changing Session Defaults (F13) in SEU AS400
- SET command in SEU AS400
- Line Command in SEU AS400
- Display Column Line in SEU AS400
- Display Format Lines in SEU AS400
- Prompt Line Command in SEU AS400
- FIND and CHANGE command in SEU AS400
- Browse and Copy in SEU AS400
- SEU command line commands in AS400