Страница 1 из 1

в отчете пропадает мемополе после добавления логической табл

Добавлено: 17 июн 2010, 12:35
kukurechka
Добрый день!
Была разработана присоединеная форма "Счет без НДС". Галактика 7.12.01. Атлантис 3.03.22
Из особенностей можно отметить то, что в отчете выводится мемо-поле вот таким образом:

Код: Выделить всё

.begin
 S := 'Пусто';
 FileHandle := 0;
 FileHandle := CREATEFILEHANDLE('FileHandle');
if FileHandle <> 0 
then
{}
else
Message('Проблемы при получении Handle')
end.
.{table 'aView.basedoc'
.begin
  b:= FILE_OPENMEMO(aView.docinfo.textdata,FileHandle);
  if b then
    {
      delete all TempMEMO;
      while not file_eof(FileHandle) begin
        file_readln(s,FileHandle);
        ClearBUffer(tnTempMEMO);
        TempMemo.Memo_Str:=s;
        insert current TempMEMO;
    end;
    }
  z:='';
end.
.{table 'aView.TempMemo'
.begin
 z := string(z) + ' ' + trim(TempMemo.Memo_Str);
end.
.}
        Ш ^ Щ
.}
.begin
if FileHandle <> 0 then
DELETEFILEHANDLE(FileHandle);
end.
Задача: Добавить в форму ещё одну логическую таблицу.
После того как добавили лог. таблицу откомпилировали форму. Но вот чудо: в отчете больше не выводиться мемо-поле :(
как можно решить такую проблему??

Re: в отчете пропадает мемополе после добавления логической

Добавлено: 17 июн 2010, 13:10
Алексей
1. нужно обозвать логические таблицы.
2. обращатся к .{Table tablename нужно как .{logittablename.Table tablename

Re: в отчете пропадает мемополе после добавления логической

Добавлено: 17 июн 2010, 13:16
m0p3e
В во второй view мемо поля случаем нет?
Два мемо-поля в одной форме не вывести.
И непонятно зачем такие сложности с выводом мемо. Его можно выводить напрямую (но не более одного):

Код: Выделить всё

.fields
 aView.docinfo.textdata
.endfields
^
Только от-GetFirst-ить не забудьте.

Re: в отчете пропадает мемополе после добавления логической

Добавлено: 17 июн 2010, 13:52
edward_K
чуда нет.
Когда 2 вьюхи то ко всем обращениям нужно добавлять к какой вьюхе обращаетесь
aview.delete all TempMEMO;
и так далее. А так сканируете по aview, а заполняете фиг его знает где.
.{ table 'aview.TempMEMO' прокатит нормально