Подскажите как объявить константу глобально, Я пытаюсь сделать так, а невыходит:

VAR CONSTANT
BITx: ARRAY [1..16] OF WORD:= [1, 2, 4, 8, 16, 32, 64, 128, 256, 512, 1024, 2048, 4096, 8192, 16384, 32768 ] ;
END_VAR

VAR_GLOBAL
time:word;
END_VAR