Показать сообщение отдельно
Старый 20.08.2007, 11:08   #6  
RedFox is offline
RedFox
Участник
 
1,441 / 10 (0) +
Регистрация: 28.12.2004
Адрес: Киев
Цитата:
Сообщение от VasVovec Посмотреть сообщение
Что то я с копированием не совсем понимаю. Можно примерчик написать который будет выполнять действия с аналогичным результатом, как код в первом посте?
Переменные в объявлении:
CopyRecord (rec) = "SomeRecord";
NextStep :boolean

КОД:
SomeRecord.фильтрация
IF SomeRecord.FIND('-') THEN REPEAT
NextStep := 0
// SomeRecord.RENAME("Key1","Key2",NewValue,"Key4","Key5");
CopyRecord.COPY(SomeRecord) //to copy a record from a C/SIDE table. All filters, marks, and keys are included in the copy.
NextStep := SomeRecord.NEXT;
CopyRecord.KeyField3 := NewValue;
CopyRecord. MODIFY;
UNTIL NextStep = 0;