Form红色进度条问题

错误现象：

解决方法：

if (wnd = 'MAIN') then

app_window.close_first_window;

elsif (wnd = 'QUERY_FIND') then

--defer relations

--close related windows

app_window.close_first_window;

elsif (wnd = 'SUMMARY') then

--defer relations

--close related windows

app_window.close_first_window;

end if;