e13b9464 |
1 | puts "REQUIRED All: Cannot retrieve real member for RealArray attribute" |
6d1e872b |
2 | |
61c421bf |
3 | puts "================" |
4 | puts "OCC2269" |
5 | puts "================" |
6 | puts "" |
7 | ####################################################################################### |
7b5e532f |
8 | # XML persistence should be more robust |
61c421bf |
9 | ####################################################################################### |
10 | # |
11 | # Tested file is contains 3 labels with TDataStd_RealArray attributes |
12 | # 0:2 label has good TDataStd_RealArray attribute |
13 | # 0:22 label has bad TDataStd_RealArray attribute |
14 | # 0:222 label has good TDataStd_RealArray attribute |
15 | # |
16 | ####################################################################################### |
17 | |
18 | #set ScriptDir $XmlDir |
19 | #source ${ScriptDir}/begin |
20 | #source ${ScriptDir}/002/begin |
21 | |
22 | #set aTestName "OCC2269" |
23 | #set WorkDirectory ${filedir} |
24 | #set aFile $WorkDirectory/${aTestName}.${FileSuffix} |
25 | #catch {Close D} |
26 | |
27 | set IsGood 1 |
28 | Open [locate_data_file OCC2269.xml] DD |
29 | |
30 | if [catch {XDumpDF DD } result] { |
31 | puts "Error during dump ${aFile} file" |
32 | set IsGood 0 |
33 | } |
34 | if [catch {CheckLabel DD 0:2} result] { |
35 | puts "Error during search 0:2 label in ${aFile} file" |
36 | set IsGood 0 |
37 | } |
38 | if [catch {CheckLabel DD 0:22} result] { |
39 | puts "Error during search 0:22 label in ${aFile} file" |
40 | set IsGood 0 |
41 | } |
42 | if [catch {CheckLabel DD 0:222} result] { |
43 | puts "Error during search 0:222 label in ${aFile} file" |
44 | set IsGood 0 |
45 | } |
46 | |
47 | Close DD |
48 | |
49 | if { ${IsGood} == 0} { |
50 | puts "Faulty OCC2269" |
51 | } else { |
52 | puts "OK OCC2269" |
53 | } |