anchor.diff:    aSheet.WriteNumber(aRow, aCol, aValue, nfFixed, aFractionalPartDigits);
   end;
   
  +procedure WriteDate(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TDateTime);
  +begin
  +  aSheet.WriteDateTime(aRow, aCol, aValue, nfShortDate);
  +end;
  +
  +procedure WriteDate(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TNullableDateTime);
  +begin
  +  if aValue.NotNull then
  +    WriteDate(aSheet, aRow, aCol, aValue.Value);
  +end;
  +
  +procedure WriteDateTime(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TNullableDateTime);
  +begin
  +  if aValue.NotNull then
  +    WriteDateTime(aSheet, aRow, aCol, aValue.Value);
  +
  +end;
  +
  +procedure WriteDateTime(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TDateTime);
  +begin
  +  aSheet.WriteDateTime(aRow, aCol, aValue, nfShortDateTime);
  +end;
  +
   procedure WriteInteger(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TNullableInteger);
   begin
  -  WriteInteger(aSheet, aRow, aCol, aValue.AsInteger);
  +  if aValue.NotNull then
  +    WriteInteger(aSheet, aRow, aCol, aValue.AsInteger);
   end;
   
   procedure WriteInteger(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: integer);
  
positive.code: 
  procedure WriteFloat(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: TNullableDouble; const aFractionalPartDigits: integer);
  begin
    WriteFloat(aSheet, aRow, aCol, aValue.AsFloat, aFractionalPartDigits);
  end;
  
  procedure WriteFloat(aSheet: TsWorksheet; const aRow, aCol: integer; const aValue: double; const aFractionalPartDigits: integer);
  
negative.code: procedure WriteFloat(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : TNullableDouble; const aFractionalPartDigits : integer); overload;
  procedure WriteFloat(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : double; const aFractionalPartDigits : integer); overload;
  
  procedure WriteDate(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue: TNullableDateTime); overload;
  procedure WriteDate(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : TDateTime); overload;
  
  procedure WriteDateTime(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue: TNullableDateTime); overload;
  procedure WriteDateTime(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : TDateTime); overload;
  
  procedure WriteInteger(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : TNullableInteger); overload;
  procedure WriteInteger(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : integer); overload;
  procedure WriteInt64(aSheet: TsWorksheet; const aRow, aCol : integer; const aValue : Int64); overload;
  