Problema con botón guardar

Integer li_cantidaD
string nregistro
nregistro=sle_nregistro.text
SELECT count(*)
INTO :li_cantidad
FROM Documentos
WHERE Documentos.NRegistro = :nregistro
;
if li_cantidad > 0 then
DECLARE actualizar PROCEDURE FOR ActualizarDocumentos
@NRegistro = :nregistro,
@NOficio = :sle_noficio.text,
@Tipo = :ddlb_documento.text,
@FechaDoc = :em_fechadoc.text,
@TipoDoc = :ddlb_tipodocumento.text,
@Nfolios = :sle_folios.text,
@NExp = :sle_nexp.text,
@DesOficina = :ddlb_origen.text,
@Remite = :sle_remite.text,
@Destinatario = :sle_destinatario.text,
@Asunto = :mle_asunto.text,
@Estado = :ddlb_estado.text,
@IdPersonal = :id,
@OficinaD = :ddlb_destino.text,
@Respuesta = :sle_respuesta.text,
@FechaRegistro = :em_fecha.text,
@HoraRegistro = :em_hora.text;
execute actualizar;
¿Ese es mi código pero cuando lo compilo me arroja error en la parte de la primera fila porque?.. Si en las ventanas anteriores no me sucede ese problema.. Por favor respóndeme lo más antes posible