MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

SOC4 RC4 running CBT LISTDD

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
jsrueg
Beginner


Joined: 03 Jan 2006
Posts: 8
Topics: 5

PostPosted: Thu Apr 03, 2008 1:37 pm    Post subject: SOC4 RC4 running CBT LISTDD Reply with quote

I have 4 zOS1.7 systems. On two of my systems the LISTDD Assembler program abends with S0C4 RC4 but runs fine on the other two. Any ideas as to why it works on some of my systems and not the others?
The code where it's abending is attempting to access the JFCBDSNM:
Code:

SCTT1$04 DS    0H                   
         STCM  R6,B'0011',SORTTAG   
         LA    R6,1(,R6)           
         ICM   R5,7,TIOEJFCB       
         LA    R5,16(R5)           
         MVC   SORTDSN,JFCBDSNM     

I'd like to get this working again. Any one else use this program and have any issues. Its on CBT File 17.
Thanks for any insight.
_________________
OLDMVSER
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Thu Apr 03, 2008 2:16 pm    Post subject: Reply with quote

the failing system has the JFCBs above the 16MB line. You need to run the 3-byte TIOEJFCB field through the SWAREQ macro to get the real 4-byte address. There are probably many examples om the net if the program you are using does not have an update (this changed many years ago with the introduction of MVS/XA)
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.
Back to top
View user's profile Send private message Visit poster's website
jsrueg
Beginner


Joined: 03 Jan 2006
Posts: 8
Topics: 5

PostPosted: Thu Apr 03, 2008 7:21 pm    Post subject: Reply with quote

RIGHT ON Semigeezer...Those two LPAR run SWA=ABOVE for DB2...
Thanks for pointing me to the promised land!!!~ Smile
_________________
OLDMVSER
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group