$cur->sendQuery("exec testproc");
my $field00=$cur->getFieldByIndex(0,0);
my $field01=$cur->getFieldByIndex(0,1);
my $field02=$cur->getFieldByIndex(0,2);
my $field10=$cur->getFieldByIndex(1,0);
my $field11=$cur->getFieldByIndex(1,1);
my $field12=$cur->getFieldByIndex(1,2);
