Skip to content

Commit

Permalink
update 13 to fix issue #1143
Browse files Browse the repository at this point in the history
  • Loading branch information
@brunobuzzi
brunobuzzi committed Jul 30, 2020
1 parent ef34a68 commit cf77a42
Show file tree
Hide file tree
Showing 32 changed files with 61 additions and 64 deletions.
2 changes: 1 addition & 1 deletion ...Core.package/BpmProcessDefinition.class/instance/getHeatMapColorsAndNumersForArtifacts.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -11,7 +11,7 @@ getHeatMapColorsAndNumersForArtifacts
porcentageDictionary := Dictionary new.

processInstances do: [:procInstance |
(procInstance getAllArtifacts, procInstance executedScripts, procInstance subprocesses) do: [:activity |
procInstance artifactsToRenderHeatMapDo: [:activity |
(countDictionary includesKey: activity getDefinitionName) ifFalse: [countDictionary at: activity getDefinitionName put: 0].
countDictionary at: activity getDefinitionName put: ((countDictionary at: activity getDefinitionName) + 1).
].
Expand Down
2 changes: 1 addition & 1 deletion repository/BpmCore.package/BpmProcessDefinition.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -125,7 +125,7 @@
"getFormDefinitionNamed:ifNone:" : "BrunoBB 02/23/2016 14:13",
"getFormsNamesWithFieldNamed:" : "brunobb 11/26/2018 08:05",
"getGatewayNamed:ifNone:" : "BrunoBB 11/28/2015 19:50",
"getHeatMapColorsAndNumersForArtifacts" : "brunobb 09/26/2019 03:33",
"getHeatMapColorsAndNumersForArtifacts" : "brunobb 07/30/2020 12:35",
"getInstancesCreationDayDistributionQuantityFrom:to:satisfying:onError:" : "brunobb 12/01/2019 08:27",
"getInstancesDayDistributionQuantityUsing:from:to:satisfying:onError:" : "brunobb 12/01/2019 08:20",
"getIntermediateEventNamed:ifNone:" : "BrunoBB 11/28/2015 19:50",
Expand Down
2 changes: 1 addition & 1 deletion repository/BpmCore.package/monticello.meta/version
View file

Large diffs are not rendered by default.

4 changes: 4 additions & 0 deletions ...itory/BpmRuntime.package/BpmProcessInstance.class/instance/artifactsToRenderHeatMapDo..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
other
artifactsToRenderHeatMapDo: aBlock

(self getAllArtifacts, executedScripts, subprocesses) do: aBlock
3 changes: 0 additions & 3 deletions repository/BpmRuntime.package/BpmProcessInstance.class/instance/subprocesses..st
View file

This file was deleted.

3 changes: 0 additions & 3 deletions repository/BpmRuntime.package/BpmProcessInstance.class/instance/subprocesses.st
View file

This file was deleted.

4 changes: 4 additions & 0 deletions repository/BpmRuntime.package/BpmProcessInstance.class/instance/subprocessesLast.st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
Accessing
subprocessesLast

^subprocesses last
4 changes: 2 additions & 2 deletions repository/BpmRuntime.package/BpmProcessInstance.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -9,6 +9,7 @@
"application" : "brunobb 01/31/2020 10:45",
"applicationName" : "brunobb 01/31/2020 10:45",
"applyAssignationPolicyOn:" : "bruno 07/23/2020 12:01",
"artifactsToRenderHeatMapDo:" : "brunobb 07/30/2020 12:34",
"asExecutionLog" : "brunobb 01/31/2020 10:45",
"assignationPolicyIsAutomatic" : "bruno 07/23/2020 12:06",
"assignedUserNames" : "brunobb 01/31/2020 10:45",
Expand Down Expand Up @@ -180,8 +181,7 @@
"states" : "brunobb 01/31/2020 10:45",
"states:" : "brunobb 01/31/2020 10:45",
"storeArtifactsToLogOn:" : "brunobb 07/30/2020 12:01",
"subprocesses" : "brunobb 01/31/2020 10:45",
"subprocesses:" : "brunobb 01/31/2020 10:45",
"subprocessesLast" : "brunobb 07/30/2020 12:08",
"taskIsDone:" : "brunobb 01/31/2020 10:45",
"throwGatewayIsNotRunningException:" : "brunobb 01/31/2020 10:45",
"throwNoSuchActivityException:" : "brunobb 01/31/2020 10:45",
Expand Down
4 changes: 0 additions & 4 deletions repository/BpmRuntime.package/BpmTaskAssignment.class/instance/subprocesses.st
View file

This file was deleted.

1 change: 0 additions & 1 deletion repository/BpmRuntime.package/BpmTaskAssignment.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -103,7 +103,6 @@
"setAssignationDate" : "brunobb 09/07/2018 11:12",
"setProcess:" : "brunobb 09/07/2018 11:12",
"setTask:" : "brunobb 07/31/2019 12:01",
"subprocesses" : "brunobb 09/07/2018 11:12",
"task" : "brunobb 09/07/2018 11:12",
"task:" : "brunobb 09/07/2018 11:12",
"taskEndDate" : "brunobb 09/07/2018 11:12",
Expand Down
2 changes: 1 addition & 1 deletion repository/BpmRuntime.package/monticello.meta/version
View file

Large diffs are not rendered by default.

4 changes: 2 additions & 2 deletions ...untime_Tests.package/EmbeddedSubProcessExecutionTest.class/instance/testExecuteProcess.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -10,15 +10,15 @@ testExecuteProcess
self assert: (script isDone).

"Step 2 - After the Script the embedded subprocess is created"
subProcessEmb := procInstance subprocesses first.
subProcessEmb := procInstance subprocessesLast.
self assert: (procInstance includesSubProcess: subProcessEmb).
self assert: subProcessEmb isSubProcess.
self assert: (subProcessEmb startEvent getDefinitionName = 'start-embedded').
self assert: (subProcessEmb hasFinalized).
endArtifact := subProcessEmb endEventsAsOrderedCollection detect: [:each | each getDefinitionName = 'end-embedded'] ifNone: [self assert: false].
self assert: endArtifact isEndEvent.

subProcessReus := procInstance subprocesses last.
subProcessReus := procInstance subprocessesLast.
self assert: (procInstance includesSubProcess: subProcessReus).
self assert: subProcessReus isSubProcess.
self assert: (subProcessReus startEvent getDefinitionName = 'start-resusable').
Expand Down
2 changes: 1 addition & 1 deletion ...tory/BpmRuntime_Tests.package/EmbeddedSubProcessExecutionTest.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@
"createProcessDefinition" : "brunobb 06/05/2020 10:49",
"setUp" : "brunobb 09/26/2019 04:21",
"tearDown" : "brunobb 02/26/2020 10:27",
"testExecuteProcess" : "brunobb 09/26/2019 04:19",
"testExecuteProcess" : "brunobb 07/30/2020 12:13",
"testTransitionTreePossibleLoops" : "brunobb 08/16/2019 12:11",
"testTransitionTreePossiblePaths" : "brunobb 08/16/2019 12:11",
"testTransitionTreePossiblePathsToEnd" : "brunobb 08/16/2019 12:12" } }
2 changes: 1 addition & 1 deletion ...untime_Tests.package/ErrorProcessWithSubProcExecutionTest.class/instance/testProcessOk.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@ testProcessOk
"Step 1 - It create the subprocess immediately"

"Sub Process Execution [form-process] starts here "
subProcess := procInstance subprocesses last.
subProcess := procInstance subprocessesLast.
subProcId := subProcess id.
currentTask := subProcess currentActivities last.
self assert: currentTask getDefinitionName equals: 'dashboard-form'.
Expand Down
2 changes: 1 addition & 1 deletion ...ithSubProcExecutionTest.class/instance/testProcessTriggerErrorEventCode_1_finishedTask.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@ testProcessTriggerErrorEventCode_1_finishedTask
"Step 1 - It create the subprocess immediately"

"Sub Process Execution [form-process] starts here "
subProcess := procInstance subprocesses last.
subProcess := procInstance subprocessesLast.
currentTask := subProcess currentActivities last.
self assert: currentTask getDefinitionName equals: 'dashboard-form'.
formInstance := self formInstance_withValues: self generateRandomValues in: subProcess.
Expand Down
2 changes: 1 addition & 1 deletion ...WithSubProcExecutionTest.class/instance/testProcessTriggerErrorEventCode_1_pendingTask.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@ testProcessTriggerErrorEventCode_1_pendingTask
"Step 1 - It create the subprocess immediately"

"Sub Process Execution [form-process] starts here "
subProcess := procInstance subprocesses last.
subProcess := procInstance subprocessesLast.
currentTask := subProcess currentActivities last.
self assert: currentTask getDefinitionName equals: 'dashboard-form'.
formInstance := self formInstance_withValues: self generateRandomValues in: subProcess.
Expand Down
2 changes: 1 addition & 1 deletion ...ErrorProcessWithSubProcExecutionTest.class/instance/testProcessTriggerErrorEventCode_9.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@ testProcessTriggerErrorEventCode_9
"Step 1 - It create the subprocess immediately"
procId := procInstance id.
"Sub Process Execution [form-process] starts here "
subProcess := procInstance subprocesses last.
subProcess := procInstance subprocessesLast.
subProcId := subProcess id.
currentTask := subProcess currentActivities last.
self assert: currentTask getDefinitionName equals: 'dashboard-form'.
Expand Down
8 changes: 4 additions & 4 deletions ...BpmRuntime_Tests.package/ErrorProcessWithSubProcExecutionTest.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -7,11 +7,11 @@
"generateRandomValues" : "brunobb 08/05/2019 07:57",
"setUp" : "brunobb 08/05/2019 07:57",
"tearDown" : "brunobb 02/26/2020 10:29",
"testProcessOk" : "brunobb 08/06/2019 09:37",
"testProcessTriggerErrorEventCode_1_finishedTask" : "brunobb 08/06/2019 08:52",
"testProcessTriggerErrorEventCode_1_pendingTask" : "brunobb 08/06/2019 10:08",
"testProcessOk" : "brunobb 07/30/2020 12:10",
"testProcessTriggerErrorEventCode_1_finishedTask" : "brunobb 07/30/2020 12:09",
"testProcessTriggerErrorEventCode_1_pendingTask" : "brunobb 07/30/2020 12:09",
"testProcessTriggerErrorEventCode_2" : "brunobb 08/06/2019 07:59",
"testProcessTriggerErrorEventCode_9" : "brunobb 08/06/2019 09:28",
"testProcessTriggerErrorEventCode_9" : "brunobb 07/30/2020 12:09",
"testTransitionTreePossibleLoops" : "brunobb 08/16/2019 12:13",
"testTransitionTreePossiblePaths" : "brunobb 08/16/2019 12:13",
"testTransitionTreePossiblePathsToEnd" : "brunobb 08/16/2019 08:33" } }
4 changes: 2 additions & 2 deletions .../VisaApplianceProcessExecutionTest.class/instance/resumeAssignFromTask3AndTestProcess..st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -20,7 +20,7 @@ resumeAssignFromTask3AndTestProcess: aBpmProcessInstance
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := aBpmProcessInstance subprocesses last.
subProcessL1 := aBpmProcessInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -46,7 +46,7 @@ resumeAssignFromTask3AndTestProcess: aBpmProcessInstance
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...ackage/VisaApplianceProcessExecutionTest.class/instance/resumeFromTask3AndTestProcess..st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ resumeFromTask3AndTestProcess: aBpmProcessInstance
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := aBpmProcessInstance subprocesses last.
subProcessL1 := aBpmProcessInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand Down Expand Up @@ -55,7 +55,7 @@ resumeFromTask3AndTestProcess: aBpmProcessInstance
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ....package/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_issue_366.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -39,7 +39,7 @@ testExecuteProcess_issue_366
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -65,7 +65,7 @@ testExecuteProcess_issue_366
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ....package/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_issue_373.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -55,7 +55,7 @@ testExecuteProcess_issue_373
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -81,7 +81,7 @@ testExecuteProcess_issue_373
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...age/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAborted_03.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -48,7 +48,7 @@ testExecuteProcess_visaAborted_03
self assert: ((procDefinition getCollectionForFieldsNamed: 'expirationDate[d]' in: 'check-previous-appliance') select: [:fieldValue | fieldValue processId = processId]) notEmpty.

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand Down Expand Up @@ -81,7 +81,7 @@ testExecuteProcess_visaAborted_03
self assert: ((subProcessL1 definition getCollectionForFieldsNamed: 'offenseExpiration[d]' in: 'applicant-home-office-report') select: [:fieldValue | fieldValue processId = subProcId]) notEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
self assert: procInstance isRunning.
self assert: subProcessL1 isRunning.
self assert: subProcessL2 isRunning.
Expand Down
2 changes: 1 addition & 1 deletion ...lianceProcessExecutionTest.class/instance/testExecuteProcess_visaAborted_SubProc_L1_01.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -46,7 +46,7 @@ testExecuteProcess_visaAborted_SubProc_L1_01
self assert: ((procDefinition getCollectionForFieldsNamed: 'citizenId[n]' in: 'check-previous-appliance') select: [:fieldValue | fieldValue processId = processId]) notEmpty.
self assert: ((procDefinition getCollectionForFieldsNamed: 'expirationDate[d]' in: 'check-previous-appliance') select: [:fieldValue | fieldValue processId = processId]) notEmpty.
"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...lianceProcessExecutionTest.class/instance/testExecuteProcess_visaAborted_SubProc_L2_01.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -45,7 +45,7 @@ testExecuteProcess_visaAborted_SubProc_L2_01
self assert: ((procDefinition getCollectionForFieldsNamed: 'citizenId[n]' in: 'check-previous-appliance') select: [:fieldValue | fieldValue processId = processId]) notEmpty.
self assert: ((procDefinition getCollectionForFieldsNamed: 'expirationDate[d]' in: 'check-previous-appliance') select: [:fieldValue | fieldValue processId = processId]) notEmpty.
"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand Down Expand Up @@ -75,7 +75,7 @@ testExecuteProcess_visaAborted_SubProc_L2_01
self assert: ((subProcessL1 definition getCollectionForFieldsNamed: 'offenseExpiration[d]' in: 'applicant-home-office-report') select: [:fieldValue | fieldValue processId = subProcId]) notEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...ckage/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAccepted.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -38,7 +38,7 @@ testExecuteProcess_visaAccepted
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -64,7 +64,7 @@ testExecuteProcess_visaAccepted
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...saApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAcceptedPaused01.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -59,7 +59,7 @@ testExecuteProcess_visaAcceptedPaused01
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand Down Expand Up @@ -95,7 +95,7 @@ testExecuteProcess_visaAcceptedPaused01
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...ge/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAccepted_04.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -38,7 +38,7 @@ testExecuteProcess_visaAccepted_04
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -64,7 +64,7 @@ testExecuteProcess_visaAccepted_04
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...ge/VisaApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAccepted_05.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -38,7 +38,7 @@ testExecuteProcess_visaAccepted_05
self assert: ((finishedProcessMatrix getAvailableTasksFor: 'visa manager' satisfying: {:assign | assign.processId = processId}) size = 1).

"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
subProcId := subProcessL1 id.
subProcCurrentMatrix := subProcessL1 getAvailableProcessMatrix.
subProcFinishedMatrix := subProcessL1 getFinishedProcessMatrix.
Expand All @@ -64,7 +64,7 @@ testExecuteProcess_visaAccepted_05
self assert: (subProcCurrentMatrix getAvailableTasksFor: 'visa checker' satisfying: {:assign | assign.processId = subProcId}) isEmpty.

"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
subProc2Id := subProcessL2 id.
subProc2CurrentMatrix := subProcessL2 getAvailableProcessMatrix.
subProc2FinishedMatrix := subProcessL2 getFinishedProcessMatrix.
Expand Down
4 changes: 2 additions & 2 deletions ...ApplianceProcessExecutionTest.class/instance/testExecuteProcess_visaAnalizeAndRejected.st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,7 @@ testExecuteProcess_visaAnalizeAndRejected
self processExecutionSimulator takeAndFinalizeTask: currentTask withUserNamed: 'andrew vm' withForm: self formInstance_check_previous_appliance on: procInstance.
self assert: (currentTask getDefinitionName = 'check-previous-appliance').
"Sub Process Execution [home-office-check] starts here "
subProcessL1 := procInstance subprocesses last.
subProcessL1 := procInstance subprocessesLast.
self assert: (procInstance includesSubProcess: subProcessL1).
self assert: subProcessL1 isSubProcess.
self assert: (subProcessL1 startEvent getDefinitionName = 'start visa check').
Expand All @@ -34,7 +34,7 @@ testExecuteProcess_visaAnalizeAndRejected
self processExecutionSimulator takeAndFinalizeTask: currentTask withUserNamed: 'andrew vc' withForm: (self formInstance_applicant_home_office_report: subProcessL1) on: subProcessL1.
self assert: (currentTask getDefinitionName = 'applicant-home-office-report').
"Sub Process Execution [check-financial-data]"
subProcessL2 := subProcessL1 subprocesses last.
subProcessL2 := subProcessL1 subprocessesLast.
self assert: (subProcessL1 includesSubProcess: subProcessL2).
self assert: subProcessL2 isSubProcess.
self assert: (subProcessL2 startEvent getDefinitionName = 'start financial check').
Expand Down
Loading

0 comments on commit cf77a42

Please sign in to comment.