View previous topic :: View next topic
|
Author |
Message |
amitava Warnings : 1 Active User
Joined: 30 Oct 2005 Posts: 186 Location: India
|
|
|
|
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 |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
Back to top |
|
|
amitava Warnings : 1 Active User
Joined: 30 Oct 2005 Posts: 186 Location: India
|
|
|
|
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 |
|
|
|