Příprava ke smazání hlavních databází systému FluxPam4

Příprava ke smazání databázové věty spočívá v nastavení nejvyššího bitu atributu této věty na 1 ($8000). Fyzické vymazání věty umožní údržba programu spuštěná v režimu nastavení. Databáze Osobní a pam používají tento atribut pro definování příslušnosti zaměstnanců k uživatelům. Protože je potřeba historicky sledovat přesuny těchto příslušností pro jednotlivé měsíce, je atribut složen jako pole 24 atributů (dva roky):

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

Rok 1995

Rok 1996

Jestliže provedete přípravu ke smazání například v roce 1996 v měsící 2, nastaví se horní bit atributů 14 až 24!! Jestliže budete později potřebovat tuto přípravu zrušit, aby údržba větu fyzicky nevymazala, musíte smazat horní bit především u atributu 24, protože podle tohoto se údržba orientuje!

-- Zrušení přípravy ke smazání věty --
dim B : Byte;
for B := _ActMonth to 12 do SetActMonth(B); < BR> O[dbAttr] := O[dbAttr] land _Not($8000); end;