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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
|
/***************************************************************************
$RCSfile$
-------------------
cvs : $Id: tutorial3.c 935 2006-02-14 02:11:55Z aquamaniac $
begin : Tue May 03 2005
copyright : (C) 2005 by Martin Preuss
email : martin@libchipcard.de
***************************************************************************
* Please see toplevel file COPYING for license details *
***************************************************************************/
/***************************************************************************
* This tutorial shows how to use jobs in AqBanking. *
* In this example we retrieve transaction statements for a given account. *
* *
* You must either choose a frontend to be used with AqBanking or create *
* one yourself by implementing the user interface callbacks of AqBanking. *
* *
* However, for simplicity reasons we use the console frontend CBanking *
* which implements these callbacks for you. *
* *
* There are other frontends, e.g. G2Banking for GTK2/Gnome, QBanking for *
* QT3 or KDE3 or KBanking for KDE3. *
***************************************************************************/
#ifdef HAVE_CONFIG_H
# include <config.h>
#endif
#include <cbanking/cbanking.h>
#include <aqbanking/jobgettransactions.h>
int main(int argc, char **argv) {
AB_BANKING *ab;
int rv;
AB_ACCOUNT *a;
ab=CBanking_new("tutorial3", 0);
rv=AB_Banking_Init(ab);
if (rv) {
fprintf(stderr, "Error on init (%d)\n", rv);
return 2;
}
fprintf(stderr, "AqBanking successfully initialized.\n");
/* Any type of job needs an account to operate on. The following function
* allows wildcards (*) and jokers (?) in any of the arguments. */
a=AB_Banking_FindAccount(ab,
"aqhbci", /* backend name */
"de", /* two-char ISO country code */
"200*", /* bank code (with wildcard) */
"*"); /* account number (wildcard) */
if (a) {
AB_JOB *j;
AB_IMEXPORTER_CONTEXT *ctx;
/* create a job which retrieves transaction statements. */
j=AB_JobGetTransactions_new(a);
/* This function checks whether the given job is available with the
* backend/provider to which the account involved is assigned.
* The corresponding provider/backend might also check whether this job
* is available with the given account.
* If the job is available then 0 is returned, otherwise the error code
* might give you a hint why the job is not supported. */
rv=AB_Job_CheckAvailability(j);
if (rv) {
fprintf(stderr, "Job is not available (%d)\n", rv);
return 2;
}
/* enqueue this job so that AqBanking knows we want it executed. */
rv=AB_Banking_EnqueueJob(ab, j);
if (rv) {
fprintf(stderr, "Error on enqueueJob (%d)\n", rv);
return 2;
}
/* When executing a list of enqueued jobs (as we will do below) all the
* data returned by the server will be stored within an ImExporter
* context.
*/
ctx=AB_ImExporterContext_new();
/* execute the queue. This effectivly sends all jobs which have been
* enqueued to the respective backends/banks.
* It only returns an error code (!=0) if not a single job could be
* executed successfully. */
rv=AB_Banking_ExecuteQueueWithCtx(ab, ctx);
if (rv) {
fprintf(stderr, "Error on executeQueue (%d)\n", rv);
return 2;
}
else {
AB_IMEXPORTER_ACCOUNTINFO *ai;
ai=AB_ImExporterContext_GetFirstAccountInfo(ctx);
while(ai) {
const AB_TRANSACTION *t;
t=AB_ImExporterAccountInfo_GetFirstTransaction(ai);
while(t) {
const AB_VALUE *v;
v=AB_Transaction_GetValue(t);
if (v) {
const GWEN_STRINGLIST *sl;
const char *purpose;
/* The purpose (memo field) might contain multiple lines.
* Therefore AqBanking stores the purpose in a string list
* of which the first is used in this tutorial */
sl=AB_Transaction_GetPurpose(t);
if (sl)
purpose=GWEN_StringList_FirstString(sl);
else
purpose="";
fprintf(stderr, "Transaction: %s (%.2lf %s)\n",
purpose,
AB_Value_GetValue(v),
AB_Value_GetCurrency(v));
}
t=AB_ImExporterAccountInfo_GetNextTransaction(ai);
} /* while transactions */
ai=AB_ImExporterContext_GetNextAccountInfo(ctx);
} /* while ai */
} /* if executeQueue successfull */
/* free the job to avoid memory leaks */
AB_Job_free(j);
} /* if account found */
else {
fprintf(stderr, "No account found.\n");
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 3;
}
AB_Banking_free(ab);
return 0;
}
|
