Previous Topic: CTSEPM Function CallsNext Topic: COMPARE Function


MATCH Function

Use the MATCH function to determine if a DSN matches a pattern mask. A return code of zero means that it matches. A return code of four means that the DSN does not match the pattern. Higher return codes indicate an error. A 24 character error message accompanies a nonzero return.

DEF PM_FUNC            (X 8) =  ' ' 'FUNCTION'
DEF PM_PAT1           (X 88) =  ' ' 'PATTERN MASK1'
DEF PM_MSG            (X 24) =  ' ' 'ERROR MESSAGE'
DEF PM_DSN            (X 44) =  ' ' 'DATA SET NAME'

SET PM_FUNC = 'MATCH'
SET PM_PAT1 = 'SYS#.DDA####.-'
SET PM_DSN = DSN
CALL CTSEPM USING PM_FUNC
                  PM_PAT1
                  PM_DSN
                  PM_MSG