Yurttas/PL/DBL/oracle/F/01/SPJ/q050.sql

 1REM
 2REM q050.sql
 3REM
 4REM Get project numbers for projects supplied entirely by
 5REM supplier 'S01'.
 6REM
 7
 8SELECT J.jn
 9FROM Projects J
10WHERE NOT EXISTS (SELECT *
11                  FROM Shipments SPJ
12                  WHERE SPJ.jn = J.jn
13                    AND NOT (SPJ.sn = 'S01'));