例 4

 OCCUR FROM(VARIN) LIST(ONCE) -
       TITLE('Record lengths that occur only once') -
       TIME(12:) DATE(DMY.) -
       ON(VLEN) NODUPS BLANK
ONCE データ・セットに次のものが印刷されます。
  • 指定したタイトル、時間、および日付が入っているタイトル行
  • 標準ヘッダーが入っているヘッダー行
  • 1 回だけ発生する各レコード長ごとに、そのレコード長を含む BLANK 形式のデータ行

ONCE 出力は新しいページから始まり、次のようになります (最初の 2 つのレコードは、図示のための値で示されています)。

 Record lengths that occur only once        09:52:17 am        21.10.92

 RECORD LENGTH
            57
            61
             .
             .
             .

タイトル行とヘッダー行は各ページの一番上にあります。