Method fetch

src/remote/server/server.cpp:4025–4405

ISC_STATUS rem_port::fetch(P_SQLDATA * sqldata, PACKET* sendL, bool scroll)
{
/*****************************************
 *
 *	f e t c h
 *
 *****************************************
 *
 * Functional description
 *	Fetch next record from a dynamic SQL cursor.
 *
 *****************************************/
	LocalStatus ls;
	CheckStatusWrapper status_vector(&ls);
	Rsr* statement;
	getHandle(statement, sqldata->p_sqldata_statement);

	// The default (and legacy) scrolling option is FETCH NEXT
	const auto operation = scroll ? sqldata->p_sqldata_fetch_op : fetch_next;
	const auto position = scroll ? sqldata->p_sqldata_fetch_pos : 0;

	// Whether we're fetching in the forward direction
	const bool forward =
		(operation == fetch_next || operation == fetch_last ||
		((operation == fetch_absolute || operation == fetch_relative) && position > 0));

	// Whether we're fetching relatively to the current position
	const bool relative =
		(operation == fetch_next || operation == fetch_prior || operation == fetch_relative);

	if (!statement->rsr_flags.test(Rsr::FETCHED))
	{
		// On first fetch, clear the end-of-stream flag & reset the message buffers

		statement->rsr_flags.clear(Rsr::STREAM_END | Rsr::STREAM_ERR);
		statement->rsr_fetch_operation = operation;
		statement->rsr_fetch_position = position;
		statement->clearException();

		RMessage* message = statement->rsr_message;

		if (message)
		{
			statement->rsr_buffer = message;

			while (true)
			{
				message->msg_address = NULL;
				message = message->msg_next;

				if (message == statement->rsr_message)
					break;
			}
		}
	}
	else if (!relative)
	{
		// Clear the end-of-stream flag if the fetch is positioned absolutely