Posts related to the mainframe world
REXX
REXX Code to List All Tasks That Are Currently Running
The following REXX code will list all tasks that are currently running on the mainframe system: /* REXX */ /* Developed by S. Tresadern */ cvt = c2x(Storage(10,4)) asvt = mvsaddr(cvt 22C 4) asvtmaxu = x2d(mvsaddr(asvt 204 4)) do i = 0 to asvtmaxu – 1 offset = d2x(x2d(210) + […]