For SYSTEM 2000 Version: 12.1
Problem Status: ZD -- R12.1 FFD3
Description of Problem:
THE CFIND PROCESS DOES NOT PATCH RG NUMBERS PROPERLY. THE PATCHED RG NUMBER ALWAYS WINDS UP TO BE ZERO.
Note: Please send email to s2k@sas.com telling us which problem fixes you have downloaded so we can keep track of the fixes at your site in case questions or problems arise.
Top of Zap Deck:
* IBM V12.1 BUG 4898 MVS * * THIS ZAP WILL MAKE THE PATCHING OF CRGNUM IN CFIND WORK PROPERLY. * THE BUG STARTS IN CFINDIN WHEN THE VALUE IS PACKED INTO A WORD AND * PASSED TO CFINDFX AS THE VALUE. FOR CRGNUM, WE ONLY NEED TWO BYTES * AND ARE ALWAYS GETTING THE TOP TWO BYTES OF THE FULLWORD (X'0000'). * THIS ZAP WILL CAUSE THE BOTTOM TWO BYTES OF THE FULLWORD TO BE PUT * INTO THE RECORD. * * YOU DO NOT NEED TO RELINK SYS2K OR S2KPLI WITH THIS FIX. * NAME CFIND CFINDFX * VER 017C D201,700E,A018 REP 017C D201,700E,A01A * CHECKSUM E316E434
End of Zap Deck