Problema con PL/SQL (CURSORES EN HEIDI)

[NeoAres]

Código MySQL:

DECLARE
    CONT NUMBER(1):=0;
    AUX VARCHAR2(50):='';
    CURSOR NTRAVELS IS SELECT Book_code FROM book WHERE Book_code LIKE old.Book_code;
BEGIN
 
    IF (new.Invoiced IS NOT NULL)
    THEN
        FETCH NTRAVELS INTO AUX;
            WHILE NTRAVELS%FOUND LOOP
                
                FETCH NTRAVELS INTO AUX;        
            END LOOP;
        CLOSE NTRAVELS;
 
    END IF;
END;
 

Me falla en el CURSOR(HeidiSQL no me deja guardarlo), he mirado y remirado y no se me ocurre nada mas
El error pone que es de sintaxis en la linea 1
Gracias con antelación