#include <sqlca.h>
#define SQLCODE		sqlca.sqlcode

int main(int argc, char **argv)
{
	EXEC SQL BEGIN DECLARE SECTION;
		char my_query[1000];
		char my_database[10];
		char my_ref[10];
		char my_user[10];
		char my_pass[10];
		long my_result;
	EXEC SQL END   DECLARE SECTION;

	strcpy(my_database, "TESTDB");
	strcpy(my_ref, "TESTDB");
	strcpy(my_user, "SCOTT");
	strcpy(my_pass, "TIGER");
	my_result = 999;

	EXEC SQL CONNECT :my_user IDENTIFIED BY :my_pass AT :my_ref USING :my_database;	
	printf("[TEST] CONNECT returns SQLCODE '%d'\n", SQLCODE);
	
	sprintf(my_query, "SELECT 1234 FROM DUAL");
	printf("[TEST] Query is '%s'\n", my_query);
	
	EXEC SQL AT :my_database PREPARE my_cursor_id from :my_query;
	printf("[TEST] PREPARE returns SQLCODE '%d'\n", SQLCODE);

	EXEC SQL AT :my_database DECLARE my_cursor CURSOR FOR my_cursor_id ;
	printf("[TEST] DECLARE returns SQLCODE '%d'\n", SQLCODE);

	EXEC SQL AT :my_database OPEN my_cursor; // USING :my_filter;
	printf("[TEST] OPEN    returns SQLCODE '%d'\n", SQLCODE);

	EXEC SQL AT :my_database FETCH my_cursor INTO :my_result; // INDICATOR :my_indicator;
	printf("[TEST] FETCH   returns SQLCODE '%d'\n", SQLCODE);
	
	printf("[TEST] FETCH   returns RESULT  '%d'\n", my_result);
	
	EXEC SQL AT :my_database close my_cursor;
	printf("[TEST] CLOSE   returns SQLCODE '%d'\n", SQLCODE);

	printf("[TEST] Done.\n", my_query);
	return 0;
}

[TEST] CONNECT returns SQLCODE '0'
[TEST] Query is 'SELECT 1234 FROM DUAL'
[TEST] PREPARE returns SQLCODE '0'
[TEST] DECLARE returns SQLCODE '0'
[TEST] OPEN    returns SQLCODE '0'
[TEST] FETCH   returns SQLCODE '0'
[TEST] FETCH   returns RESULT  '1234'
[TEST] CLOSE   returns SQLCODE '0'
[TEST] Done.