t_id 547 t_adddate 2003/10/03 t_result 0 t_knownrunerror 0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
type ta = array[1..1,1..100] of integer; procedure t(a: ta); begin end; var a: ta; begin t(a); end.