/* формат ФЛК - на ВЫХОД читателя из библиотеки
&uf('+7W1#'),&uf('+7W2#',&uf('3')),
(if p(v40) then  if v40^f : '*' then if &uf('Ag2#1')>=v40^e then &uf('+7W1#1'),break fi fi fi),
if g1='' then '0До свидания' else '1За читателем числятся невозвращенные издания!' fi