ClearBuffer
Модераторы: m0p3e, edward_K, Модераторы
ClearBuffer
Здраствуйте! Подскажите пожалуйста
есть код
.begin
if v2.getfirst oborot = tsok
v2._loop oborot
{
ClearBuffer(#tab26);
tab26.sumob: = v2.oborot.sumob,
tab26.ckau: = v2.spkau.nrec,
tab26.datob: = v2.oborot.datob;
tab26.scheto: = v2.oborot.scheto;
tab26.subossch: = v2.oborot.subossch;
tab26.schetk := v2.oborot.schetk;
tab26.subschk: = v2.oborot.subschk;
tab26.sodpr: = v2.oborot.sodpr;
tab26.kau3 = v2.oborot.kauks[1];
if v2.getfirst hozoper = tsok
tab26.dop = v2.hozoper.code;
insert current tab26;
}
end.
При компиляции ругается "нет такой функции поля или метода ClearBuffer(#tab26);" в частности на #tab26.
Не пойму в чем дело.
Подскажите пожалуйста.
есть код
.begin
if v2.getfirst oborot = tsok
v2._loop oborot
{
ClearBuffer(#tab26);
tab26.sumob: = v2.oborot.sumob,
tab26.ckau: = v2.spkau.nrec,
tab26.datob: = v2.oborot.datob;
tab26.scheto: = v2.oborot.scheto;
tab26.subossch: = v2.oborot.subossch;
tab26.schetk := v2.oborot.schetk;
tab26.subschk: = v2.oborot.subschk;
tab26.sodpr: = v2.oborot.sodpr;
tab26.kau3 = v2.oborot.kauks[1];
if v2.getfirst hozoper = tsok
tab26.dop = v2.hozoper.code;
insert current tab26;
}
end.
При компиляции ругается "нет такой функции поля или метода ClearBuffer(#tab26);" в частности на #tab26.
Не пойму в чем дело.
Подскажите пожалуйста.
У меня есть вьюшка v2
.Create View v2 //
as select //
oborot.scheto,
oborot.subossch,
oborot.schetk,
oborot.subschk,
oborot.datob,
oborot.sumob,
oborot.kauks[1],
oborot.sodpr,
hozoper.code,
spkau.nrec
from oborot, spkau
where
((
oborot.chozoper==hozoper.nrec
and oborot.kauos[1]/==spkau.nrec))
and substr(oborot.sodpr,1,2)='ИП' // ИП
and oborot.datob>=dfor1
and (oborot.scheto='820Н' OR oborot.scheto='823Н' OR oborot.scheto='825Н' OR oborot.scheto='826Н')
and (spkau.cnode=281474976713775 or spkau.cnode=281474976713781 or spkau.cnode=281474976713784 or spkau.cnode=281474976713787 or spkau.nrec=281474976716179)
;
Затем данные из v2 я хочу поместить во временную таблицу tab26
преждевременно очистив буфер clearbuffer(#tab26)
.begin
if v2.getfirst oborot = tsok
v2._loop oborot
{
ClearBuffer(#tab26);
потом его заполняю буфер
tab26.sumob: = v2.oborot.sumob,
tab26.ckau: = v2.spkau.nrec,
tab26.datob: = v2.oborot.datob;
tab26.scheto: = v2.oborot.scheto;
tab26.subossch: = v2.oborot.subossch;
tab26.schetk := v2.oborot.schetk;
tab26.subschk: = v2.oborot.subschk;
tab26.sodpr: = v2.oborot.sodpr;
tab26.kau3 = v2.oborot.kauks[1];
if v2.getfirst hozoper = tsok
tab26.dop = v2.hozoper.code;
insert current tab26;
}
end.
затем его надо записать в таблицу tab26
insert current tab26;
.Create View v2 //
as select //
oborot.scheto,
oborot.subossch,
oborot.schetk,
oborot.subschk,
oborot.datob,
oborot.sumob,
oborot.kauks[1],
oborot.sodpr,
hozoper.code,
spkau.nrec
from oborot, spkau
where
((
oborot.chozoper==hozoper.nrec
and oborot.kauos[1]/==spkau.nrec))
and substr(oborot.sodpr,1,2)='ИП' // ИП
and oborot.datob>=dfor1
and (oborot.scheto='820Н' OR oborot.scheto='823Н' OR oborot.scheto='825Н' OR oborot.scheto='826Н')
and (spkau.cnode=281474976713775 or spkau.cnode=281474976713781 or spkau.cnode=281474976713784 or spkau.cnode=281474976713787 or spkau.nrec=281474976716179)
;
Затем данные из v2 я хочу поместить во временную таблицу tab26
преждевременно очистив буфер clearbuffer(#tab26)
.begin
if v2.getfirst oborot = tsok
v2._loop oborot
{
ClearBuffer(#tab26);
потом его заполняю буфер
tab26.sumob: = v2.oborot.sumob,
tab26.ckau: = v2.spkau.nrec,
tab26.datob: = v2.oborot.datob;
tab26.scheto: = v2.oborot.scheto;
tab26.subossch: = v2.oborot.subossch;
tab26.schetk := v2.oborot.schetk;
tab26.subschk: = v2.oborot.subschk;
tab26.sodpr: = v2.oborot.sodpr;
tab26.kau3 = v2.oborot.kauks[1];
if v2.getfirst hozoper = tsok
tab26.dop = v2.hozoper.code;
insert current tab26;
}
end.
затем его надо записать в таблицу tab26
insert current tab26;
дык а всетаки что мешает прописать таблицу во From?
Ну и что, что она не подцепленна, _loop то ее не затрагивает.
Код: Выделить всё
from oborot, spkau, tab26
where