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 

AFCY Abend while writing KSDS VSAM FIle

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


Joined: 29 Jul 2005
Posts: 3
Topics: 1

PostPosted: Fri Jul 29, 2005 2:05 am    Post subject: AFCY Abend while writing KSDS VSAM FIle Reply with quote

I am facing an AFCY Abned while writng in a KSDS VSAM file.
The file has no alternate Indexes.
The situation is like
1. prog1 creates a TSQ (which can have atmost 1222 items). It calls Prog2 after builing the TSQ.
2. Prog2 reads each items in the TSQ sequntially, and for each read it calls prog3 with the TSQ data.
3. Prog3 with that data Read-Updates a VSAM file the it reads another VSAM file with that data and if the read is successful then it writes to another VSAM file. In this last write there is a AFCY abend.

It is occuring in production quite often and the problem is in Test region we are unable to simulate the abend. With expeditor it is working fine.

From the Joblog I found the message-
'Threshold TRANS CPUTIME FHPL 0153 PROBLEM V= 10.838 W= 8.500 P= 9.000 '

I require suggestions on how to crack this problem.
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 Jul 29, 2005 5:50 am    Post subject: Reply with quote

saptarshi_tcs,

check this for a detailed explanation of the abend

Code:

AFCY                                                                     
                                                                         
AFCY                                                                     
                                                                         
Explanation:  The transaction issued a file request resulting in a call to
the main file control program (DFHFCFR). During the processing of the     
request the transaction was purged (that is, was the subject of an       
explicit PURGE or FORCEPURGE request, was timed out, or was selected by   
CICS for termination in an attempt to alleviate an SOS condition). A     
"purged" response was returned from DFHFCFR to its caller.               
                                                                         
System Action:  The task is abnormally terminated with a CICS transaction
dump.                                                                     
                                                                         
Exception trace entries are made between the point at which the purge is 
detected and the issuing of the abend.                                   
                                                                         
User Response:  In some instances, for example if the transaction was     
explicitly purged, no further action is necessary.                       
                                                                         
Otherwise examine the exception trace and the transaction dump to identify
the point at which the purge occurred.                                   
                                                                         
Module(s): DFHDMPCA, DFHEIFC                                             


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


Joined: 29 Jul 2005
Posts: 3
Topics: 1

PostPosted: Sat Jul 30, 2005 12:08 am    Post subject: Reply with quote

Thanks for the reply.
The explanation is fine; but how to resolve the issue.
As we can't simulate the abend in Test and from expeditor it seems the program is working fine means it is not getting into any sort of loop.
So, my point is because there are so many write request say around 2500 records are wriiten at the particular instance when the abend occured, can there be a possibility that the Free Space definition should be changed in the file description because there are random writes in the file.

Please provide suggestions on how to resolve this issue to avoid any such abends in future.
Back to top
View user's profile Send private message
Manas Biswal
Intermediate


Joined: 29 Nov 2002
Posts: 382
Topics: 27
Location: Chennai, India

PostPosted: Mon Aug 01, 2005 10:06 am    Post subject: Reply with quote

saptarshi_tcs,

Please contact your CICS Sys admin. Although your message does not tell much, but it seems that your transaction is getting timed out and purged, while it is still writing or waiting to write to the VSAM file. There are values that you can specify for the DTIMEOUT parameter, which control how much time a transaction can remain suspended before getting timed out. But it seems from your mail, that your transaction is active and not in a suspended state. So, I am not sure of whether this parameter is the cause of your problem.
What I can certainly say that this is an issue for your CICS Sysadmin.

For now, can you please provide us with the relevant messages from the CICS IPL job of your CICS region.

Thanks,
Manas
_________________
There is no path to peace. Peace is the path.
- Mahatma Gandhi (1869-1948)
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
saptarshi_tcs
Beginner


Joined: 29 Jul 2005
Posts: 3
Topics: 1

PostPosted: Mon Aug 01, 2005 10:41 am    Post subject: Reply with quote

Hi,

What I found from the CICS job log is
'Threshold TRANS CPUTIME FHPL 0153 PROBLEM V= 10.838 W= 8.500 P= 9.000 '

where W is the time after which a warning is given and
P is the time after which CICS issues an Purge and
V the actual time taken by the Transaction.

Anyways, I am guessing that it has become a performance issue with the VSAM file on which the write operation was requested.

For that VSAM file(after the abend day before del/def) I found out that there were some 6000 CI splits and 36 CA splits. 94% of its extents were used.

Can this be the reason for such kind of abends.
Back to top
View user's profile Send private message
Manas Biswal
Intermediate


Joined: 29 Nov 2002
Posts: 382
Topics: 27
Location: Chennai, India

PostPosted: Mon Aug 01, 2005 12:38 pm    Post subject: Reply with quote

Is there nothing else on the CICS job log. Some DFH message or anything like that. Pls post the complete message list pertaining to the transaction.

Thanks,
Manas
_________________
There is no path to peace. Peace is the path.
- Mahatma Gandhi (1869-1948)
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
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