Ü  CHECKR
·        
It is used to check the position for non-occurrence of a character from
right.
 
  | 
   Factor
  1 
   | 
  
   Op-code 
   | 
  
   Factor
  2 
   | 
  
   Result
  Field 
   | 
  
   Resulting
  Indicators 
         HI                           
  LO                      EQ 
   | 
 
 
  | 
   String 
   | 
  
   CHECKR (E)   
   | 
  
   Base string: start
  position 
   | 
  
   First non-occurrence
  position from right 
   | 
  
     
   | 
  
   Error 
   | 
  
     
   | 
 
 
 
Example
 
Columns . . . :    6  80              Browse                                  AMINEM/QRPGLESRC
SEU==>                                                                               OP_CHECK
FMT *   *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8
*************** Beginning of data*****************************************************
0001.00                                                                                 130128
0002.00 D name            S             30A   inz ('Amit Jaiswal')                      130128
0003.00 D len             S              5U 0                                           130128
0004.00                                                                                 130128
0005.00 C     ' '           CHECKR    name          len                                 130128
0006.00 C     len           DSPLY                                                       130128
0007.00 C                   SETON                                        LR             130128
0008.00                                                                                 130128
****************** End of data *******************************************************
 
OUTPUT