rcpttTests/platform_tests/q7Explorer/CloseUnrelatedProjectsInQ7Explorer.test

--- RCPTT testcase ---
Format-Version: 1.0
Q7-vendor: www.xored.com/q7
Contexts: _4zI9AWpgEeCzId1Gnkds9A,_vp_JkIHtEeC8fpRZXBpN8g,_oqKMAcxwEeCsOcWBSgorcQ
Element-Name: CloseUnrelatedProjectsInQ7Explorer
Element-Type: testcase
Element-Version: 3.0
External-Reference: 
Id: _n3bH8MmFEeCVO9X7TqWdlg
Q7-Runtime-Version: 1.5.0.201406131029
Save-Time: 6/13/14 7:04 PM
Tags: Q7Explorer, Project
Testcase-Type: ecl

------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa
Content-Type: text/plain
Entry-Name: .description

Copyright (c) 2009, 2014 Xored Software Inc and others.
All rights reserved. This program and the accompanying materials
are made available under the terms of the Eclipse Public License v1.0
which accompanies this distribution, and is available at
http://www.eclipse.org/legal/epl-v10.html

Contributors:
    Xored Software Inc - initial creation and/or initial documentation
--------------------------------------------------------------------------------

1. Select project with reference
2. Select "Close Unrelated Projects" in context menu
3. Make sure that p3 project is closed, but is displayed in Q7 Explorer
4. Make sure that for p1 and p2 projects the "Close Unrelated Project" point is disabled in context menu
5. Make sure that for p3 project the "Open Project" point is enabled in context menu 
------=_.description-216f885c-d591-38ce-8ea2-e4f8cb4d6ffa--
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac
Content-Type: text/ecl
Entry-Name: .content

get-view "Test Explorer" | get-tree | select p2 | get-menu Properties | click
with [get-window "Properties for p2"] {
    get-tree | select "Project References"
    with [get-table] {
        get-item p1 | check
    }
    get-button OK | click
}
get-view "Test Explorer" | get-tree | select p2 | get-menu "Close Unrelated Projects" | click
get-view "Test Explorer" | get-tree | get-property itemCount | equals 3 | verify-true
with [get-view "Test Explorer" | get-tree] {
    get-item p1 | get-property caption | equals p1 | verify-true
    get-item p1 | get-property childCount | equals 4 | verify-true
    get-item p2 | get-property caption | equals p2 | verify-true
    get-item p2 | get-property childCount | equals 3 | verify-true
    get-item p3 | get-property caption | equals p3 | verify-true
    get-item p3 | get-property childCount | equals 0 | verify-true
}
get-view "Test Explorer" | get-tree | select p1
with [get-view "Test Explorer" | get-tree] {
    get-menu "Close Unrelated Projects" | get-property caption | equals "Close &Unrelated Projects" | verify-true
    get-menu "Close Unrelated Projects" | get-property enablement | equals false | verify-true
    get-menu "Close Unrelated Projects" | get-property caption | equals "Close &Unrelated Projects" | verify-true
    get-menu "Close Unrelated Projects" | get-property enablement | equals false | verify-true
}
get-view "Test Explorer" | get-tree | select p3
with [get-view "Test Explorer" | get-tree] {
    get-menu "Open Project" | get-property caption | equals "Op&en Project" | verify-true
    get-menu "Open Project" | get-property enablement | equals true | verify-true
}
------=_.content-0a7243a0-75d3-3d5f-9791-539de0e5b7ac--