Calculates the Julian date of input.

       (A Julian date is based on days of the year being numbered
       beginning with January 1st. The Julian date of January 6th is
       6. The Julian date of February 2nd is 33, and so on.)

1  –  Input

       A date.

2  –  Output

       An unsigned integer from 1 to 366. (There are 366 days in a leap
       year.)

3  –  Example

       DTR> DECLARE CAL USAGE DATE EDIT_STRING X(23).
       DTR> CAL = "NOW"; PRINT CAL

                  CAL

        1-Feb-1990 08:51:11.55
       DTR> PRINT FN$JULIAN (CAL)

         FN$JULIAN

                 32

       DTR>