--Goal oriented Pattern Family Framework for Business Process Modeling / Saeed Ahmadi Behnam 
--Modify the PATH in the following to point ot metamodle (e.g., C:/USE_OCL/GoPF_FMM )
reset
open PATH

!create p1 : Pattern


!set p1.name := 'IncreasePatientSafetyPattern'

!insert (pf,p1) into hasPattern


!create g1 : GoalModelBB


!insert (p1,g1) into hasGMBB


!set g1.name := 'IncreasePatientSafetyGoalModelBB'



!create I : Intention
!create C : Intention
!create G : Intention
!create M : Intention
!create A : Intention

--Modification
!create T2 : Intention
--End of Modification



!set I.name := 'IncreasePatientSafety'
!set I.leaf := false
!set I.mainGoal := true
!set C.name := 'CollectData'
!set C.leaf := true
!set C.mainGoal := false
!set G.name := 'GenerateInformativeOI'
!set G.leaf := true
!set G.mainGoal := false
!set M.name := 'MakeDecision'
!set M.leaf := true
!set M.mainGoal := false
!set A.name := 'ApplyKnowledge'
!set A.leaf := true
!set A.mainGoal := false

--Modification
!set A.name := 'TakeAction'
!set A.leaf := true
!set A.mainGoal := false
--End of Modification



!insert (g1,I) into hasIntention
!insert (g1,C) into hasIntention
!insert (g1,G) into hasIntention
!insert (g1,M) into hasIntention
!insert (g1,A) into hasIntention


--Modification
!insert (g1,T2) into hasIntention
--End of Modification


!create bs1_1 : BusinessStrategy
!create bs1_2 : BusinessStrategy




!set bs1_1.name := 'BasicImprovement'
!set bs1_2.name := 'AdvancedImprovement'




!insert (p1,bs1_1) into hasBizStrategy
!insert (p1,bs1_2) into hasBizStrategy



!create s1_1 : EvaluationStrategy
!create s1_2 : EvaluationStrategy


!set s1_1.name := 'BasicImprovement'
!set s1_2.name := 'AdvancedImprovement'


!insert (bs1_1,s1_1) into hasEvalStrategy
!insert (bs1_2,s1_2) into hasEvalStrategy



!create bpt1_1 : BusinessProcessBB
!create bpt1_2 : BusinessProcessBB



!set bpt1_1.name := 'BasicImprovement'
!set bpt1_2.name := 'AdvancedImprovement'



!insert (bs1_1,bpt1_1) into hasBPBB
!insert (bs1_2,bpt1_2) into hasBPBB




-- elements of BPT (UCM maps) are created and assigned to BusinessProcessTemplates

!create CPs1_1 : ProcessElement
!create GPs1_1 : ProcessElement
!set CPs1_1.name := 'CollectingData'
!set GPs1_1.name := 'GeneratingInformativeOI'
!insert (bpt1_1,CPs1_1) into hasPE
!insert (bpt1_1,GPs1_1) into hasPE

!create CPs1_2 : ProcessElement
!create GPs1_2 : ProcessElement
!create MPs1_2 : ProcessElement
!create APs1_2 : ProcessElement
!set CPs1_2.name := 'CollectingData'
!set GPs1_2.name := 'GeneratingInformativeOI'
!set MPs1_2.name := 'MakingDecision'
!set APs1_2.name := 'ApplyingKnowledge'
!insert (bpt1_2,CPs1_2) into hasPE
!insert (bpt1_2,GPs1_2) into hasPE
!insert (bpt1_2,MPs1_2) into hasPE
!insert (bpt1_2,APs1_2) into hasPE





-- Intention Realization
!insert (C,CPs1_1) into realized
!insert (G,GPs1_1) into realized


!insert (C,CPs1_2) into realized
!insert (G,GPs1_2) into realized
!insert (M,MPs1_2) into realized
!insert (A,APs1_2) into realized