HP Integrity NonStop J-Series - Manual (Page 202)

MAINTAINING AN APPLICATION
Reclaiming Disc Space
6. Edit the PATHCOM command file and replace the question marks
(???) that appear after the SET TCP TCLPROG command with the
name of the SCREEN COBOL object file. If you are going to
move a data base file, be sure that the SET SERVER ASSIGN
commands identify the proper location of that file.
7. If necessary, use FUP to move the data base file (or files),
including any alternate key files associated with the data
file. After moving the alternate key files, use the FUP
ALTER command on the data file to adjust the reference to the
location of the alternate key file. Refer to the GUARDIAN
Operating System User's Guide for information about the FUP
ALTER command.
RECLAIMING DISC SPACE
When you generate an application, ENABLE calls the SCREEN COBOL
compiler to compile the SCREEN COBOL source code. If you
generate several applications with the same name and direct these
applications to the same object files, the SCREEN COBOL compiler
adds the new version of the object code to the object files but
does not purge the old version of the object code. Because the
old version takes up disc space, you might want to remove
unnecessary versions.
To reclaim the disc space used by an old version of an
application, use the SCREEN COBOL Utility Program (SCUP). When
you use SCUP, you must know the names of the code file and
directory file to which the SCREEN COBOL compiler writes the
object code. If you set the SCOBOLOBJECT attribute to a value
when you generate an application, the SCREEN COBOL compiler uses
this value to determine the name of the code file and the
directory file. If you do not set a value for the SCOBOLOBJECT
attribute, the SCREEN COBOL compiler uses the starting value of
this attribute (POBJ) to determine the names of these files.
In either case, the object file names take the following forms:
• <SCOBOLOBJECT-value>COD
for the code file name; for example, "pobjcod"
• <SCOBOLOBJECT-value>DIR
for the directory file name; for example, "pobjdir"
10-4