The best approach is calculate the number of seconds since some date in history -- 1900-01-01 usually works; then nbr of seconds since
is number of whole days*nbr of seconds per day PLUS seconds in current day
and calculate for both and subtract.
N E ????
bobh
This will give the next generation nbr for any root - ( base)
NEXTGEN: PROCEDURE
PARSE ARG ROOT
LAST = 0;
CALL OUTTRAP 'LINES.' ,, 'NOCONCAT';
ADDRESS TSO "LISTCAT LEVEL("||ROOT||")";
DO I = 1 TO LINES.0
PARSE VAR LINES.I '-- ' JUNK '.G0' NBR 'V00' ;
IF (NBR >...
Short answer is: what ever you would type in the tso command line, put it in quotes.
REXX has the unique ability to pass to the operating system anything it doesn't understand.
bobh
GOOGLE came up with this,
IBM REXX for CICS/ESA
... 40 cylinders of 3380 DASD are required. For an initial REXX File System (RFS) file
pool, an additional 40 cylinders are needed. Additional RFS file pool space ...
www2.hursley.ibm.com/rexx/rexxcics.htm - 25k - Cached - Similar pages
You might...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.