Ü
CHECK
·
This
keyword is used to validate the existence of a condition on a field. e.g. the
field is right justified or it is a mandatory entry or it always a lowercase
etc.
Example:
1. CHECK(ME)
§
ME stand
for mandatory entry which means the associated field must be filled with at
least one entry (a blank is valid).
2. CHECK(MF)
§
MF stand
for mandatory fill which means the associated field’s each column must be
filled (a blank is valid).
3. CHECK(FE)
§
FE stand
for field exit which means that the user cannot advance to the next input field
until he press field exit key.
4. CHECK(LC)
§
LC stand
for lower case which means that the user have to enter the field in lowercase
letter only.
5.
CHECK (RZ)
§
Right-adjusts
the field and fills with zeros if it is Both (input/output)
§
For output
only there is no need of the keyword, the same will be displayed without any
keyword.
§
For output
only use EDTCDE(4) if u don’t want 0 but
u want it right justified.
Columns . . . : 1 71 Browse AMIT/QRPGLESRC
SEU==> EDTDSPCCC
FMT DP .....AAN01N02N03T.Name++++++RLen++TDpBLinPosFunctions++++++++++++++++++
0002.10 A R EXPD_SFL SFL
0002.11 A 56 SFLNXTCHG
0002.30 A S_OPT 1A B 9 5
0002.31 A 50 COLOR(YLW)
0002.40 A S_PNAME 12A O 9 11
0002.41 A 50 COLOR(YLW)
0002.50 A S_PNUM 12A O 9 26
0002.51 A 50 COLOR(YLW)
0002.60 A S_PADDR 10A B 9 45
0002.61 A 50 COLOR(YLW)
0002.70 A 51 DSPATR(PR)
0002.71 A N51 DSPATR(UL)
0002.72 A S_MODE 20 0B 10 11CHECK(RZ) >>>>>>>>
0002.73 A 50 COLOR(YLW)
0002.90 *
0003.00 A R EXPD_CTL SFLCTL(EXPD_SFL)
0003.10 A 43 SFLDSP
F3=Exit F5=Refresh F9=Retrieve F10=Cursor F11=Toggle F12=Cancel
F16=Repeat find F24=More keys
AMIT DISPLAY THE EDITABEL SUBFILE 7/20/12
4/25/18
OPTION: 1 = NEW A/C ENTRY FOR PARTY, 2=EDIT, 4 = DELETE, 5 =DISPLAY
OPT PARTY NAME PARTY NUMBER PARTY ADDRESS
UPI P00001 CHENNAI
01 >>>>>>>>> The field is right justified padded with zeros
SHRI P00002 EMPHAL
02
SHMANT P00003 CHENNAI
03
AJRIN P00006 BAJIN ROAD
04
AFTAB P00007 ADFDAFDA
05
More...
F3 = EXIT