if a(v461^2) then &unifor('+1W1'"),...
Читаю: если в поле 461 отсутствует подполе 2 (или равно '', т.е. пусто), то записать в глобальную переменную с номером 1 то, что идет после #. В приведенном примере формат &uf('+1W') не корректен, поскольку решетки после W1 нет.
&unifor('+1W1#'&unifor('Kjzk.mnu|'&unifor('Av101#1')))
Читаю: записать в глобальную переменную с номером 1 (
&uf('+1W1...')), расшифрованное через справочник jzk.mnu (
&uf('K...')) значение первого повторения поля 101 (
&uf('Av101#1')).