The DYNALLOC and FILSZ and AVGRLEN are ignored as you used SORTED keyword which makes Joinkeys read the VSAM file with a COPY operation. Remove them. I am not even sure as to why you need to read the VSAM Cluster as Variable when your key is always present and you don't need any other data. Read it TYPE=F and adjust the positions on the JOINKEYS accordingly. Since you don't need any data apart from the key, Just use INREC BUILD=(1,12) in JNFxCNTL which will only build the Key to match. Your INCLUDE condition gets executed before the INREC.
As Bill Mentioned always code for Positive condition rather than negative condition.
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
For a comparison, why don't you use OPTION COPY/SORT FIELDS=COPY to copy your KSDS to a "flat" file. Then run your step with that flat file. As well as CPU, pay attention to the I-O counts, VSAM vs flat.
Remember, if the number of records you are processing is "small" in relation to the size of the KSDS, your client is not going to be impressed vs a programming language with a direct read.
