Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-27 Thread Joseph Reichman
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 y

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-27 Thread Peter Relson
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. Fo

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Dan D
&SecsIn1Day SETA 24*60*60 &SecsIn1Hr SETA 60*60 &SecsIn1Min SETA 1*60 ONEDAY DC FDS12'&SecsIn1Day.E6' ONEHOUR DC FDS12'&SecsIn1Hr.E6' ONEMINUTE DC FDS12'&SecsIn1Min.E6' or just simply: NINTYSECS DC FDS12'90E6' ... Thanks Ed. I've just never seen that before. Very useful.

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Ed Jaffe
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' O

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Joseph Reichman
-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 to the

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Dan D
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 X'F424

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Joseph Reichman
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

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread retired mainframer
5:39 AM > 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 >

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Joseph Reichman
90E6' 90 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 >L

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-26 Thread Peter Relson
>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

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-25 Thread Joseph Reichman
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 byt

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-25 Thread Ed Jaffe
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: 0055D4A80

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-25 Thread Paul Gilmartin
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) GET

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-25 Thread Joseph Reichman
.UA.EDU Subject: Re: Adding 90 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 tha

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-25 Thread Peter Relson
>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 lo

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Paul Gilmartin
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 your

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Steve Smith
+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 > > > LGR1,TODval

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Joseph Reichman
seconds to 8 byte TOD FIELD Joe, One second in clock units is X'F424'. See the z/Architecture Principles of Operation for the format and contents of the CPU clock, figure 4-12 on page 4-47. The value for one second is in the chart under item 9 on page 4-52 here: http://publibfi.bould

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Ed Jaffe
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 Drive

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Binyamin Dissen
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 :> :>

Re: Adding 90 seconds to 8 byte TOD FIELD

2018-12-24 Thread Farley, Peter x23353
Joe, One second in clock units is X'F424'. See the z/Architecture Principles of Operation for the format and contents of the CPU clock, figure 4-12 on page 4-47. The value for one second is in the chart under item 9 on page 4-52 here: http://publibfi.boulder.ibm.com/epubs/pdf/dz9zr011.pdf