#include <stdio.h>
    DATABASE PERS = FILENAME "PERSONNEL";
    main()
    {
    READY PERS;
    START_TRANSACTION READ_ONLY;
    FOR CI IN CURRENT_INFO
       SORTED BY CI.SALARY
          printf ("%s $%f\n",CI.LAST_NAME, CI.SALARY);
    END_FOR;
    COMMIT;
    FINISH;
    }