7 NewDocument D MDTV-Standard
17 set Result [BUC60831_1 D]
18 if { ${Result} != 0 } {
19 puts "BUC60831: Error 1"
25 set Result [BUC60831_2 D $L]
26 if { ${Result} != 0 } {
27 puts "BUC60831: Error 2"
31 set Result [BUC60831_1 D]
32 if { ${Result} != 1 } {
33 puts "BUC60831: Error 3"
41 set Result [BUC60831_1 D]
42 if { ${Result} != 0 } {
43 puts "BUC60831: Error 4"
47 if { ${Status} != 0} then {
48 puts "BUC60831: Error"