Thank you forresolving that puzzle
I was really puzzled by your stmt (must be dynamic) and could not come
up with a valid explanation of the strange results you are seeing.
Chris,
Chris,
Chris,
Chris,
Chris,
Since we are talking about the subroutine- Question: you are using
pretty new instructions (CFI r,8) to check register-content, so I
presume that you are new to HLASM.
Is there any reason that you insist in using a base-register?
And for a batch routine (which it apparently is) why not leave the hard
work to the op-sys (or to the
hardware)
Here is a version of the timeused routine that I would like to see:
TITLE 'Get CPU TIME in Microseconds'
CPUTIME CSECT
CPUTIME AMODE 31
CPUTIME RMODE ANY
* Start: Program Entry
BSM R14,0 make sure correct mode is in R14
BAKR 0,R14 use linkage stack
*
*---------------------------------------------------------------------
* PROGRAM LOGIC
THISPGM EQU *
L R2,0(R1) Parm 1: PIC 9(12)V9(6) or 9(18) COMP-5.
AGAIN TIMEUSED STORADR=(R2),LINKAGE=SYSTEM,CPU=MIC
JNZ AGAIN
*
*---------------------------------------------------------------------
* Program Exit Successful CC = 00
DONE EQU *
PR
*-------------------------------------------------------------------
DATA LTORG
COPY REGISTER
END
Best
Martin
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
