: при печати выполнение начало клинить в буквальном смысле - цикл _loop по временной таблице в памяти останавливался на последней записи и дальше никуда ни шел. Визуализаторы(как родной у формы, так и мой с отладочной информацией) не гасились, но таймер на них продолжал считать время и само окно визуализатора на внешние события реагировало - таскалось мышом по родительскому как положено , то бишь сама Галактика была жива. Попытки разобраться ни к чему не привели - выполнение клинило именно на последней записи (в том числе и в конструкции цикла в виде if(getfirst=tsOk){do{/*Какая-то */}while(getnext=tsOk)})- и это даже в почти пустом цикле(напоследок оставил внутри лишь один визуализатор по текущей записи). Операторов навигации, изменения значений ключевых полей, текущей позиции в таблице не было в цикле и в помине.Дальше веселее - эти же циклы клинило даже по пустой таблице ! ??? Может поможет кто , ежель сталкивались ?
структура временной таблицы и определение логической таблицы и-фейса дано ниже :
table struct oborotpodrtbl
(
cpodr:comp,
podr:string[100],
schet:string[20],
kau:string[20],
nkau:string[100],
debet:double,
kredit:double
)
with index
(
oborotpodrtbl0=cpodr(unique)+schet(unique)+kau(unique)
);
create view
var sdate,edate:date;
schet,subschet:string;
sink,sind,soutk,soutd:double;
currcount:longint;
isnotprint:word
%0