Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.atnf.csiro.au/computing/software/gipsy/sub/ftrunc.dc2 Дата изменения: Fri Sep 12 12:49:18 1997 Дата индексирования: Fri Jan 16 01:15:25 2009 Кодировка:

Function: FTRUNC

Purpose: Truncates a file to a specified number of bytes.

Category: FILES, UTILITY

File: ftrunc.c

Author: K.G. Begeman

Use: INTEGER FTRUNC( FILENAME, Input CHARACTER*(*)
NEWSIZE ) Input INTEGER

FTRUNC Returns 0 when file was truncated succesfully,
otherwise a non zero value is returned.
FILENAME Name of file to truncate. This file must be
present!
NEWSIZE New file size in bytes.

Warning: System dependent!

Updates: Apr 11, 1990: KGB, Document created.