sc/source/ui/dbgui/dpgroupdlg.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #ifdef SC_DLLIMPLEMENTATION
  21 #undef SC_DLLIMPLEMENTATION
  22 #endif
  23
  24 #include "dpgroupdlg.hxx"
  25 #include "scresid.hxx"
  26 #include "sc.hrc"
  27 #include "globstr.hrc"
  28
  29 #include <com/sun/star/sheet/DataPilotFieldGroupBy.hpp>
  30
  31 namespace {
  32
  33 /** Date part flags in order of the list box entries. */
  34 static const sal_Int32 spnDateParts[] =
  35 {
  36     css::sheet::DataPilotFieldGroupBy::SECONDS,
  37     css::sheet::DataPilotFieldGroupBy::MINUTES,
  38     css::sheet::DataPilotFieldGroupBy::HOURS,
  39     css::sheet::DataPilotFieldGroupBy::DAYS,
  40     css::sheet::DataPilotFieldGroupBy::MONTHS,
  41     css::sheet::DataPilotFieldGroupBy::QUARTERS,
  42     css::sheet::DataPilotFieldGroupBy::YEARS
  43 };
  44
  45 static const sal_uInt16 nDatePartResIds[] =
  46 {
  47     STR_DPFIELD_GROUP_BY_SECONDS,
  48     STR_DPFIELD_GROUP_BY_MINUTES,
  49     STR_DPFIELD_GROUP_BY_HOURS,
  50     STR_DPFIELD_GROUP_BY_DAYS,
  51     STR_DPFIELD_GROUP_BY_MONTHS,
  52     STR_DPFIELD_GROUP_BY_QUARTERS,
  53     STR_DPFIELD_GROUP_BY_YEARS
  54 };
  55
  56 } // namespace
  57
  58 ScDPGroupEditHelper::ScDPGroupEditHelper( RadioButton* pRbAuto, RadioButton* pRbMan, Edit* pEdValue ) :
  59     mpRbAuto( pRbAuto ),
  60     mpRbMan( pRbMan ),
  61     mpEdValue( pEdValue )
  62 {
  63     mpRbAuto->SetClickHdl( LINK( this, ScDPGroupEditHelper, ClickHdl ) );
  64     mpRbMan->SetClickHdl( LINK( this, ScDPGroupEditHelper, ClickHdl ) );
  65 }
  66
  67 bool ScDPGroupEditHelper::IsAuto() const
  68 {
  69     return mpRbAuto->IsChecked();
  70 }
  71
  72 double ScDPGroupEditHelper::GetValue() const
  73 {
  74     double fValue;
  75     if( !ImplGetValue( fValue ) )
  76         fValue = 0.0;
  77     return fValue;
  78 }
  79
  80 void ScDPGroupEditHelper::SetValue( bool bAuto, double fValue )
  81 {
  82     if( bAuto )
  83     {
  84         mpRbAuto->Check();
  85         ClickHdl( mpRbAuto );
  86     }
  87     else
  88     {
  89         mpRbMan->Check();
  90         ClickHdl( mpRbMan );
  91     }
  92     ImplSetValue( fValue );
  93 }
  94
  95 IMPL_LINK_TYPED( ScDPGroupEditHelper, ClickHdl, Button*, pButton, void )
  96 {
  97     if( pButton == mpRbAuto )
  98     {
  99         // disable edit field on clicking "automatic" radio button
 100         mpEdValue->Disable();
 101     }
 102     else if( pButton == mpRbMan )
 103     {
 104         // enable and set focus to edit field on clicking "manual" radio button
 105         mpEdValue->Enable();
 106         mpEdValue->GrabFocus();
 107     }
 108 }
 109
 110 ScDPNumGroupEditHelper::ScDPNumGroupEditHelper(
 111         RadioButton* pRbAuto, RadioButton* pRbMan, ScDoubleField* pEdValue ) :
 112     ScDPGroupEditHelper( pRbAuto, pRbMan, pEdValue ),
 113     mpEdValue( pEdValue )
 114 {
 115 }
 116
 117 bool ScDPNumGroupEditHelper::ImplGetValue( double& rfValue ) const
 118 {
 119     return mpEdValue->GetValue( rfValue );
 120 }
 121
 122 void ScDPNumGroupEditHelper::ImplSetValue( double fValue )
 123 {
 124     mpEdValue->SetValue( fValue );
 125 }
 126
 127 ScDPDateGroupEditHelper::ScDPDateGroupEditHelper(
 128         RadioButton* pRbAuto, RadioButton* pRbMan, DateField* pEdValue, const Date& rNullDate ) :
 129     ScDPGroupEditHelper( pRbAuto, pRbMan, pEdValue ),
 130     mpEdValue( pEdValue ),
 131     maNullDate( rNullDate )
 132 {
 133 }
 134
 135 bool ScDPDateGroupEditHelper::ImplGetValue( double& rfValue ) const
 136 {
 137     rfValue = mpEdValue->GetDate() - maNullDate;
 138     return true;
 139 }
 140
 141 void ScDPDateGroupEditHelper::ImplSetValue( double fValue )
 142 {
 143     Date aDate( maNullDate );
 144     aDate += static_cast< sal_Int32 >( fValue );
 145     mpEdValue->SetDate( aDate );
 146 }
 147
 148 ScDPNumGroupDlg::ScDPNumGroupDlg( vcl::Window* pParent, const ScDPNumGroupInfo& rInfo ) :
 149     ModalDialog     ( pParent, "PivotTableGroupByNumber", "modules/scalc/ui/groupbynumber.ui" ),
 150     mpRbAutoStart   ( get<RadioButton>("auto_start") ),
 151     mpRbManStart    ( get<RadioButton>("manual_start") ),
 152     mpEdStart       ( get<ScDoubleField> ("edit_start") ),
 153     mpRbAutoEnd     ( get<RadioButton> ( "auto_end" ) ),
 154     mpRbManEnd      ( get<RadioButton> ("manual_end") ),
 155     mpEdEnd         ( get<ScDoubleField>( "edit_end") ),
 156     mpEdBy          ( get<ScDoubleField> ("edit_by") ),
 157     maStartHelper   ( mpRbAutoStart, mpRbManStart, mpEdStart ),
 158     maEndHelper     ( mpRbAutoEnd, mpRbManEnd, mpEdEnd )
 159 {
 160
 161     maStartHelper.SetValue( rInfo.mbAutoStart, rInfo.mfStart );
 162     maEndHelper.SetValue( rInfo.mbAutoEnd, rInfo.mfEnd );
 163     mpEdBy->SetValue( (rInfo.mfStep <= 0.0) ? 1.0 : rInfo.mfStep );
 164
 165     /*  Set the initial focus, currently it is somewhere after calling all the radio
 166         button click handlers. Now the first enabled editable control is focused. */
 167     if( mpEdStart->IsEnabled() )
 168         mpEdStart->GrabFocus();
 169     else if( mpEdEnd->IsEnabled() )
 170         mpEdEnd->GrabFocus();
 171     else
 172         mpEdBy->GrabFocus();
 173 }
 174
 175 ScDPNumGroupDlg::~ScDPNumGroupDlg()
 176 {
 177     disposeOnce();
 178 }
 179
 180 void ScDPNumGroupDlg::dispose()
 181 {
 182     mpRbAutoStart.clear();
 183     mpRbManStart.clear();
 184     mpEdStart.clear();
 185     mpRbAutoEnd.clear();
 186     mpRbManEnd.clear();
 187     mpEdEnd.clear();
 188     mpEdBy.clear();
 189     ModalDialog::dispose();
 190 }
 191
 192
 193 ScDPNumGroupInfo ScDPNumGroupDlg::GetGroupInfo() const
 194 {
 195     ScDPNumGroupInfo aInfo;
 196     aInfo.mbEnable = true;
 197     aInfo.mbDateValues = false;
 198     aInfo.mbAutoStart = maStartHelper.IsAuto();
 199     aInfo.mbAutoEnd = maEndHelper.IsAuto();
 200
 201     // get values and silently auto-correct them, if they are not valid
 202     // TODO: error messages in OK event?
 203     aInfo.mfStart = maStartHelper.GetValue();
 204     aInfo.mfEnd = maEndHelper.GetValue();
 205     if( !mpEdBy->GetValue( aInfo.mfStep ) || (aInfo.mfStep <= 0.0) )
 206         aInfo.mfStep = 1.0;
 207     if( aInfo.mfEnd <= aInfo.mfStart )
 208         aInfo.mfEnd = aInfo.mfStart + aInfo.mfStep;
 209
 210     return aInfo;
 211 }
 212
 213 ScDPDateGroupDlg::ScDPDateGroupDlg( vcl::Window* pParent,
 214         const ScDPNumGroupInfo& rInfo, sal_Int32 nDatePart, const Date& rNullDate ) :
 215     ModalDialog( pParent, "PivotTableGroupByDate", "modules/scalc/ui/groupbydate.ui" ),
 216     mpRbAutoStart   ( get<RadioButton>("auto_start") ),
 217     mpRbManStart    ( get<RadioButton>("manual_start") ),
 218     mpEdStart       ( get<DateField>("start_date") ),
 219     mpRbAutoEnd     ( get<RadioButton>("auto_end") ),
 220     mpRbManEnd      ( get<RadioButton>("manual_end") ),
 221     mpEdEnd         ( get<DateField>("end_date") ),
 222     mpRbNumDays     ( get<RadioButton>("days") ),
 223     mpRbUnits       ( get<RadioButton>("intervals") ),
 224     mpEdNumDays     ( get<NumericField>("days_value") ),
 225     mpLbUnits       ( get<SvxCheckListBox>("interval_list") ),
 226     mpBtnOk         ( get<OKButton>("ok") ),
 227     maStartHelper   ( mpRbAutoStart, mpRbManStart, mpEdStart, rNullDate ),
 228     maEndHelper     ( mpRbAutoEnd, mpRbManEnd, mpEdEnd, rNullDate )
 229 {
 230     static const size_t nCount = SAL_N_ELEMENTS( nDatePartResIds );
 231     for(sal_uInt16 nDatePartResId : nDatePartResIds)
 232         mpLbUnits->InsertEntry( ScGlobal::GetRscString( nDatePartResId ) );
 233
 234     mpEdStart->SetShowDateCentury( true );
 235     mpEdEnd->SetShowDateCentury( true );
 236
 237     maStartHelper.SetValue( rInfo.mbAutoStart, rInfo.mfStart );
 238     maEndHelper.SetValue( rInfo.mbAutoEnd, rInfo.mfEnd );
 239
 240     if( nDatePart == 0 )
 241         nDatePart = css::sheet::DataPilotFieldGroupBy::MONTHS;
 242     for( size_t nIdx = 0; nIdx < nCount; ++nIdx )
 243         mpLbUnits->CheckEntryPos( static_cast< sal_uInt16 >( nIdx ), (nDatePart & spnDateParts[ nIdx ]) != 0 );
 244
 245     if( rInfo.mbDateValues )
 246     {
 247         mpRbNumDays->Check();
 248         ClickHdl( mpRbNumDays );
 249
 250         double fNumDays = rInfo.mfStep;
 251         if( fNumDays < 1.0 )
 252             fNumDays = 1.0;
 253         else if( fNumDays > 32767.0 )
 254             fNumDays = 32767.0;
 255         mpEdNumDays->SetValue( static_cast< long >( fNumDays ) );
 256     }
 257     else
 258     {
 259         mpRbUnits->Check();
 260         ClickHdl( mpRbUnits );
 261     }
 262
 263     /*  Set the initial focus, currently it is somewhere after calling all the radio
 264         button click handlers. Now the first enabled editable control is focused. */
 265     if( mpEdStart->IsEnabled() )
 266         mpEdStart->GrabFocus();
 267     else if( mpEdEnd->IsEnabled() )
 268         mpEdEnd->GrabFocus();
 269     else if( mpEdNumDays->IsEnabled() )
 270         mpEdNumDays->GrabFocus();
 271     else if( mpLbUnits->IsEnabled() )
 272         mpLbUnits->GrabFocus();
 273
 274     mpRbNumDays->SetClickHdl( LINK( this, ScDPDateGroupDlg, ClickHdl ) );
 275     mpRbUnits->SetClickHdl( LINK( this, ScDPDateGroupDlg, ClickHdl ) );
 276     mpLbUnits->SetCheckButtonHdl( LINK( this, ScDPDateGroupDlg, CheckHdl ) );
 277 }
 278
 279 ScDPDateGroupDlg::~ScDPDateGroupDlg()
 280 {
 281     disposeOnce();
 282 }
 283
 284 void ScDPDateGroupDlg::dispose()
 285 {
 286     mpRbAutoStart.clear();
 287     mpRbManStart.clear();
 288     mpEdStart.clear();
 289     mpRbAutoEnd.clear();
 290     mpRbManEnd.clear();
 291     mpEdEnd.clear();
 292     mpRbNumDays.clear();
 293     mpRbUnits.clear();
 294     mpEdNumDays.clear();
 295     mpLbUnits.clear();
 296     mpBtnOk.clear();
 297     ModalDialog::dispose();
 298 }
 299
 300 ScDPNumGroupInfo ScDPDateGroupDlg::GetGroupInfo() const
 301 {
 302     ScDPNumGroupInfo aInfo;
 303     aInfo.mbEnable = true;
 304     aInfo.mbDateValues = mpRbNumDays->IsChecked();
 305     aInfo.mbAutoStart = maStartHelper.IsAuto();
 306     aInfo.mbAutoEnd = maEndHelper.IsAuto();
 307
 308     // get values and silently auto-correct them, if they are not valid
 309     // TODO: error messages in OK event?
 310     aInfo.mfStart = maStartHelper.GetValue();
 311     aInfo.mfEnd = maEndHelper.GetValue();
 312     sal_Int64 nNumDays = mpEdNumDays->GetValue();
 313     aInfo.mfStep = static_cast<double>( aInfo.mbDateValues ? nNumDays : 0L );
 314     if( aInfo.mfEnd <= aInfo.mfStart )
 315         aInfo.mfEnd = aInfo.mfStart + nNumDays;
 316
 317     return aInfo;
 318 }
 319
 320 sal_Int32 ScDPDateGroupDlg::GetDatePart() const
 321 {
 322     // return DAYS for special "number of days" mode
 323     if( mpRbNumDays->IsChecked() )
 324         return css::sheet::DataPilotFieldGroupBy::DAYS;
 325
 326     // return listbox contents for "units" mode
 327     sal_Int32 nDatePart = 0;
 328     for( sal_uLong nIdx = 0, nCount = mpLbUnits->GetEntryCount(); nIdx < nCount; ++nIdx )
 329         if( mpLbUnits->IsChecked( static_cast< sal_uInt16 >( nIdx ) ) )
 330             nDatePart |= spnDateParts[ nIdx ];
 331     return nDatePart;
 332 }
 333
 334 IMPL_LINK_TYPED( ScDPDateGroupDlg, ClickHdl, Button*, pButton, void )
 335 {
 336     if( pButton == mpRbNumDays )
 337     {
 338         mpLbUnits->Disable();
 339         // enable and set focus to edit field on clicking "num of days" radio button
 340         mpEdNumDays->Enable();
 341         mpEdNumDays->GrabFocus();
 342         mpBtnOk->Enable();
 343     }
 344     else if( pButton == mpRbUnits )
 345     {
 346         mpEdNumDays->Disable();
 347         // enable and set focus to listbox on clicking "units" radio button
 348         mpLbUnits->Enable();
 349         mpLbUnits->GrabFocus();
 350         // disable OK button if no date part selected
 351         CheckHdl( mpLbUnits );
 352     }
 353 }
 354
 355 IMPL_LINK_TYPED( ScDPDateGroupDlg, CheckHdl, SvTreeListBox*, pListBox, void )
 356 {
 357     // enable/disable OK button on modifying check list box
 358     if( pListBox == mpLbUnits )
 359         mpBtnOk->Enable( mpLbUnits->GetCheckedEntryCount() > 0 );
 360 }
 361
 362 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */