To keep going you can also change this...

// Send Stop_Box ("Einsender konnte nicht gelöscht werden\n Es existieren"*(String(iAnzahl))*"Befunde \n ;
// Bitte KORREKTUR ausführen")

...to this...

Send Stop_Box ("Einsender konnte nicht gelöscht werden\n Es existieren"*(String(iAnzahl))*"Befunde \n Bitte KORREKTUR ausführen")

Also look for any other area you split long strings with the ; character.