Quintiq file version 2.0
|
#parent: #root
|
Method UIEnableDisableComponent (
|
Boolean isInit
|
) id:Method_DialogCreateEditUnit_UIEnableDisableComponent
|
{
|
#keys: '[135040.0.219561692]'
|
Body:
|
[*
|
isBatchMode := DataHolderDialogDatas.Data().Size() > 1;
|
|
batchValidityActive := not CheckBoxBatchEditValidity.Visible()
|
or CheckBoxBatchEditValidity.Checked();
|
|
// Enable / disable validity start
|
hasValidityStartScrValue := CheckboxHasStart.Checked();
|
hasValidityStartDataValue := guard( DataHolderDialogData.Data().StartDate().DateTime().IsFinite(), false );
|
hasValidityStartValue := ifexpr( isInit
|
,hasValidityStartDataValue
|
,hasValidityStartScrValue );
|
dsStart.Enabled( hasValidityStartValue
|
and batchValidityActive, "" );
|
|
validityStartScrValue := dsStart.Date();
|
validityStartDataValue := guard( DataHolderDialogData.Data().StartDate(), Date::MinDate() ); //todo!! setting DateTime::MinDateTime() into datetimeSelector return strange value "Jan-1-0001 00:08:39". potential RFC?
|
validityStartValue := ifexpr( isInit
|
,validityStartDataValue
|
,validityStartScrValue );
|
|
if( hasValidityStartValue and not isInit ) //user action check
|
{
|
defaultStart := MacroPlan.Start().Date();
|
if( not isnull( selParentUnit.Data() )
|
and guard( selParentUnit.Data().StartDate().IsFinite(), false ) )
|
{
|
defaultStart := selParentUnit.Data().StartDate();
|
}
|
|
start := ifexpr( validityStartValue.IsFinite() //todo!! setting DateTime::MinDateTime() into datetimeSelector return strange value "Jan-1-0001 00:08:39", hence, only get Date. Potential RFC?
|
,validityStartValue
|
,defaultStart );
|
dsStart.Date( start );
|
}
|
else if( not hasValidityStartValue and not isInit ) //user action uncheck
|
{
|
dsStart.Date( Date::MinDate() );
|
}
|
|
// Enable / disable validity end
|
hasValidityEndScrValue := CheckboxHasEnd.Checked();
|
hasValidityEndDataValue := guard( DataHolderDialogData.Data().EndDate().DateTime().IsFinite(), false );
|
hasValidityEndValue := ifexpr( isInit
|
,hasValidityEndDataValue
|
,hasValidityEndScrValue );
|
dsEnd.Enabled( hasValidityEndValue
|
and batchValidityActive, "" );
|
|
validityEndScrValue := dsEnd.Date();
|
validityEndDataValue := guard( DataHolderDialogData.Data().EndDate(), Date::MaxDate() );
|
validityEndValue := ifexpr( isInit
|
,validityEndDataValue
|
,validityEndScrValue );
|
|
if( hasValidityEndValue and not isInit ) //user action check
|
{
|
defaultEnd := MacroPlan.End().Date();
|
|
if( not isnull( selParentUnit.Data() )
|
and guard( selParentUnit.Data().EndDate().IsFinite(), false ) )
|
{
|
defaultEnd := selParentUnit.Data().EndDate();
|
}
|
|
end := ifexpr( validityEndValue.IsFinite()
|
,validityEndValue
|
,defaultEnd );
|
dsEnd.Date( end );
|
}
|
else if( not hasValidityEndValue and not isInit ) //user action uncheck
|
{
|
dsEnd.Date( Date::MaxDate() );
|
}
|
|
// Enable / disable UserFrozenFutureDuration
|
hasUserFrozenDurationScrValue := CheckboxUserFrozenFutureDuration.Checked();
|
hasUserFrozenDurationDataValue := guard( DataHolderDialogData.Data().HasUserFrozenFutureDuration(), false );
|
hasUserFrozenDurationValue := ifexpr( isInit
|
,hasUserFrozenDurationDataValue
|
,hasUserFrozenDurationScrValue );
|
|
batchMiscActive := not CheckBoxBatchEditMisc.Visible()
|
or CheckBoxBatchEditMisc.Checked();
|
|
DurationSelectorUserFrozenFutureDuration.Enabled( hasUserFrozenDurationValue
|
and batchMiscActive
|
, "" );
|
|
// Check Capacity type for TransportUnit, for disabling CapacitySmoothing & CapacityUsage
|
capacityTypeScrValue := RadioButtonGroupCapacityType.BoundValue()
|
capacityTypeDataValue := guard( DataHolderDialogData.Data().CapacityType(), GlobalParameters_MP::GetCapacityTypeInfinite() );
|
capacityType := ifexpr( isInit
|
,capacityTypeDataValue
|
,capacityTypeScrValue );
|
|
istransport := capacityType = GlobalParameters_MP::GetCapacityTypeTransportTime()
|
or capacityType = GlobalParameters_MP::GetCapacityTypeTransportQuantity();
|
//
|
|
// Enable / disable capacity smoothing components & EditFieldCapacitySmoothingLength
|
hasCapacitySmoothingScrValue := CheckBoxHasCapacitySmoothing.Checked();
|
hasCapacitySmoothingDataValue := guard( DataHolderDialogData.Data().HasCapacitySmoothing(), false );
|
hasCapacitySmoothingValue := ifexpr( isInit
|
,hasCapacitySmoothingDataValue
|
,hasCapacitySmoothingScrValue );
|
|
isSmoothCapacityOverAllPeriodsScrValue := [Boolean] RadioButtonGroupIsSmoothCapacityOverAllPeriods.BoundValue();
|
isSmoothCapacityOverAllPeriodsDataValue := guard( DataHolderDialogData.Data().IsSmoothCapacityOverAllPeriods(), false );
|
|
isSmoothCapacityOverAllPeriodsValue := ifexpr( isInit
|
,isSmoothCapacityOverAllPeriodsDataValue
|
,isSmoothCapacityOverAllPeriodsScrValue );
|
|
CheckBoxHasCapacitySmoothing.Enabled ( not istransport
|
and not isBatchMode, "" );
|
RadioButtonGroupUsingOutputForCapacity.Enabled ( not istransport
|
and not isBatchMode, "" );
|
|
EditFieldCapacitySmoothingPercentageDelta.Enabled ( not istransport
|
and not isBatchMode
|
and hasCapacitySmoothingValue, "" );
|
RadioButtonGroupIsSmoothCapacityOverAllPeriods.Enabled( not istransport
|
and not isBatchMode
|
and hasCapacitySmoothingValue, "" );
|
CheckboxIsOverlapCapacitySmoothing.Enabled ( not istransport
|
and not isBatchMode
|
and hasCapacitySmoothingValue, "" );
|
EditFieldCapacitySmoothingLength.Enabled ( not istransport
|
and not isBatchMode
|
and hasCapacitySmoothingValue
|
and not isSmoothCapacityOverAllPeriodsValue, "" );
|
|
|
// Enable / disable lotSize maximum quantity editor
|
hasMaximumScrValue := CheckboxMaximumQuantity.Checked();
|
hasMaximumDataValue := guard( DataHolderDialogData.Data().HasMaximumQuantity(), false );
|
hasMaximumValue := ifexpr( isInit
|
,hasMaximumDataValue
|
,hasMaximumScrValue );
|
|
|
EditFieldMaximumQuantity.Enabled( not istransport
|
and not isBatchMode
|
and hasMaximumValue ,"" );
|
|
|
// Enable / disable LotSize tab's component (since we cannot disable tab pages)
|
disableLotSizeFeedback := '';
|
if( istransport )
|
{
|
disableLotSizeFeedback := ifexpr( capacityType = GlobalParameters_MP::GetCapacityTypeTransportTime()
|
,Translations::MP_Designer_WebDialogUnit_FeedbackDisableTransportTimeVolumeTab()
|
,Translations::MP_Designer_WebDialogUnit_FeedbackDisableTransportQuantityVolumeTab() );
|
}
|
|
EditFieldMinimumQuantity.Enabled( not istransport
|
and not isBatchMode, disableLotSizeFeedback );
|
EditFieldLotSize.Enabled ( not istransport
|
and not isBatchMode, disableLotSizeFeedback );
|
CheckboxMaximumQuantity.Enabled( not istransport
|
and not isBatchMode, disableLotSizeFeedback );
|
|
// Enable / disable CheckboxUseShiftPatternOptimization
|
istime := capacityType = GlobalParameters_MP::GetCapacityTypeTime()
|
or capacityType = GlobalParameters_MP::GetCapacityTypeTimeAggregation();
|
|
CheckboxUseShiftPatternOptimization.Enabled( istime,
|
Translations::MP_Designer_WebDialogUnit_FeedbackDisableAllowShiftPatternOptimization() );
|
*]
|
}
|
