INT loop;
EXEC SQL BEGIN DECLARE SECTION;

    VARCHAR NomDept [16], Nombre [16], Apellido1 [16];
    CHAR NSegSoc[10];
    FLOAT AumentoAnual;
    INT NumD;

EXEC SQL END DECLARE SECTION;
loop = 1;
AumentoAnual = 1.2;

while (loop) {

    prompt (“Introduzca el nombre del departamento: ”, NomDept);
    EXEC SQL
    SELECT NumeroD INTO :NumD
    FROM Departamento WHERE NombreD = :NomDept;
    if (SQLCODE == 0) {

        printf (“Empezando actualización de salarios para Depto # ”, NumD);
        EXEC SQL

            UPDATE EMPLEADO
            SET Salario = Salario * :AumentoAnual
            WHERE  :NumD = ND;
    }
    else
         printf (“Este nombre de departamento no existe”);
         prompt (“Otro nombre de departamento? Digite 1 para Si, 0 para No: ”, loop);
    }