> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Nasuh KARAHALLI
> Sent: Thursday, April 12, 2007 9:29 AM
> To: [EMAIL PROTECTED]
> Subject: Rexx LISTDSI problem on z/OS 1.7
> 
> 
> Hello dear listers, 
> 
> Once I installed z/OS 1.7 I discovered something that seems 
> to be running 
> improperly.
> 
> /* REXX */                                          
> TRACE R                                             
> DSN = '''IBMUSER.JCLLIB'''                          
> C = LISTDSI(DSN)                                    
> SAY C                                               
> SAY SYSREASON                                       
> SAY 'THE DATASET ' DSN ' IS CREATED ON ' SYSCREATE  
> EXIT                                                
> 
> 
> In TSO environment, above code runs on z/OS 1.4 correctly but when I 
> execute it on z/OS 1.7 system my user abends with the 
> following error :
> 
> IEA995I SYMPTOM DUMP OUTPUT                     
> SYSTEM COMPLETION CODE=0C1  REASON CODE=00000001
>  TIME=17.18.14  SEQ=00215  CPU=0000  ASID=005D  
>  PSW AT TIME OF ERROR  078D3000   80000002  ILC 2  INTC 01 
>    NO ACTIVE MODULE FOUND                                  
>    NAME=UNKNOWN                                            
>    DATA AT PSW  00000000 - 000A0000  000130E1  00000000    
>    GR 0: 00000000_00000010   1: 00000000_00069250          
>       2: 00000000_000692E8   3: 00000000_0006928C          
>       4: 00000000_00000010   5: 00000000_00000010          
>       6: 00000000_00000005   7: 00000000_00000010          
>       8: 00000000_000692E8   9: 00000000_08DE8C90          
>       A: 00000000_000691F0   B: 00000000_88C8D2DA          
>       C: 00000000_08C8E2D9   D: 00000000_000691F0          
>       E: 00000000_88C8E38C   F: 00000004_80000000          
>  END OF SYMPTOM DUMP                                       
> IRX0250E System abend code 0C1, reason code 00000001.      
> IRX0253E Abend in external function LISTDSI.               
> IEA995I SYMPTOM DUMP OUTPUT                                
> SYSTEM COMPLETION CODE=0C1  REASON CODE=00000001           
>  TIME=17.18.14  SEQ=00216  CPU=0000  ASID=005D             
>  PSW AT TIME OF ERROR  078D3000   80000002  ILC 2  INTC 01 
>    NO ACTIVE MODULE FOUND                                  
>    NAME=UNKNOWN                                            
>    DATA AT PSW  00000000 - 000A0000  000130E1  00000000    
>    GR 0: 00000010   1: 00069250                            
>        2: 000692E8   3: 0006928C              
>        4: 00000010   5: 00000010              
>        6: 00000005   7: 00000010              
>        8: 000692E8   9: 08DE8C90              
>        A: 000691F0   B: 88C8D2DA              
>        C: 08C8E2D9   D: 000691F0              
>        E: 88C8E38C   F: 80000000              
>   END OF SYMPTOM DUMP                         
>  16                                           
>                                               
>  THE DATASET  'IBMUSER.JCLLIB'  IS CREATED ON 
> 
> 
> Actually I discovered this problem while I'm investigating 
> our OMVS OEDIT 
> problem. When I type, for instance, OEDIT xxxx in OMVS Unix 
> Shell, I get :
> 
> $1¨ + Done(137) oedit zzz           
>   50331671      Killed  /bin/oedit  
> Ö                                   
> 
> in OMVS Shell and 0C1 abend in syslog. Then I recognized that 
> OEDIT is a rexx 
> code and the story goes on so forth..
> 
> So far I couldn't find any valuable clue. Anyone out there 
> experienced such a 
> issue ?
> 
> Many thanks for your assistance.
> 
> Nasuh Karahalli

I don't have z/OS 1.7 to test. However, the main "eep" point for me is the fact 
that the PSW is point to location zero. This usually means that some subroutine 
has not been linked in properly. R15 is pointing to this location. If I were 
you, I'd look at what is at the location pointed to by R14, ie x'88C8E38C' 
using IPCS. Then "back up" until you see an "eye catcher" to try to determine 
what module you are coming from. Then do a AMBLIST of that module to see if 
there are any unresolved references. Best that I can do without access to your 
system.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged and/or 
confidential.  It is for intended addressee(s) only.  If you are not the 
intended recipient, you are hereby notified that any disclosure, reproduction, 
distribution or other use of this communication is strictly prohibited and 
could, in certain circumstances, be a criminal offense.  If you have received 
this e-mail in error, please notify the sender by reply and delete this message 
without copying or disclosing it. 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to