Обсуждение различных вопросов, связанных с сопровождением, администрированием и программированием
https://gal.tyumbit.ru/
Код: Выделить всё
...
NewSpstep.insert current spstep;
...
спасибоRAJAH писал(а):INSERT - вставка новой записи; UPDATE - редактирование существующей.
по идее insert должен создавать новую запись в таблице spstep. а у меня ругается, мол дублируется запись spstep.nrec. не подскажете в чем может быть проблема?RAJAH писал(а):INSERT - вставка новой записи; UPDATE - редактирование существующей.
m0p3e писал(а):Если в буфере уже существующая запись, то nrec необходимо принудительно занулить. Тогда он при вставке будет сгенерирован.
Код: Выделить всё
if(NewSpstep.getfirst spstep = tsOk and NewSpstep.getfirst stepdoc = tsOk)
{
if(NewSpstep.Spstep.Nrec <> 0)
{
Message(NewSpstep.Spstep.nrec)
NewSpstep.clearbuffer(NewSpstep.tNspstep);
NewSpstep.Spstep.NPP := i;
NewSpstep.SPSTEP.CMCUSL := Bnrec;
NewSpstep.SPSTEP.COTPED := Enrec;
NewSpstep.SPSTEP.KOL := _Kol;
NewSpstep.SPSTEP.KOLSKL := _Kol;
NewSpstep.Spstep.CSTEPDOC := NewSpstep.stepdoc.nrec;
NewSpstep.insert current spstep;
i := i + 1;
};
};