my $status = SQLGetDiagRec ($data_handle_type, $data_handle, $record_number, $sql_state, $server_error, $max_error_message_length, $error_message_length);