test
 s gl="^ZZ"
 s len=200000
 ;s len=196608  ;эта длина битовой строки ошибки не даёт
 w !,"в глобале битовые строки " 
 s i=gl f  s i=$q(@i) q:i=""  w !,i w $bitcount(@i,1),"+",$bitcount(@i,0),"=",($bitcount(@i,1)+$bitcount(@i,0))
 n res m res=@gl
 n res1 m res1=@gl
 ;размёржим его в две локали
 n tmp
 d getAND(.res,.res1,.tmp) w !,"Применим логическую ""&"" - ошибки нет"
 k tmp 
 s $bit(tmp(1),1)=0 ;инициализируем битовую строку
 w !,"Применим логическую ""или"" "
 d getOR(.res1,.tmp,.tmp)
  w !,"А потом снова ""&"" - получается ошибка, Выходит что операция OR ломает битовую стоку! Почему?"
 d getAND(.res,.tmp,.tmp)
 ;Другие битовые строки такой ошибки не давали.
 ;Проверяли на Cache for Windows (x86-32) 2012.1.2 (Build 702U)
 ;Cache for Windows (x86-32) 2012.2.0
 ;Cache for Windows (x86-32) 2012.2.1
 ;Cache for Windows (x86-32) 2011.
 ;Пробовали разные collation
 q
 
getAND(a,b,res)
 new block,count
 i $o(a(""),-1)>$o(b(""),-1) s count=$o(a(""),-1) ;вычислим мах кол-во блоков
 e  s count=$o(b(""),-1)
 f block=0:1:count s res(block)=$bitlogic(a(block)&b(block),len)
 q
  
getOR(a,b,res)
 new block,count
 i $o(a(""),-1)>$o(b(""),-1) s count=$o(a(""),-1) ;вычислим мах кол-во блоков
 e  s count=$o(b(""),-1)
 f block=0:1:count s res(block)=$bitlogic(a(block)|b(block),len)
 q