以下の例で EXTRACT-DATE-TIME 組み込み関数の使用法を示します。

    COMPUTE integer-1 = FUNCTION EXTRACT-DATE-TIME (date-3 MONTHS).
    COMPUTE integer-1 = FUNCTION EXTRACT-DATE-TIME (date-3 '%m').
    MOVE FUNCTION EXTRACT-DATE-TIME (date-2 '%m/%d') to alphanum-1.