program empupdate (input,output);
    DATABASE PERS = FILENAME 'PERSONNEL';

    begin
    FOR E IN EMPLOYEES
       writeln (E.LAST_NAME);
    END_FOR;

    COMMIT;
    FINISH;
    end.