Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Skeleton FTCLOSE problem

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
amitava
Warnings : 1

Active User


Joined: 30 Oct 2005
Posts: 186
Location: India

PostPosted: Fri Aug 25, 2006 8:56 am    Post subject: Skeleton FTCLOSE problem
Reply with quote

Hi All,
I am trying to throw a JCL through my REXX program using the ISPF SKELETON, but I am getting the following error (With rc = 20 and showing the following reason) -

FTCLOSE : 20 Module ISPFITLR received decimal return code 12, decimal reason code 0 from the STOW macro.

Corresponding code is shown below -
Code:

jobname = = delstr(segname,length(segname) - 1) || 'RJ'
"ftincl runjcl"                             
"ftclose name("jobname")"                   
say 'FTCLOSE : 'rc zerrlm


The variable jobname is coming fine and obviously the segname also. But I am not being able to locate the source of error generated. Please help me out and I am in urgent crisis.[/b]
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Fri Aug 25, 2006 1:49 pm    Post subject:
Reply with quote

Take a look at the following APAR.

O.
Back to top
View user's profile Send private message
amitava
Warnings : 1

Active User


Joined: 30 Oct 2005
Posts: 186
Location: India

PostPosted: Mon Aug 28, 2006 12:40 pm    Post subject:
Reply with quote

Hi Ofer71 & all,
Actually I have already resolved the problem. I want to share the solution with you. So please note the point -
From the error message, it is sure that it is somehow getting the STOW problem. So I did qw STOW - and then there if you look into; you will get the reason code, return code and corresponding description as below -
Code:

+------------------------------------------------------------------------+
? Figure 52. STOW Completion Codes                                       ?
+----------------------------------------------------------------------------?
? Return  ?                ?                       ?                                        ?
? Code    ? Reason    ? Directory         ?                                        ?
? (15)     ? Code (0)  ? Action              ? Meaning                           ?
+---------+-----------+--------------+------------------------------------?
? 00      ? 00        ? A, C, D, R   ? The update of the directory was   ?
? (X'00') ? (X'00')   ?              ? completed successfully.                 ?
+---------+-----------+--------------+-----------------------------------?
?         ? 00        ? I            ? The directory was cleared                 ?
?         ? (X'00')   ?              ? (initialized) successfully.                  ?
+---------+-----------+--------------+-----------------------------------?
?         ? 00        ? DISC         ? Function successful.                      ?
?         ? (X'00')   ?              ?                                                      ?
+---------+-----------+--------------+-----------------------------------?


From that I came to know that the FILE library (used to save the member for SKELS) is suffering from low directory-blocks. I changed the properties of the dataset and the problem is solved.
I think, this is very helpful while analyzing a problem like I had encountered.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm
No new posts Problem commiting to DB2 from IMS MPP Ole Soerensen IMS DB/DC 2 Wed Jul 26, 2017 5:19 pm
No new posts Strings with double quotes having pro... raja Arumugam All Other Mainframe Topics 11 Thu Mar 30, 2017 10:34 am
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us