blob: 7219e7ed763635d0864e19d621c19874cfbe44df [file] [log] [blame]
--- RCPTT testcase ---
Format-Version: 1.0
Contexts: _mY5uUKEgEeKX8e34E6tWIg,_rr2EEFpSEeKcnaHGSt8OwA,_IuFcgFpZEeKcnaHGSt8OwA,_f3qEUVpSEeKcnaHGSt8OwA,_fQ0PgDsqEeOHj9Cw0T_k4Q,_T7Yg8DstEeOHj9Cw0T_k4Q
Element-Name: ReadOnlyBoolean
Element-Type: testcase
Element-Version: 3.0
External-Reference:
Id: _ZLkdoDssEeOHj9Cw0T_k4Q
Runtime-Version: 1.5.4.201412181238
Save-Time: 11/20/15 11:18 PM
Testcase-Type: ecl
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac
Content-Type: text/ecl
Entry-Name: .content
try {
get-editor View | get-button "Link Root EClass" | click
get-window "Select an EClass." | get-tree | select "bowling/Player \\[org.eclipse.emf.emfstore.bowling.Player\\]"
| double-click
get-view "Model Explorer" | get-tree | select "Project/View" | get-menu Control | click
get-editor Control | get-editbox -after [get-label "Name*"] | set-text IsProfessional
get-editor IsProfessional | get-button -after [get-label Readonly] | check
get-editor IsProfessional | get-button "Create and link new Domain Model Reference" | click
with [get-window "New Reference Element"] {
get-tree | select "model/FeaturePathDomainModelReference"
get-button "Next >" | click
get-button "Link Domain Model EFeature" | click
with [get-window "Select a EStructuralFeature"] {
get-tree | select "isProfessional : EBoolean"
get-button OK | click
}
get-button Finish | click
}
with [get-view "Model Explorer"] {
try {
get-tree | select Project
get-button "Save Project" | click
} -catch {
wait 1000
try {
get-tree | select "Project/View"
get-button "Save Project" | click
} -catch {
wait 1000
get-tree | select Project
get-button "Save Project" | click
}
}
}
get-editor "Player John" | close
get-editor View | click
get-view "Model Explorer" | get-tree | select "TestProject/Player John" | double-click
get-editor "Player John" | get-button -after [get-label "Is Professional"] | get-property enablement | equals false
| verify-true
} -finally {
/*
get-view "Model Explorer" | get-tree | select "Project/View" | double-click
get-editor View | get-button "Delete Reference" | click
with [get-view "Model Explorer"] {
try {
get-tree | select Project
get-button "Save Project" | click
} -catch {
wait 1000
try {
get-tree | select "Project/View"
get-button "Save Project" | click
} -catch {
wait 1000
get-tree | select Project
get-button "Save Project" | click
}
}
}
*/
get-view "Model Explorer" | get-tree | select "Project/View" | get-menu "Unset Root EClass" | click
}
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac--