AS/400: Close open files
75 pts.
0
Q:
AS/400: Close open files
Dear sirs, could you please help me with the following problem: I want to close all open files that are left open from previous different steps (pgms rpg , rpgle , clp) that were run. I have tried to use a CLP pgm using RCLRSC, RCLRSC *CALLER with no success. Could you please advise me how to close these file without SIGNOFF
ASKED: Sep 8 2009  9:24 PM GMT
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
0
8025 pts.
0
A:
 RATE THIS ANSWER
+1
Click to Vote:
  •   1
  •  0
  • AddThis Social Bookmark Button
The Close File (CLOF) command closes a database file opened by the Open Query File (OPNQRYF) and Open Database File (OPNDBF) commands. Use the the CLOSE opcode for RPG.

----------------------
At one time I think we discussed how to improve preformance of called programs by not setting *INLR on in the called programs. When you're done with those pograms, you should call them one additional time passing a parameter value that the called program uses to determine that it's time to set *INLR on.

Phil

==============

You may also use RCLRSC and RCLACTGRP *ELIGIBLE

=============================================

Avoid RCLACTGRP *ELIGIBLE. Even IBM is beginning to recommend against it. Note that as of V5R3, it no longer appears as an optional value when the parameter is prompted with <F4>. It does appear in the [help] text with some warnings related to 'unpredictable results'.

Tom
Last Answered: Oct 22 2009  1:44 AM GMT by TomLiotta   8025 pts.
Latest Contributors: CharlieBrowne   6540 pts., Philpl1jb   24610 pts., Whatis23   4040 pts.
0
0
Discuss This Answer:
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _



_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _

Splat   1070 pts.  |   Sep 9 2009  3:54PM GMT

A RCLACTGRP may be of some use.

 
0