Guardian Procedure Calls Reference Manual (G06.25+)

Guardian Procedure Calls (C)
Guardian Procedure Calls Reference Manual—522629-013
3-89
COMPRESSEDIT Procedure
filenum input, output
INT .EXT:ref:1
specifies the file number of the open file to be copied into compressed form. It
returns the file number of the new file.
start input
INT(32):value
specifies 1000 times the line number of the first line of the new file. You supply this
parameter when you want the lines in the new file to be renumbered. If you omit
start, renumbering still occurs if increment is present, in which case the value
of
increment is used for start. The possible EDIT line numbers are 0, 0.001,
0.002, ... 99999.999.
increment input
INT(32):value
if present and greater than 0, causes COMPRESSEDIT to renumber the lines in
the new file using the incremental value specified. The possible EDIT line
numbers are 0, 0.001, 0.002, ... 99999.999. The value of
increment is 1000
times the value to be added to each successive line number.
If
increment is not supplied, the line numbers from the original file are used in the
new file.
Example
In the following example, COMPRESSEDIT copies the specified EDIT file into a new,
compressed file in which the line number of the first line is 1 and the line number
increment is 1.
INT(32) start := 1000D;
INT(32) increment := 1000D;
.
.
err := COMPRESSEDIT ( filenumber, start, increment );
Related Programming Manual
For programming information about the COMPRESSEDIT procedure, refer to the
Guardian Programmer’s Guide.