Date_Field


Purpose   Assigns a dates variable to an input field.

Decln.    Date_Field(ID:byte;var
          DVar:dates;DateFmt:byte;DispFmt:string;Min,Max:dates);

Remarks   ID is the field ID number.
          Dvar is the name of the dates variable that will be updated with
          the user's input.
          DateFmt is the date format of the input field. The valid date
          formats are declared as constants in the IOTTT5 unit:
               DDMMYY
               MMDDYY
               MMYY
               MMYYYY
               DDMMYYYY
               MMDDYYYY
          DispFmt is the display format for the date. Enter a null string
          if the default is satisfactory, i.e. ##/##/##, ##/####,
          ##/##/####.
          Min, Max are the earliest and latest acceptable dates for range
          checking. Set to 0 to accept any byte value.

          The field must be declared with Add_Field prior to calling this
          procedure.

Example

BEGIN
    DATE_FIELD(8, BIRTHMONTH,MMYYYY,'',0,0);
    DATE_FIELD(9, PARTYDATE,DDMMYY,'(## - ## - ##)',0,0);
END;