Kbase P26838: How to know if the last extent of the V8 multi-volume db starts to fill up?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
16/10/2008 |
|
Status: Unverified
GOAL:
Is there an automatic way to know if the fixed last extent of the V8 multi-volume db starts to fill up?
FIX:
Run automatically a script which check the high water mark of the database.
Find below a sample.
DEF VAR LastExtent as int.
DEF VAR Total as int. DEF VAR k as int.
FIND LAST _Filelist where _FileList-name matches "*.d*".
IF _FileList._FileList-Size = 1 /* last extent is a non fixed extent */
THEN FIND PREV _FileList.
LastExtent = _fileList._fileList-Size. /* number of blocks */
/* in last fixed extent */
FIND FIRST _DbStatus.
Total = _DbStatus._DbStatus-TotalBlks. /* total DB blocks */
/* this excludes extent headers */
k = Total - LastExtent + 1 . /* first block number in last extent */
IF _DbStatus._DbStatus-hiwater > k THEN
message "last extent used".
ELSE
message "last extent still empty".