Складской ордер

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
korvanakorvana
Местный житель
Сообщения: 429
Зарегистрирован: 24 сен 2008, 11:53

Складской ордер

Сообщение korvanakorvana »

Ребята привет подскажите пожалуйста
есть такой кусок кода

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

_loop katsopr
{
if getfirst tkatpodr=tsOk and getfirst tkatorg=tsOk and getfirst tmanager=tsok then 
_loop spsopr
{

if getfirst tkatmc1=tsOk then
	{
	insert into tKatsSPSopr set
	tKatsSPSopr.nrec:=spsopr.nrec,
	tKatsSPSopr.data:=katsopr.dsopr,
	tKatsSPSopr.corg:=katsopr.corg,
	tKatsSPSopr.cpodrfrom:=katsopr.cpodrfrom,
	tKatsSPSopr.cmcusl:=spsopr.cmcusl,
	tKatsSPSopr.cproizw:=exclassseg.nrec,
	tKatsSPSopr.kol:=spsopr.kolfact,
	tKatsSPSopr.descr:=basedoc.descr,
	tKatsSPSopr.sum:=If (KatSopr.vHodNal=1,(SpSopr.Price*SpSopr.KolFact-SpSopr.SumNDS),SpSopr.Price*SpSopr.KolFact),
	tKatsSPsopr.partyname:=katparty.name;
	
        
             tKatsSpsopr.cenaprih:=sporder.rsrprice?????????????????????
    }

}
Вот как бы правильно внести в таблицу tKatsSpsopr sporder.rsrprice.
sporder я вроде привязала

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

and katsopr.nrec==sklorder.csopr
and sklorder.nrec==sporder.csklorder
Den
Местный житель
Сообщения: 1844
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Ярославская область ОАО "Часовой завод Чайка" г. Углич
Контактная информация:

Re: Складской ордер

Сообщение Den »

spsopr.nrec == sporder.cspsopr
.....
tKatsSpsopr.cenaprih:=if isvalid(tnsporder,sporder.rsrprice,0)
korvanakorvana
Местный житель
Сообщения: 429
Зарегистрирован: 24 сен 2008, 11:53

Re: Складской ордер

Сообщение korvanakorvana »

tKatsSpsopr.cenaprih:=if (isvalid (tnsporder),sporder.rsrprice,0)
Спасибо заработкало)
Ответить