Ü  CHECK (E)     

·         It is used to check the position for non-occurrence of a character in a string.

Factor 1

Op-code

Factor 2

Result Field

Resulting Indicators

       HI                            LO                      EQ

String

CHECK (E)  

Base string: start position

First non-occurrence position from left

 

Error

 

 

Example


Columns . . . :    6  80                  Browse                              AMINEM/QRPGLESRC
SEU==>                                                                               OP_CHECK
FMT D  DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++
*************** Beginning of data ****************************************************
0001.00 D name            S             30A   inz ('       Amit Jaiswal')               130128
0002.00 D pos             S              5U 0                                           130128
0003.00 C     ' '           CHECK     name          pos                                 130128
0004.00 C                   EVAL      name=%subst ( name: pos :9)                       130128
0005.00 C     name          DSPLY                                                       130128
0006.00 C                   SETON                                        LR             130128
0007.00                                                                                 130128
****************** End of data *******************************************************



OUTPUT

DSPLY  Amit Jais

 











User Comments:



Copyright © www.go4as400.com, 2013-2023. Copyright notice   Terms of services   Privacy policy