Use the MATCH function to determine if a DSN matches a pattern mask.
A return code of zero indicates that the DSN matches the pattern.
A return code of four means the DSN does not match the pattern.
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'
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
|
Copyright © 2013 CA Technologies.
All rights reserved.
|
|