Delphi - PROBLEMAS CON UPDATE, Ayuda Urgente

menú actualizar:
Al actualizar la Tabla ocupados de acuerdo a ANIOS Y DIVSION no tengo problemas.

Al abrir nuevamente el menú actualizar:
Al querer actualizar de manera seguida la tabla OCUPADOS, con la misma DIVISION y ANIOS me aparece un error(ERROR CREATING CURSOS HANDLE)

Qocupados.close;
Qocupados.sql.clear;
Qocupados.sql.add('update OCUPADOS set OCUPADOS=:ocupados where(ANIOS=:anios)and(DIVISION=:division)');
Qocupados.ParamByName('anios').AsInteger:=anios;
Qocupados.ParamByName('division').ASstring:=label21.Caption;
Qocupados.ParamByName('ocupados').AsInteger:=ocupado;
Qocupados.ExecSQL;

Necesito ayuda para solucionar este problema urgente.
Saludos.
Romina

Disculpen pero solucione el problema

Dinos como y asi aprenderemos todos....