ISRSUPC Utility
To search a word in PDS we have the option 3.14. The 3.14 option uses the utility ISRSUPC to search the elements.
Code:
//SEARCH EXEC PGM=ISRSUPC,
// PARM=(SRCHCMP,
// 'ANYC')
//NEWDD DD DSN=File name (in which the word needs to be searched),
// DISP=SHR
//OUTDD DD SYSOUT=(A)
//SYSIN DD *
SRCHFOR 'Search word'
/*
Here the parameter ‘ANYC’(Any case) is for making it not case sensitive.
Any case. SuperC converts the lowercase alphabetic characters (a-z) in source data sets to uppercase (A-Z) before comparing the data sets (the actual input data sets are not modified). Use this option to cause strings such as "ABC", "Abc", "ABc", ... to compare equally.
It will return maxcc = 1, if it finds the text in the specified PDS, otherwise it return zero.
No comments:
Post a Comment