Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Oracle Новый топик    Ответить
 Forms+D2KWUTIL непонятки при работе с файлами  [new]
Zergling
Member

Откуда:
Сообщений: 40
Задача.
Существует форма отчетности (хранится в *.rep).
Формы меняются со временем. Надо, что бы пользователь мог из формы (Forms)
выбрать какой из репортсов использовать для отчета.
Маска файла scf(далее примечания).rep
Репортсы хранятся в поддиректории \scf

Написал. У меня на машине работет как часы. При запуске с сервера, где хранятся формы, ошибка в процедуре заполняющей блок с вариантами репортсов.

PROCEDURE fill_block IS

hSearch PLS_INTEGER;
vcFile varchar2(60);
bIsDir boolean;

mask varchar2(50) := 'scf';

dir varchar2(250) := Win_API_Environment.Get_Working_Directory(TRUE)||mask;

BEGIN

go_block('b_reports');
clear_block;

hSearch := win_api_directory_list.FirstFile(dir||'\*.rep', vcFile, bIsDir, FALSE); --здесь ошибка ORA-06508


loop

if(substr(vcFile,1,length(mask)) = mask) then
:b_reports.file_name := replace(replace(vcFile,'.rep'),mask); --оставляю только примечания
next_record;
end if;

win_api_directory_list.NextFile(hSearch, vcFile, bIsDir, FALSE);

exit when vcFile is null;

end loop;

win_api_directory_list.CloseSearch(hSearch);

first_record;

END;

Директория с репортсами определяется правильно
9 июн 06, 14:39    [2759009]     Ответить | Цитировать Сообщить модератору
 Re: Forms+D2KWUTIL непонятки при работе с файлами  [new]
Zergling
Member

Откуда:
Сообщений: 40
dir varchar2(250) := Win_API_Environment.Get_Working_Directory(TRUE)||'\'|| mask;

Прошу извинить - ошибся при копировании в форум.
Исправил. Вопрос в силе.
9 июн 06, 14:48    [2759069]     Ответить | Цитировать Сообщить модератору
 Re: Forms+D2KWUTIL непонятки при работе с файлами  [new]
Zergling
Member

Откуда:
Сообщений: 40
Ошибка возникает при использовании
d2kwut60.dll от 2005 года и не возникает при
d2kwut60.dll от 2000.
Спецификации пакета идентичны.
9 июн 06, 17:58    [2760193]     Ответить | Цитировать Сообщить модератору
Все форумы / Oracle Ответить