Logic issues.

If the wait bit is on you will need a real post. Your CS will set the post bit
but not wake up the task.

If the CS fails because the post bit is on, it is perfectly fine and no need
to retry.

On Mon, 19 Mar 2018 18:40:59 -0400 Joe Reichman <[email protected]> wrote:

:>I am using Quick Post Here is the code
:>
:>         L     R4,RECOV#ECB                                         
:>         L     R8,RECOV#ECB         Get ECB Address               
:>         L     R4,0(,R4)            get ecb                       
:>         N     R4,=X'3FFFFFFF'      Turn of wait post bit         
:>         ICM   R7,B'1000',=X'40'    Insret Post bit               
:>         LA    R11,5                      try 5 times                         
       
:>CSLOOP   DS    0H                                                 
:>         CS    R4,R7,0(R8)                                        
:>         BZ    POSTDONE                                           
:>         STIMER  WAIT,DINTVL=TWOSECS   WAIT A COUPLE              
:>         WTO   'ERROR POSTING...'                                 
:>         BCT   R11,CSLOOP                                         
:>Sent from Mail for Windows 10
:>
:>From: Charles Mills
:>Sent: Monday, March 19, 2018 6:36 PM
:>To: [email protected]
:>Subject: Re: Using Pseudo Post
:>
:>Did you code ASCB= (correctly). You need that even if the ECB is in common.
:>
:>Charles
:>
:>
:>-----Original Message-----
:>From: IBM Mainframe Discussion List [mailto:[email protected]] On 
Behalf Of Joe Reichman
:>Sent: Monday, March 19, 2018 3:25 PM
:>To: [email protected]
:>Subject: Re: Using Pseudo Post
:>
:>The ECB is in Fixed CSA running under a different Address space for some 
reason even after posted the task is still not dispatched I know this because I 
have placed a WTO right after
:> 
:>I am running under TESTAUTH and can observe the ECB  before with the 80 bit 
and the RB and after with 40 bit using TASID with the storage view function
:>
:>----------------------------------------------------------------------
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to [email protected] with the message: INFO IBM-MAIN
:>
:>
:>----------------------------------------------------------------------
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to [email protected] with the message: INFO IBM-MAIN

--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to