Previous: chruc Up: ../chrrtn.html Next: chrxlt
INTEGER FUNCTION CHRVFY (TEXT,LENTXT,PATERN,LENPAT) (Verify Characters) Search the string defined by TEXT,LENTXT for the first character which is not contained in the pattern string defined by PATERN,LENPAT. If either LENTXT or LENPAT is less than 1, return 0. If all characters in the first string are found in PATERN(*), return 0. Otherwise return the index of the first mismatching character in TEXT(*). Thus CHRVFY always returns a value .GE. 0. It is important to note that the index returned points to a character in the first string, not to one in the pattern string.