Страница 1 из 1
Протокол действия ARD в текстовый файл?
Добавлено: 15 окт 2002, 18:19
ds
Написал жутко сложную процедуру (ARD) массовой замены матнорм в калькуляциях. Вроде работает, но временами что-то лишнего меняет, что-то наоборот, не меняет вовсе, хотя должна. Отследить и проверить процесс замены крайне сложно из-за большого объема апдейтов, решил выкидывать информацию по каждому апдейту в текстовый файл, а как с ним работать - не знаю. ВОПРОС: КАК В ARD-ОТЧЕТЕ ОТКРЫТЬ ТЕКСТОВЫЙ ФАЙЛ НА ЗАПИСЬ, ЗАПИСАТЬ В НЕГО НЕСКОЛЬКО СТРОК И ЗАКРЫТЬ ЕГО? КАК ОПИСЫВАЕТСЯ ФАЙЛОВАЯ ПЕРЕМЕННАЯ, ЕСЛИ ТАКОВАЯ ДОЛЖНА БЫТЬ?
Re: Протокол действия ARD в текстовый файл?
Добавлено: 15 окт 2002, 19:01
sth
можно конечно так сделать как ты хочешь.
а можно еще применить LogStrToFile
тогда не надо ничего больше.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 15 окт 2002, 19:21
ds
Открываю Руковордство системного программиста - Средство разработки АТЛАНТИС - Арифметические выражения и функции. Лезу в алфавитный указатель, нахожу LogStrToFile - стр. 312. Открываю - нет такой функции. В общем, не нашел я ее. Как она работает, могу я через эту функцию написать что-нибудь осмысленное в файл типа %Удаление старой матнормы 10-00001 в техпроцессе пр14543%?
Re: Протокол действия ARD в текстовый файл?
Добавлено: 15 окт 2002, 20:25
Den
Не знаю конечно может я чего не понял, но там вроде стандартный rep0.out формируется.
Выводи в нужных местах информацию до и после update вот и все.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 10:59
ds
В этот rep0.out я совсем другие вещи вывожу, микшировать не хочется. Да и вывод нужен в середине огромного блока .begin end. И файликов нужно штуки три для разных пользователей - свои.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 11:02
ALEKS123
Например так
VAR
F_NAME : string;
fil_c : boolean;
. . . . . .
. . . . . .
File hndFile;
F_NAME := 'F:\SIN\MY.TXT'
fil_c := hndFile.OpenFile(F_NAME, stCREATE);
fil_c := hndFile.OpenFile(F_NAME, stOPENWRITE);
(Если FIL_C "false", файл не создался)
//Цикл (наверное) чтобы что-то писать
{
. . . . . .
. . . . . .
hndFile.WriteLn(<Что надо записать>);
. . . . . . .
. . . . .
}
hndFile.Close;
-----------------------------------
Вот, собственно говоря, и все. Если я правильно понял вопрос, конечно.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 11:34
ds
Это работает абсолютно точно в VIP-программе. У меня же чистой воды ard-отчет. Компилятор начинает ругаться уже на первую строку:
File hndFile;
Дальше не лучше. Переделать на Вип ard-ху в 1000 строк нет никакой возможности - никогда так не делал.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 13:07
Max_Fin
Слушай, а в чем проблема выполнить интерфейс внутри отчета (RunInterface), а уж там все что хочешь сделаешь.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 13:55
forummaster
<HTML>19.7. Процедура LogStrToFile (String, String)
Назначение
Запись строки в конец файла. Используется для протокола в отладочных целях.
Описание
procedure LogStrToFile (aFileName : String; aStr : String);
Параметры
aFileName : String - имя файла (если файл не существует, он создается).
aStr : String - записываемая строка.
Пример
LogStrToFile ('result.txt', 'Информация = 1');
На правах рекламы
А что-бы не открывать каждый раз "Арифметические выражения и функции" - купи у ТюмБИТ'а "Справочник программиста Галактики (VIP)"
http://www.tyumbit.ru/galaktika/downloads/sprprice.htm и работай в свое удовольствие
</HTML>
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 14:17
sth
извиняйте, что сразу описание процедуры не привел.
Re: Протокол действия ARD в текстовый файл?
Добавлено: 16 окт 2002, 14:35
ds
Спасибо, работает с LogStrToFile. Самое в то.