aboutsummaryrefslogtreecommitdiff
path: root/src/interfaces/ecpg/test/Ptest1.c
blob: 5418e2c1a40ec93b8cf83a63e39a8dc61b3cacfb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
/* These two include files are added by the preprocessor */
#include <ecpgtype.h>
#include <ecpglib.h>
/* exec sql begin declare section */

 /* VARSIZE */ struct varchar_uid
{
	int			len;
	char		arr[200];
}			uid;
struct varchar_name
{
	int			len;
	char		arr[200];
}			name;
short		value;

/* exec sql end declare section */


#include "sqlca.h"

#define		  DBCP(x,y)  strcpy(x.arr,y);x.len = strlen(x.arr)
#define		  LENFIX(x)  x.len=strlen(x.arr)
#define		  STRFIX(x)  x.arr[x.len]='\0'
#define		  SQLCODE	 sqlca.sqlcode

void
db_error(char *msg)
{
	sqlca.sqlerrm.sqlerrmc[sqlca.sqlerrm.sqlerrml] = '\0';
	printf("%s: db error %s\n", msg, sqlca.sqlerrm.sqlerrmc);
	exit(1);
}

int
main()
{
	strcpy(uid.arr, "test/test");
	LENFIX(uid);

	ECPGconnect("kom");
	if (SQLCODE)
		db_error("connect");

	strcpy(name.arr, "opt1");
	LENFIX(name);

	ECPGdo(__LINE__, "declare cur cursor for select name , value from pace_test ", ECPGt_EOIT, ECPGt_EORT);
	if (SQLCODE)
		db_error("declare");


	if (SQLCODE)
		db_error("open");

	while (1)
	{
		ECPGdo(__LINE__, "fetch in cur ", ECPGt_EOIT, ECPGt_varchar, &name, 200, 0, sizeof(struct varchar_name), ECPGt_short, &value, 0, 0, sizeof(short), ECPGt_EORT);
		if (SQLCODE)
			break;
		STRFIX(name);
		printf("%s\t%d\n", name.arr, value);
	}

	if (SQLCODE < 0)
		db_error("fetch");

	ECPGdo(__LINE__, "close cur ", ECPGt_EOIT, ECPGt_EORT);
	if (SQLCODE)
		db_error("close");
	ECPGcommit(__LINE__);
	if (SQLCODE)
		db_error("commit");

	return (0);
}