Делаю согласно примеру в Help’e
// identity - имя обновляемой таблицы
UPDATE identity   
SET Ts =  88 . 88 	
//SET "identity"."Ts" =  88 . 88 	- так тоже неправильно	
WHERE CURRENT OF icur_struct ; // icur_struct - имя курсора

Если закомментировать, ошибки нет. Проверял,
Подсчитывал кол-во прочитанных строк, извлекал
Содержимое конкретного столбца в текущей строке,
//+ MessageBox("", s.pp  )
Это работает, НО ОБНОВЛЕНИЕ - НЕ РАБОТАЕТ.

Как же обновить таблицу в конкретной строке
В столбце по имени ‘Ts’ ?
gs_identity s // variable 's' имеет type as structure 'gs_identity' 
OPEN icur_struct ; // открытие курсора,  имя которого " icur_struct ". 
DO 
FETCH icur_struct INTO 
:s.Tn, :s.pocada, :s.St, :s.kp, :s.Ts, :s.pp,
IF sqlca.SqlCode =  100  THEN 
		MessageBox("","E O J”)
		CLOSE  icur_struct; 
		EXIT 
END IF	
//+ MessageBox("", s.pp  )
// identity - имя обновляемой таблицы
double ld_ts
ld_ts = 88.88
//UPDATE identity
// не подходит SET Ts = 88.88	цвет значения 88.88 в скрипте тусклый
//-:s.Ts = 88.88
//- SET "identity"."Ts" = :s.Ts	
//++- нет SET "identity"."Ts" = ld_ts	
//WHERE CURRENT OF icur_struct ;

// нижеприведенные  строки кода тоже НЕ ОБНОВЛЯЮТ
s.ts = 88.88
UPDATE "identity"	// identity
//    SET "Ts" = :s.Ts // "Ts" - имя обновляемого поля в таблице  
SET "Tn" = :s.Tn,
"pocada" = :s.pocada,
"St" = :s.St,
"Kp" = :s.kp, 
"Ts" = :s.Ts,
"pp" = :s.pp
WHERE CURRENT OF icur_struct ;

	
LOOP WHILE true

// курсор icur_struct 
DECLARE icur_struct CURSOR FOR 
SELECT Tn,pocada,st,kp,Ts,pp
FROM identity  ;