Subject: Re: Was Adding 90 seconds to 8 byte TOD FIELD
> Is there any additional documentation on this function ?
The function was documented in the z/OS Version 1 Release 11
Implementation redbook - 13.5 Cross-memory TCB and SRB WAIT
Regards,
George Kozakos
z/OS Software Service, Leve
> Is there any additional documentation on this function ?
The function was documented in the z/OS Version 1 Release 11
Implementation redbook - 13.5 Cross-memory TCB and SRB WAIT
Regards,
George Kozakos
z/OS Software Service, Level 2 Supervisor
AM I to understand that this routine can be called from an SRB Routine or
a Cross Memory PC Service routine to place the SRB routine in a
wait-suspend for x-amount of time ?
yes
Is there any additional documentation on this function?
no. What additional documentation would you think you
I have been watching this thread, as have found it interesting.
And Yes I agree with others that the OP should use DSECTS/LABELS instead
of hard coded displacements.
.
The Original Post stated they were trying to branch to the address
in ECVTXTSW.
.
> L R15,16
I’m sorry I got it working the fds Assembler constant had a 4 byte slack byte
I am using TESTAUTH
Does Dave Cole Have a Christmas sale
Thanks
> On Dec 27, 2018, at 9:14 AM, Peter Relson wrote:
>
> Joe,
>
> You need to invest in a debugger. Somey of the questions you ask come
> from
Joe,
You need to invest in a debugger. Somey of the questions you ask come
from your not having the information about what your code actually does
and then the kind posters have to waste their time guessing. They should
not have to. This is information you need to provide if you want help.
SETA 24*60*60
SETA 60*60
SETA 1*60
ONEDAY DC FDS12''
ONEHOUR DC FDS12''
ONEMINUTE DC FDS12''
or just simply:
NINTYSECS DC FDS12'90E6'
...
Thanks Ed.
I've just never seen that before. Very useful.
Dan
On 12/26/2018 9:47 AM, Dan D wrote:
I don't recall which IBM manual I found these values in but they certainly make
this type of calculation easier.
*TOD Values
CNOP 0,8
ONEDAY DCX'000141DD7600'
ONEHOUR DCX'0D693A40'
ONEMINUTE DC X'00393870'
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
retired mainframer
Sent: Wednesday, December 26, 2018 10:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Adding 90 seconds to 8 byte TOD FIELD
Look at the assembled contents of your address literal. The * does not
refer
I don't recall which IBM manual I found these values in but they certainly make
this type of calculation easier.
*TOD Values
CNOP 0,8
ONEDAY DCX'000141DD7600'
ONEHOUR DCX'0D693A40'
ONEMINUTE DC X'00393870'
ONESECOND DC
STSERV.UA.EDU
Subject: Re: Adding 90 seconds to 8 byte TOD FIELD
Look at the assembled contents of your address literal. The * does not
refer to the location of the LA instruction but the address of the literal
itself.
Are you sure that your DC did not skip some bytes to force doubleword
alignment? If
t; To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Adding 90 seconds to 8 byte TOD FIELD
>
> Thanks
>
> I changed that however doesn't seem like I am getting out of the wait as I
> put a WTO after the code and IT didn't execute
>
> Thanks
>
> WAIT ANOP
> L R15,CVTPTR
SECOND WAIT
LM15,2,SAVER
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Peter Relson
Sent: Wednesday, December 26, 2018 8:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Adding 90 seconds to 8 byte TOD FIELD
>LR15,16
>LR15,16 GET CVT ADDRESS
>LR15,X'8C'(R15) GET ECVT ADDRESS
>LR15,X'384'(R15) GET ECVTXTSW ADDRESS
>LAR1,=A(*+10) PARAMTER LIST
Macros such as IHAPSA, CVT, and IHAECVT are provided for a
Thanks
I must of done something else wrong as the code doesn't seem to come out of its
wait
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Ed
Jaffe
Sent: Tuesday, December 25, 2018 6:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Adding 90 seconds to 8 byte TOD
On 12/25/2018 9:09 AM, Joseph Reichman wrote:
I have it in a macro and will post the code
DCX'2328' 90 SECOND WAIT
LM15,2,SAVER
What you have is DEAD WRONG! When you let the assembler do the work, it
comes up with the following:
On Tue, 25 Dec 2018 12:09:10 -0500, Joseph Reichman wrote:
>Thanks
>
>I have it in a macro and will post the code
>.WAIT ANOP
> L R15,16 GET CVT ADDRESS
> L R15,X'8C'(R15) GET ECVT ADDRESS
> L R15,X'384'(R15)
seconds to 8 byte TOD FIELD
>I am using it to set a value for ECVTXTSW where I want to suspend
>execution for 90 seconds
Given that, you do not need to do what you are asking for.
The parameter for the cross-memory TCB or SRB wait routine is an 8-byte
area that contains the "wait time
>I am using it to set a value for ECVTXTSW where I want to
>suspend execution for 90 seconds
Given that, you do not need to do what you are asking for.
The parameter for the cross-memory TCB or SRB wait routine is an 8-byte
area that contains the "wait time". By "wait time" it means "how
On Mon, 24 Dec 2018 17:02:05 +, Farley, Peter x23353 wrote:
>
>One second in clock units is X'F424'. ...
>http://publibfi.boulder.ibm.com/epubs/pdf/dz9zr011.pdf
>
>So right after you do STCK TIME then do this to get a time 90 seconds later
>(SEC90 is an 8 byte field, the same size as
+1
A colleague about barfed when I first used one of those gnarly number
specs. :-)
sas
On Mon, Dec 24, 2018 at 12:12 PM Ed Jaffe
wrote:
> On 12/24/2018 7:58 AM, Joseph Reichman wrote:
> >
> > Would anyone have a example of how to add 90 seconds to 8 byte TOD FIELD
>
>
> LG
can convert the binary TIME field using STCKCONV.
HTH
Peter
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Joseph Reichman
Sent: Monday, December 24, 2018 10:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Adding 90 seconds to 8 byte TOD
On 12/24/2018 7:58 AM, Joseph Reichman wrote:
Would anyone have a example of how to add 90 seconds to 8 byte TOD FIELD
LG R1,TODvalue Load TOD into R1
ALG R1,=FDS12'90E6' Add 90 seconds
--
Phoenix Software International
Edward E. Jaffe
831 Parkview
You should read up on timer units as well as the format returned by STCKCONV.
Think how you would do this in a high level language or REXX.
On Mon, 24 Dec 2018 10:58:26 -0500 Joseph Reichman
wrote:
:>Hi
:>
:>
:>
:>Would anyone have a example of how to add 90 seconds to 8 byte TOD FIELD
:>
:>
the binary TIME field using STCKCONV.
HTH
Peter
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Joseph Reichman
Sent: Monday, December 24, 2018 10:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Adding 90 seconds to 8 byte TOD FIELD
Hi
Would
Hi
Would anyone have a example of how to add 90 seconds to 8 byte TOD FIELD
I am not sure of the format of the TOD though I do know it had the actual
date but just by guessing I did the following which didn't seem to product
the right results
LRR8,R15
26 matches
Mail list logo