Код: Выделить всё
.form test
.fields
podr
vsego
.endfields
Количесвто МЦ по плану
--------------------------------------------------------
Мат. ценность | Количество
--------------------------------------------------------
.{------------------------------------------------------
! начало цикла по номеру склада
.{======================================================
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ | @@@@@@@@@@
======================================================
.}
------------------------------------------------------
! Конец цикла по номеру склада
!Всего: | @@@@@@@@@@@@
.}
.endform
.linkform 'Itogi' prototype is 'test'
.fields
podr
vsego
.endfields
.var
summa_1:double
.endvar
.fields
summa_1
.endfields
Количесвто МЦ по плану
--------------------------------------------------------
Мат. ценность | Количесвто
|
--------------------------------------------------------
.{--------------------------------------------------------
! начало цикла по номеру склада
.begin summa_1:=summa_1+vsego; end.
.{========================================================
@@@@@@@@@@@@@@@@@@@@@@@ | @@@@@@@@@@@@@@@@
========================================================
.}
--------------------------------------------------------
.}
! Конец цикла по номеру склада
Всего: |@@@@@@@@@@@@@@@@@@
.endform
Код: Выделить всё
form Itogi("Itogi.out");
Код: Выделить всё
cmReport:
{
var summa:double;
_loop ppspecif where((pptitle.atl_nrec==ppspecif.cpptitle))
{
if getfirst ppkatstan where((ppspecif.cppkatstan==ppkatstan.atl_nrec))=tsok
{
Itogi.Write(ppkatstan.name);
}
summa:=ppspecif.Fdec+ppspecif.Sdec+ppspecif.Tdec;
Itogi.Write(summa);
}
Itogi.PutEvent(feBreak);
Itogi.PutEvent(feBreak);
Itogi.ShowFile('');
}
Если вызывать форму-прототип, то открывается сразу же отчет, но в форме прототипе у меня не получается объявить переменную, описанную в форме-прототипе, полем, компилятор ругается, что переменную. нельзя объявить полем. В доке не очень понятно всё описано. Там пример вызова только для формы прототипа.
Поммогите разобраться как правильно вызвать из интерфейса отчет?