* NAME: Z6060916 PRODUCT: BASE CATEGORY: RECO SYSTEM: MVS * DATE: 02AUG90 STATUS: DZ+UT USAGE-ID: V6-MACRO-0916 * * The %LENGTH function returns incorrect values on strings longer than 256 * * END NAME SASWUCHR FNCSCAN@ CHECKSUM VER 026E 5820,7004 VER 0272 48F0,7002 VER 0276 12FF VER 0278 4780,5282 VER 027C 06F0 VER 027E 44F0,402C * REP 026E 4820,7002 REP 0272 5870,7004 REP 0276 1882 REP 0278 1228 REP 027A 4780,5282 REP 027E 47F0,4032 CHECKSUM CB6ED9A9 IDRDATA Z6060916 NAME SASWUCHR FNCSCAN: VER 002C D200,2000 VER 0032 4032 VER 0034 4034,4036 VER 0038 4038,403A VER 003C 403C,403E VER 0040 4040 VER 0042 4042 VER 0044 4044 VER 0046 4046,4048 VER 004A 404A,404C VER 004E 404E,4050 VER 0052 4052,4054 * REP 002C D200,7000 REP 0032 0620 REP 0034 4420,402C REP 0038 5980,4052 REP 003C 47C0,5282 REP 0040 18E7 REP 0042 18F8 REP 0044 181B REP 0046 5830,CEF0 REP 004A 4520,33F0 REP 004E 47F0,5282 REP 0052 0000,0100 CHECKSUM CE76345A IDRDATA Z6060916 NAME SASWUCHR FNCSUBS@ VER 0186 5830,7004 VER 018A 1229 VER 018C 4780,5196 VER 0190 0620 VER 0192 4420,400C * REP 0186 18AB REP 0188 5860,7004 REP 018C 12B9 REP 018E 4780,5196 REP 0192 47F0,4012 CHECKSUM 1C0E060B IDRDATA Z6060916 NAME SASWUCHR FNCSUBS: VER 000C D200,3000,B000 VER 0012 4012 VER 0014 4014,4016 VER 0018 4018,401A VER 001C 401C,401E VER 0020 4020 VER 0022 4022 VER 0024 4024 VER 0026 4026,4028 VER 002A 402A,402C VER 002E 402E,4030 VER 0032 4032,4034 * REP 000C D200,6000,A000 REP 0012 06B0 REP 0014 44B0,400C REP 0018 5990,4032 REP 001C 47C0,5196 REP 0020 18E6 REP 0022 18F9 REP 0024 181A REP 0026 5830,CEF0 REP 002A 4520,33F0 REP 002E 47F0,5196 REP 0032 0000,0100 CHECKSUM 5DDFEEC7 IDRDATA Z6060916