[otrs-cvs] ITSMChangeManagement/Kernel/System/ITSMChange ITSMWorkOrder.pm, 1.135, 1.136

Comments:
Update of /home/cvs/ITSMChangeManagement/Kernel/System/ITSMChange
In directory lancelot:/tmp/cvs-serv9561/Kernel/System/ITSMChange

Modified Files:
	ITSMWorkOrder.pm 
Log Message:
Fixed bug# 8803 - Lock does not work for all workorder states.

Author: ub

Index: ITSMWorkOrder.pm
===================================================================
RCS file: /home/cvs/ITSMChangeManagement/Kernel/System/ITSMChange/ITSMWorkOrder.pm,v
retrieving revision 1.135
retrieving revision 1.136
diff -2 -u -d -r1.135 -r1.136
--- ITSMWorkOrder.pm	5 Feb 2013 20:25:51 -0000	1.135
+++ ITSMWorkOrder.pm	31 May 2013 13:59:30 -0000	1.136
@@ -1973,10 +1973,20 @@
         );
 
-        # set as default state current state and all possible end states
-        my $EndStateIDsRef = $Self->{StateMachineObject}->StateTransitionGetEndStates(
-            StateID => $WorkOrder->{WorkOrderStateID},
-            Class   => 'ITSM::ChangeManagement::WorkOrder::State',
-        ) || [];
-        my @NextStateIDs = sort ( @{$EndStateIDsRef}, $WorkOrder->{WorkOrderStateID} );
+        # set as default state current workorder state
+        my @NextStateIDs = ( $WorkOrder->{WorkOrderStateID} );
+
+        # check if reachable workorder end states should be allowed for locked workorder states
+        my $WorkOrderEndStatesAllowed
+            = $Self->{ConfigObject}->Get('ITSMWorkOrder::StateLock::AllowEndStates');
+
+        if ($WorkOrderEndStatesAllowed) {
+
+            # set as default state current state and all possible end states
+            my $EndStateIDsRef = $Self->{StateMachineObject}->StateTransitionGetEndStates(
+                StateID => $WorkOrder->{WorkOrderStateID},
+                Class   => 'ITSM::ChangeManagement::WorkOrder::State',
+            ) || [];
+            @NextStateIDs = sort ( @{$EndStateIDsRef}, $WorkOrder->{WorkOrderStateID} );
+        }
 
         # get possible next states if no state lock
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log