// If there are too many characters to fit in the buffer,
(*----------------------------------------------------------------------------------*)
CurrentLength := THIS^.Len();
AdditionalLength := Stu.StrLenW(pwTempStr1);
TotalLength := CurrentLength + AdditionalLength;
(* Loop: Move the rightmost to make room *)
FOR i := MIN(TotalLength,GC_sparkplug.supported_string_lengths)
TO (Position + AdditionalLength) BY -1 DO
pwTempDestStr[i -1] := pwTempDestStr[i -1 - AdditionalLength];
END_FOR
(* Loop: Insert additional Text *)
FOR i := 0
pwTempDestStr[MIN(TotalLength,GC_sparkplug.supported_string_lengths)+1]:= 0;
(* Set: Return value *)
InsertAt := THIS^;