exec sql whenever sqlerror sqlprint;

void runit(char *);

main()
{
	exec sql begin declare section;
		char *cursor = strdup("A");
	exec sql end declare section;

	exec sql connect to test;
	exec sql declare :cursor cursor for select 1;
	runit(cursor);
	exec sql close :cursor;
	exec sql declare :cursor cursor for select 2;
	runit(cursor);
	exec sql close :cursor;
	exec sql disconnect;
}

void runit(char *name)
{
	exec sql begin declare section;
		char *mycursor = name;
		int i;
	exec sql end declare section;

	exec sql open :mycursor;
	exec sql fetch :mycursor into :i;
	printf("Found %d\n", i);
}