 |
| Display Column Line in SEU AS400 |
Display FREE format column line
In this blog, we will discuss which command we can use to ask SEU (Source entry utility) to display free format column lines.
COLS command is used as below to insert the free format column line above the source statement on which COLS command is written.
Type COLS as below on any line and press ENTER.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions+++++++++++++++++++++++++++
*************** Beginning of data ***************************************************************************************
COLS.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 ******************************************************************************************
After pressing ENTER, you will see column line as below
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT ** ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8
*************** Beginning of data ***************************************************************************************
FMT ** ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8
0001.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 ******************************************************************************************
Once you press the F5 key the above column line gets removed from the source as below.
Columns . . . : 1 80 Edit EASYCLASS1/WEBSITE
SEU==> JLF1
FMT ** ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8
*************** 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
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 ******************************************************************************************
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 Format Lines in SEU AS400
- Prompt Line Command in SEU AS400
- Change the display in SEU AS400
- FIND and CHANGE command in SEU AS400
- Browse and Copy in SEU AS400
- SEU command line commands in AS400