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 

CICS quick disconnect

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> CICS and Middleware
View previous topic :: View next topic  
Author Message
djf
Beginner


Joined: 06 Feb 2007
Posts: 68
Topics: 27

PostPosted: Fri Feb 23, 2007 10:15 am    Post subject: CICS quick disconnect Reply with quote

Hello,
I am getting CICS transaction dumps and am fairly certain they are caused by users doing hard disconnects from the region. Is'nt there a SIT parm or something in the VTAM LU definitions that tells him to just let it go and not abend?
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Fri Feb 23, 2007 10:29 am    Post subject: Reply with quote

Are you abending with abend code ATNI ? If so you need to check for TERMERR on Disconnect Command.

Code:

TERMERR                                                                       
    occurs only for an ISSUE DISCONNECT for LUTYPE4 logical units.           
                                                                           
    It occurs for a terminal-related error, such as a session failure.       
    This condition applies to VTAM-connected terminals only. Because of       
    the asynchronous nature of this condition, the application program       
    should check, using SEND CONFIRM or SYNCPOINT, to make sure any errors
    still outstanding have been resolved before it relinquishes control.     
    If you wish to handle this condition, you must first issue a FREE         
    command to free the session. If you do not do this, an INVREQ             
    condition occurs, plus an ATCV abend if you do not handle this           
    condition.                                                               
                                                                           
    A CANCEL TASK request by a user node error program (NEP) may cause       
    this condition if the task has an outstanding terminal control request
    active when the node abnormal condition program handles the session       
    error.                                                                   
                                                                           
    Default action: terminate the task abnormally with abend code ATNI.       
                                                                           


Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
djf
Beginner


Joined: 06 Feb 2007
Posts: 68
Topics: 27

PostPosted: Fri Feb 23, 2007 10:38 am    Post subject: Reply with quote

Nope.

We are using an OEM package called TRMS for report archiving/routing/review.
Code:

Here is the snapshot:
+DFHAP0001 CICS390A An abend (code 0C1/AKEA) has occurred at offset
X'000014B0' in module VCSICI32.                                     
+DFHME0116 CICS390A                                                 
 (Module:DFHMEME) CICS symptom string for message DFHAP0001 is     
 PIDS/5655M1500 LVLS/640 MS/DFHAP0001 RIDS/DFHSRP PTFS/HCI6400     
 AB/S00C1 AB/UAKEA RIDS/VCSICI32 ADRS/000014B0                     
+DFHDU0201 CICS390A ABOUT TO TAKE SDUMP. DUMPCODE: AP0001  , DUMPID:
1/0057                                                             
IEA794I SVC DUMP HAS CAPTURED:                                     
DUMPID=050 REQUESTED BY JOB (CTS31A  )                             
DUMP TITLE=CICS DUMP: SYSTEM=CICS390A CODE=AP0001   ID=1/0057       

There might be a parm in the software, but I seemed to remember from years ago that there some DFHZNEP parm or VTAM quick disconnect LU type parm that would do a graceful exit.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Fri Feb 23, 2007 11:20 am    Post subject: Reply with quote

djf,
I don't think the abends are because of quick disconnects. You are abending with 0c1/AKEA abends. Check this which explains about 0C1 abends

Code:

0C1                                                                         
  System ABEND: S0C1                                                         
                                                                             
  Description:  An attempt was made to execute an invalid machine           
                instruction operation code.  The operation code is either   
                invalid or is for an instruction that is not available on   
                this CPU.                                                   
                                                                             
                This failure is usually due to a branch to an invalid storage
                location, as might occur in a load module with unresolved   
                external references, or when a branch to an address outside 
                of a program occurs. (Reason Code 1)                         
                                                                             
  User Action:  Correct the program logic or construction error and resubmit
                the job.  Possible causes for this abend include:           
                                                                             
                Amode was set to 24, but a branch was attempted to a         
                 31-bit or (on z/OS) a 64-bit address                       
                In assembler, coding 'B R14' when you meant to code 'BR R14'
                Subscript error occurred                                     
                "Clobbered" code; i.e., the executing program was           
                 corrupted in virtual storage and then a branch was         
                 performed into the corrupted code                           
                Tried to read a file that was not open                       
                Misspelled DDNAME followed by attempted I/O to same file     
                Error in parameters passed to subroutines                   
                Missing DD card followed by attempted I/O to same file       
                Recording mode was wrong, or density was incorrect           
                Bad load module, possible bad object deck in FORTRAN         
                  (unresolved external references)                           
                Missing dimension statement                                 
                Same name for an array and a subroutine                     
                COBOL: subroutine prog ID was the same as the entry name     
                       tried to call within COBOL sort I/O procedure         
                       tried to call a subroutine which could not be found   
                      incomplete DCB for SORTIN file                   
                      using sort verb, DDNAME was not SORTOUT when the
                        "giving" option was used.                     
                      executing sort-using after opening SORTIN file     


Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> CICS and Middleware 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