Producing Customized Reports Using CA Earl › CA Earl Components Description › 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.

Non-zero return codes are accompanied by a 24-character error message.

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