"Fast Report и ADOQuery: решение проблемы отображения данных при null значении SHIP_DATE"

Delphi , Базы данных , Отчеты

Fast Report и ADOQuery: решение проблемы отображения данных при null значении SHIP_DATE

Возникла проблема с отображением данных в Fast Report из ADOQuery, при этом в TDBGrid отображались все данные корректно. Причиной проблемы является неверное форматирование дат в запросе, из-за чего Fast Report не может отобразить записи, где SHIP_DATE равен null.

Причина проблемы

Проблема кроется в запросе, который используется для получения данных из базы данных. В запросе используются даты в формате 'yyyy-mm-dd', но Fast Report ожидает формат 'dd.mm.yyyy'. Из-за этого Fast Report не может отобразить записи, где SHIP_DATE равен null.

Решение проблемы

Для решения проблемы необходимо правильно форматировать даты в запросе. Можно использовать функцию FormatDateTime для преобразования даты в нужный формат. Пример кода:

var
  date1, date2: TDateTime;
begin
  date1 := StrToDate(inputbox('Date Range', 'Enter Beginning Date', ''));
  date2 := StrToDate(inputbox('Date Range', 'Enter Ending Date', ''));
  sql_str := 'SELECT * FROM JOB_DATA J'#13 +
             'INNER JOIN CUSTOMER C'#13 +
             'ON J.CUST_CODE = C.CUST_CODE'#13 +
             'WHERE J.SHIP_DATE BETWEEN :StartDate AND :EndDate';
  with ADOQuery5 do
  begin
    Close;
    SQL.Text := sql_str;
    with Parameters.ParamByName('StartDate') do
    begin
      DataType := ftDate;
      Value := FormatDateTime('dd.mm.yyyy', date1);
    end;
    with Parameters.ParamByName('EndDate') do
    begin
      DataType := ftDate;
      Value := FormatDateTime('dd.mm.yyyy', date2);
    end;
    Open;
  end;
  frxReport2.ShowReport;
end;

В примере кода даты преобразуются в формат 'dd.mm.yyyy' с помощью функции FormatDateTime и присваиваются параметрам StartDate и EndDate в запросе. После этого данные из ADOQuery корректно отображаются в Fast Report.

Вывод

При использовании Fast Report и ADOQuery для отображения данных из базы данных важно правильно форматировать даты в запросе. В противном случае, Fast Report не сможет отобразить записи, где дата равна null. Для решения проблемы можно использовать функцию FormatDateTime для преобразования даты в нужный формат.

Создано по материалам из источника по ссылке.

Контекст данного текста: решение проблемы отображения данных в Fast Report из ADOQuery при null значении SHIP_DATE.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Отчеты ::