Binyamin

The program is a TSO command processor so..... using a TSOLIB is analogous
to ?
I did a TSOLIB ACTIVATE dataset right before running my code under test

*                                          
         BLDL 0,LIST_ADDR                  
*                                          
         LTR R15,R15            q. Prog Fou
         BZ  PROG_FOUND                    
NO_PROG  DS  0H                            
         LA  R15,4                         
*        MVC VAL_MSG,=A(NOTFND)            
         B   PROG_RETURN                   
PROG_FOUND DS  0H                          
         LOAD DE=LIST_ADDR,LSEARCH=YES     
         XR  R15,R15                          

LIST_ADDR DS  0H      
          DC   X'0001' 
          DC   X'003C' 
 NAME     DS   CL8     
          Dc   100X'00'

Running under TEST
Right after BLDL r15 has a zero
The program AADDD is @ displacement 3 
15R  00000000 
 TESTAUTH      

0001003C C1C1C4C4 C4404040 000C1F00  *....AADDD   ....* 
052C000C 24000000 000002E2 00120812  *...........S....* 
08000000 88020101 00000000 00000000  *....h...........*
This the CODE right after the LOAD DE=

CCCCCCCCCCCCCCCCCE NOT FOUND       FAILED BECAUSE DIRECTORY ENTRY IS NOT
VALID F
OR A LOAD MODULE.

 CSV003I REQUESTED MODULE  
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Binyamin Dissen
Sent: Wednesday, October 09, 2013 4:53 PM
To: [email protected]
Subject: Re: TSOLIB BLDL abend

Show your code.

On Wed, 9 Oct 2013 15:31:24 -0400 Micheal Butz <[email protected]>
wrote:

:>Hi
:>I am using TSOLIB to stage a load library. When I use BLDL to search :>For
a module in. That load lib I get a zero r.c from R15.
:>
:>However on a subsequent load de= I abend for invalid directory :> :>
:>mRNA is :>Sent from my iPhone :>
:>----------------------------------------------------------------------
:>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

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

Reply via email to