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

ARD отчёт

Добавлено: 03 окт 2007, 07:31
ms_root
Дамы и господа!
Подскажите, где я ошибся. Интерфейс выбора ДО запускается, но после выбора ДО, Галактика вешается.

.form 'Zapros_DO_1'
.NameInList 'Запрос на потавку'
.ard
.var
myrec : comp; // номер ДО BaseDoc.Nrec
myGSDoc : comp; // номер этапа StepDoc.NRec
myGOrg : comp; // организация BaseDoc.cOrg
MySum : double;
.endvar

.Create view DO as
select
b.NODOC(fieldname=Nomer),
b.DDOC(fieldname=datedoc)

from
stepdoc,
basedoc b
where
(( word(32) == Pick.wList
and StepDoc.Nrec /== Pick.cRec
and StepDoc.cBasedoc /== b.nrec ));

.fields
Nomer
datedoc
.endfields

.begin
runinterface('F_SOPRHOZ::GetDBase',false, 1, 201, myrec, myGSDoc, myGOrg,Mysum);
end.

1.Список ДО

.{table DO
@@@@@@@@@@@ @@@@@@@@@@@@@
.}
.endform

Добавлено: 03 окт 2007, 10:01
Goblin
Ну не вешается, а скорее всего пытается соорудить Вашу вьюху, которая ну совсем неправильная

Нижеописанная подцепка ограничивает Pick по всему "жирному" StepDoc и по коду списка

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

 where
(( word(32) == Pick.wList
and StepDoc.Nrec /== Pick.cRec
and StepDoc.cBasedoc /== b.nrec ));
Нужно наоборот, тогда именно к малому Pick, ограниченному кодом списка, из "жирного" Stepdoc подцепятся нужные значения

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

 where
(( word(32) == Pick.wList
and  Pick.cRec /== StepDoc.Nrec
and StepDoc.cBasedoc /== b.nrec ));