I think that bit is TCBAREQ in TCBNDSP3.
Lennie

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Attila Fogarasi
Sent: 09 June 2026 10:26
To: [email protected]
Subject: Re: Subtask not getting dispatched

take a dump and check the TCBNDSP and TCBSTP fields (any bit on will prevent 
dispatch).  TESTAUTH used to have a "feature" that ATTACH from a non-APF 
authorized library will  cause unpredictable results, including non-dispathch 
(supposed to cause S306 abend).  Don't know if this is still the case, but 
somewhat matches your symptom.

On Tue, Jun 9, 2026 at 4:45 AM Joseph Reichman < 
[email protected]> wrote:

> I have a breakpoint at the entry point of the subtask
>
>
> So after I do the first attach it goes right there
>
> For second I it never does I do listtcb with the TCB ADDR and tcbser 
> is on
>
> Rob gave me a good idea if you have ideas how how I would debug this 
> please share
>
> Thanks
>
>
> Joe Reichman
>
> On Mon, Jun 8, 2026 at 2:34 PM Binyamin Dissen < 
> [email protected]> wrote:
>
> > That doesn't answer the questions.
> >
> > How do you know that it never took off?
> > :>
> > What basic debugging or tracing have you done?
> >
> > Did you try GTFing your code? Did you examine the task structure 
> > from a DUMP?
> >
> > Possible issues with your code.
> >
> > Are SYSECB and PARM unique for each occurrence of ATTACH?
> >
> >
> >
> >
> >
> > On Mon, 8 Jun 2026 13:17:22 -0400 Joseph Reichman 
> > <[email protected]> wrote:
> >
> > :>I am running the code under TESTAUTH it's a concurrent server with 
> > 4 :>subtasks :> :>As soon as the ECB wait bit gets set I attach the 
> > next :> :>After the first task hits this point :> :>I attached the 
> > second which right away has TCBSER on :> :>And I don't see any abend 
> > on the console :> :> :>RD_TASK_LOOP DS 0H :>
> > :>*
> > :>
> > :>
> > :>        LA     R10,EZASMGW          GLOBAL WORK AREA
> > :>
> > :>        STC    R6,TASK_ADDR
> > :>
> > :>        OI     TASK_ADDR,X'F0'
> > :>
> > :>*       LA     R15,NOW.TIE_DSECT
> > :>
> > :>*       MVC    E$ASMTOK-MYTIE(L'E$ASMTOK,R15),E$ASMTOK
> > :>
> > :>        ST     R11,ECB_ADDR
> > :>
> > :>        ST     R9,END_ECB
> > :>
> > :>*       L      R14,COMMADDR         Get Communication Address
> > :>
> > :>        MVC    CLEANUP,=A(CLEAN_UP)
> > :>
> > :>*       USING  COM,R14
> > :>
> > :>*       MVC    NOW.END_ECB,COMECBPT     Store Commincation ecb
> > :>
> > :>.ATT    ANOP
> > :>
> > :>        ATTACH EP=DBGRTSK,
>  X
> > :>
> > :>               PARAM=((R10),(R7),CLIENT,SOCKTBL),
> > :>             ECB=SYSECB,                                             X
> > :>
> > :>               SZERO=YES,
> X
> > :>
> > :>               SVAREA=YES,
>  X
> > :>
> > :>               ASYNCH=NO,
> X
> > :>
> > :>               ESTAI=(R12),
> X
> > :>
> > :>               ALCOPY=NO,MF=(E,PARM),SF=(E,ATT_LIS)
> > :>
> > :>        LTR   R15,R15              ALL OKAY
> > :>
> > :>        BZ    SET_TCB              STORE TCB ADDRESS
> > :>
> > :>        WTO   'PROBLEM CREATING TASKS..'
> > :>
> > :>        B      RETURN
> > :>
> > :>SET_TCB DS    0H
> > :>
> > :>        LR    R8,R1                 HOLD TCB
> > :>
> > :>IS_WAIT DS    0H
> > :>       L    R10,0(,R7)
> > :>       TM   0(R10),X'80'
> > :>
> > :>       BO    ST_TCB              A; NO; WAIT
> > :>
> > :>*
> > :>
> > :>       STIMER   WAIT,DINTVL=LTINTVL   WAIT A BIT
> > :>
> > :>*
> > :>
> > :>       B     IS_WAIT
> > :>
> > :>ST_TCB DS    0H
> > :>
> > :>       STCM   R8,B'0111',TASK_ADDR+1 STORE TCB ADDRESS
> > :>
> > :>*
> > :>
> > :>*
> > :>
> > :>TEMP8  DS    0H
> > :>
> > :>       LA    R7,THREAD_LEN(,R7)    BUMP UP Storage for threads
> > :>
> > :>       LA    R11,4(,R11)             Bump up end ecb addr
> > :>
> > :>       LA    R9,4(,R9)             Bump ecb address
> > :>
> > :>       BCT   R6,RD_TASK_LOOP
> > :>
> > :>
> > :>
> > :>
> > :>
> > :>
> > :>
> >  -----Original
> > :>Message-----
> > :>From: IBM Mainframe Discussion List <[email protected]> On 
> > Behalf Of :>Binyamin Dissen
> > :>Sent: Monday, June 8, 2026 11:56 AM
> > :>To: [email protected]
> > :>Subject: Re: Subtask not getting dispatched :> :>How do you know 
> > that it never took off?
> > :>
> > :>What basic debugging or tracing have you done?
> > :>
> > :>On Mon, 8 Jun 2026 10:54:51 -0400 Joseph Reichman 
> > :><[email protected]> wrote:
> > :>
> > :>:>Hi
> > :>:>
> > :>:>I attach a subtask get a TCB however the subtask never takes off 
> > :> :>My :>only hint is that TCBSER of TCBFLGS4 :> :>Is on for TCB 
> > that never got :>dispatched :> :>Can anyone give me a clue how to 
> > get to the bottom of this :>:>
> >
> :>:>------------------------------------------------------------------
> ----
> > :>:>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
> >
> > --------------------------------------------------------------------
> > -- 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
>

----------------------------------------------------------------------
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

Reply via email to