Esempi in C++ (Cpp) per isc_event_block_a

Esempio n. 1

File: fbrmclib.cpp Progetto: narolez571/firebird

EXPORT RM_ENTRY(rmc_event_block_a)
{
	ClearParamPool();
	ISC_USHORT retval = isc_event_block_a((char **)arg_vector[0].a_address,
										  (char **)arg_vector[1].a_address,
										  atoi((char *)CobolToString(&arg_vector[2])),
										  (char **)arg_vector[3].a_address);
	ShortToCobol(&arg_vector[-1], &retval);

	return (0);
}

Esempio n. 2

File: alt.cpp Progetto: FirebirdSQL/firebird

void API_ROUTINE isc_event_block_s(SCHAR** event_buffer, SCHAR** result_buffer, USHORT count,
								   TEXT** name_buffer, USHORT* return_count)
{
/**************************************
 *
 *	i s c _ e v e n t _ b l o c k _ s
 *
 **************************************
 *
 * Functional description
 *	THIS IS THE COBOL VERSION of gds__event_block_a for Cobols
 *	that don't permit return values.
 *
 **************************************/

	*return_count = isc_event_block_a(event_buffer, result_buffer, count, name_buffer);
}