1 pload DCAF INSPECTOR TOPTEST
3 # Create the first document and set UndoLimit
4 NewDocument Doc1 BinOcaf
7 # Add an attribute to a data framework
10 SetInteger Doc1 ${aLabel} ${aSetAttr1}
13 # Create the second document
14 set test_name "OCC26961"
16 set test_real 123.456e-7
17 set test_int_arr {10 20}
18 set test_real_arr {1.1 3.14 5.4e18}
19 set test_extstr_arr {"sample string 1" "string 2"}
20 set test_bool_arr {0 1}
21 set test_ref_arr {"0:1:2:3:2" "0:1:2:3:1"}
22 set test_byte_arr {15 25}
23 set test_map {1 5 2 10}
24 set test_map_sorted {1 2 5 10}
25 set test_named_ints {i1 1 i2 2}
26 set test_named_reals {r1 1.1 r2 2.2}
27 set test_named_strings {s1 string1 s2 string2 s3 string3_string_extended s4 string4_double_extended s5 string5}
28 set test_named_bytes {b1 65 b2 66}
30 set test_guid "00000000-0000-0000-2222-000000000000"
31 set test_comment "Sample document containing various attributes"
32 set test_string "Sample string"
33 set test_expr "2*pi*r"
34 set test_var1 "0:1:2:3:2"
35 set test_var2 "0:1:2:3:1"
36 set test_point "111 222 333"
37 set test_axisPos "10 10 30"
38 set test_axisDir "11 22 33"
39 set test_plane "15 25 35"
40 set test_boxXYZ "10 20 30"
47 set test_driver_id "2a96b604-ec8b-11d0-bee7-080009dc3333"
49 set test_color AQUAMARINE4
51 set test_positionX 100
52 set test_positionY 200
53 set test_positionZ 300
55 puts "Creating document"
59 SetInteger D 0:1:1 $test_int
60 SetReal D 0:1:1 $test_real
61 SetName D 0:1:1 $test_name
62 SetComment D 0:1:1 $test_comment
63 SetAsciiString D 0:1:1 $test_string
69 SetReference D 0:1:3 $test_ref
72 #NewDirectory D 0:1:2:1
75 #SetUAttribute D 0:1:2:2 $test_guid
78 SetVariable D $test_var2 0 mm
79 SetVariable D $test_var1 1 ""
82 SetRelation D 0:1:2:3 "2*pi*r" $test_var1 $test_var2
88 eval SetIntArray D 0:1:1 1 1 2 $test_int_arr
89 eval SetRealArray D 0:1:1 1 1 3 $test_real_arr
90 eval SetExtStringArray D 0:1:1 1 1 2 $test_extstr_arr
91 eval SetRefArray D 0:1:1 1 2 $test_ref_arr
92 eval SetByteArray D 0:1:1 1 1 2 $test_byte_arr
95 eval SetIntegerList D 0:1:1 $test_int_arr
96 eval SetRealList D 0:1:1 $test_real_arr
97 eval SetExtStringList D 0:1:1 $test_extstr_arr
98 eval SetBooleanList D 0:1:1 $test_bool_arr
99 eval SetReferenceList D 0:1:1 $test_ref_arr
102 eval SetIntPackedMap D 0:1:1 1 $test_map
105 eval SetNDataIntegers D 0:1:4 2 $test_named_ints
106 eval SetNDataReals D 0:1:4 2 $test_named_reals
107 eval SetNDataStrings D 0:1:4 5 $test_named_strings
108 eval SetNDataBytes D 0:1:4 2 $test_named_bytes
109 eval SetNDataIntArrays D 0:1:4 ia 2 $test_int_arr
110 eval SetNDataRealArrays D 0:1:4 ra 3 $test_real_arr
113 eval box Box $test_boxXYZ $test_boxDX $test_boxDY $test_boxDZ
117 eval point Point $test_point
118 SetPoint D 0:1:5:1 Point
121 eval line Axis $test_axisPos $test_axisDir
122 SetAxis D 0:1:5:2 Axis
125 eval plane Plane $test_plane
126 SetPlane D 0:1:5:3 Plane
129 SetGeometry D 0:1:6 $test_geom_t
132 SetConstraint D 0:1:1 equal 0:1:6
135 SetPattern D 0:1:1 5 0:1:6
138 SetFunction D 0:1:1 $test_guid $test_failure
142 AISSet D 0:1:1 $test_driver
143 AISTransparency D 0:1:1 $test_transp
144 AISColor D 0:1:1 $test_color
145 AISMaterial D 0:1:1 $test_material
148 SetPosition D 0:1:1 $test_positionX $test_positionY $test_positionZ
150 tinspector -plugins dfbrowser