C_LONGINT($stringStart;$stringEnd;$newstringLength)
C_TEXT($1;$stringName)
C_TEXT($2;$newstring)
C_POINTER($3)
$stringName:=$1
$newstring:=$2
$stringStart:=FindInBlob($3->;$stringName)
DELETE FROM BLOB($3->;$stringStart;Length($stringName))
$newstringLength:=Length($newstring)
INSERT IN BLOB($3->;$stringStart;$newstringLength)
TEXT TO BLOB($newstring;$3->;Text without length ;$stringStart)