Reports › Producing Customized Reports Using CA Common Services for z/OS EARL Service › CTSEPM Advanced Pattern Masking Subroutine › VALIDATE Function

VALIDATE Function

Use the VALIDATE function to determine if a pattern mask is valid. Higher return codes indicate an error. A 24-bit character error message accompanies nonzero return codes.

DEF PM_FUNC            (X 8) =  ' ' 'FUNCTION'
DEF PM_PAT1           (X 88) =  ' ' 'PATTERN MASK1'
DEF PM_MSG            (X 24) =  ' ' 'ERROR MESSAGE'

SET PM_FUNC = 'VALIDATE'
SET PM_PAT1 = 'SYS#.DDA####.-'

CALL CTSEPM USING PM_FUNC
                  PM_PAT1
                  PM_MSG