AB_IMEXPORTER_ACCOUNTINFO *AB_ImExporterContext__GetAccountInfoForTransaction(AB_IMEXPORTER_CONTEXT *iec, const AB_TRANSACTION *t){ AB_IMEXPORTER_ACCOUNTINFO *iea; const char *tIban; const char *tBankCode; const char *tAccountNumber; tBankCode=AB_Transaction_GetLocalBankCode(t); if (!tBankCode) tBankCode=""; tAccountNumber=AB_Transaction_GetLocalAccountNumber(t); if (!tAccountNumber) tAccountNumber=""; tIban=AB_Transaction_GetLocalIban(t); if (!tIban) tIban=""; iea=AB_ImExporterAccountInfo_List_First(iec->accountInfoList); while(iea) { const char *sBankCode; const char *sAccountNumber; const char *sIban; sBankCode=AB_ImExporterAccountInfo_GetBankCode(iea); if (!sBankCode) sBankCode=""; sAccountNumber=AB_ImExporterAccountInfo_GetAccountNumber(iea); if (!sAccountNumber) sAccountNumber=""; sIban=AB_ImExporterAccountInfo_GetIban(iea); if (!sIban) sIban=""; if (strcasecmp(sIban, tIban)==0) return iea; if ((strcasecmp(sBankCode, tBankCode)==0) && (strcasecmp(sAccountNumber, tAccountNumber)==0)) return iea; iea=AB_ImExporterAccountInfo_List_Next(iea); } /* not found, append it */ iea=AB_ImExporterAccountInfo_new(); if (tIban && *tIban) AB_ImExporterAccountInfo_SetIban(iea, tIban); if (tBankCode && *tBankCode) AB_ImExporterAccountInfo_SetBankCode(iea, tBankCode); if (tAccountNumber && *tAccountNumber) AB_ImExporterAccountInfo_SetAccountNumber(iea, tAccountNumber); AB_ImExporterAccountInfo_List_Add(iea, iec->accountInfoList); return iea; }
AB_IMEXPORTER_ACCOUNTINFO* AB_ImExporterContext_GetAccountInfoByIban(AB_IMEXPORTER_CONTEXT *iec, const char *iban){ AB_IMEXPORTER_ACCOUNTINFO *iea; if (!iban) iban=""; assert(iec); iea=AB_ImExporterContext_FindAccountInfoByIban(iec, iban); if (!iea) { /* not found, append it */ iea=AB_ImExporterAccountInfo_new(); AB_ImExporterAccountInfo_SetIban(iea, iban); AB_ImExporterAccountInfo_List_Add(iea, iec->accountInfoList); } return iea; }
AB_IMEXPORTER_ACCOUNTINFO* AB_ImExporterContext_GetAccountInfo(AB_IMEXPORTER_CONTEXT *iec, const char *bankCode, const char *accountNumber){ AB_IMEXPORTER_ACCOUNTINFO *iea; if (!bankCode) bankCode=""; if (!accountNumber) accountNumber=""; assert(iec); iea=AB_ImExporterContext_FindAccountInfo(iec, bankCode, accountNumber); if (!iea) { /* not found, append it */ iea=AB_ImExporterAccountInfo_new(); AB_ImExporterAccountInfo_SetBankCode(iea, bankCode); AB_ImExporterAccountInfo_SetAccountNumber(iea, accountNumber); AB_ImExporterAccountInfo_List_Add(iea, iec->accountInfoList); } return iea; }
AB_IMEXPORTER_ACCOUNTINFO *AB_ImExporterYN__ReadAccountInfo(AB_IMEXPORTER *ie, AB_IMEXPORTER_CONTEXT *ctx, GWEN_XMLNODE *doc) { GWEN_XMLNODE *n; AB_IMEXPORTER_ACCOUNTINFO *ai; ai=AB_ImExporterAccountInfo_new(); n=GWEN_XMLNode_FindFirstTag(doc, "SG2", 0, 0); if (n) n=GWEN_XMLNode_FindFirstTag(n, "FII", 0, 0); if (n) { GWEN_XMLNODE *nn; const char *s; nn=GWEN_XMLNode_FindFirstTag(n, "C078", 0, 0); if (nn) { GWEN_XMLNODE *nnn; /* account number */ s=GWEN_XMLNode_GetCharValue(nn, "D_3194", 0); if (s) AB_ImExporterAccountInfo_SetAccountNumber(ai, s); /* IBAN */ s=GWEN_XMLNode_GetCharValue(nn, "D_3192", 0); if (s) AB_ImExporterAccountInfo_SetIban(ai, s); /* currency */ nnn=GWEN_XMLNode_FindFirstTag(nn, "D_6345", 0, 0); if (nnn) { s=GWEN_XMLNode_GetProperty(nnn, "value", 0); if (s) AB_ImExporterAccountInfo_SetCurrency(ai, s); } } /* account number */ s=GWEN_XMLNode_GetCharValue(n, "PF:D_5388", 0); if (s) AB_ImExporterAccountInfo_SetAccountName(ai, s); } /* owner name */ n=GWEN_XMLNode_GetNodeByXPath(doc, "SG3[1]/NAD", GWEN_PATH_FLAGS_NAMEMUSTEXIST); if (n) { GWEN_XMLNODE *nn; nn=GWEN_XMLNode_FindFirstTag(n, "D_3035", 0, 0); if (nn) { const char *s; s=GWEN_XMLNode_GetProperty(nn, "Value", 0); if (s && strcasecmp(s, "HQ")==0) { nn=GWEN_XMLNode_FindFirstTag(n, "C058", 0, 0); if (nn) { s=GWEN_XMLNode_GetCharValue(nn, "D_3124", 0); if (s && *s) { GWEN_BUFFER *xbuf; xbuf=GWEN_Buffer_new(0, 256, 0, 1); AB_ImExporter_Iso8859_1ToUtf8(s, strlen(s), xbuf); AB_ImExporterAccountInfo_SetOwner(ai, GWEN_Buffer_GetStart(xbuf)); GWEN_Buffer_free(xbuf); } } } } } return ai; }
int EBC_Provider_ExecContext__IZV(AB_PROVIDER *pro, AB_IMEXPORTER_CONTEXT *ctx, AB_USER *u, AB_ACCOUNT *a, GWEN_HTTP_SESSION *sess, EBC_CONTEXT *ectx){ EBC_PROVIDER *dp; AB_JOB_LIST2_ITERATOR *jit; AB_JOB_STATUS js; AB_IMEXPORTER_CONTEXT *exCtx; AB_IMEXPORTER_ACCOUNTINFO *ai; GWEN_BUFFER *bufDtaus; GWEN_TIME *currentTime; GWEN_BUFFER *logbuf; int rv; const char *profileName=NULL; const char *s; const char *rqType; uint32_t groupId=0; assert(pro); dp=GWEN_INHERIT_GETDATA(AB_PROVIDER, EBC_PROVIDER, pro); assert(dp); /* prepare CTX log */ logbuf=GWEN_Buffer_new(0, 256, 0, 1); GWEN_Buffer_AppendString(logbuf, "BEGIN"); currentTime=GWEN_CurrentTime(); GWEN_Time_toString(currentTime, I18N("YYYY/MM/DD-hh:mm:ss"), logbuf); GWEN_Time_free(currentTime); GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, I18N("National Mass Transfer")); GWEN_Buffer_AppendString(logbuf, "\n"); GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, I18N("Transfer type: ")); GWEN_Buffer_AppendString(logbuf, "\t"); switch(EBC_Context_GetJobType(ectx)) { case AB_Job_TypeTransfer: if (!profileName) profileName="transfer"; GWEN_Buffer_AppendString(logbuf, I18N("Transfer")); break; case AB_Job_TypeDebitNote: if (!profileName) profileName="debitnote"; GWEN_Buffer_AppendString(logbuf, I18N("Debit Note")); break; default: GWEN_Buffer_AppendString(logbuf, I18N("unknown")); break; } GWEN_Buffer_AppendString(logbuf, "\n"); GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, I18N("Account: ")); GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, AB_Account_GetBankCode(a)); GWEN_Buffer_AppendString(logbuf, " / "); GWEN_Buffer_AppendString(logbuf, AB_Account_GetAccountNumber(a)); GWEN_Buffer_AppendString(logbuf, "\n"); /* add a tab-less line to start a new table */ GWEN_Buffer_AppendString(logbuf, "Transactions\n"); DBG_INFO(AQEBICS_LOGDOMAIN, "Sampling transactions from jobs"); exCtx=AB_ImExporterContext_new(); ai=AB_ImExporterAccountInfo_new(); AB_ImExporterAccountInfo_FillFromAccount(ai, a); jit=AB_Job_List2_First(EBC_Context_GetJobs(ectx)); if (jit) { AB_JOB *uj; uj=AB_Job_List2Iterator_Data(jit); assert(uj); while(uj) { AB_TRANSACTION *t; const GWEN_STRINGLIST *sl; const char *s; const AB_VALUE *v; switch(EBC_Context_GetJobType(ectx)) { case AB_Job_TypeTransfer: case AB_Job_TypeDebitNote: t=AB_Job_GetTransaction(uj); break; default: t=NULL; } assert(t); if (groupId==0) /* take id from first job of the created DTAUS doc */ groupId=AB_Job_GetJobId(uj); AB_Transaction_SetGroupId(t, groupId); AB_ImExporterAccountInfo_AddTransaction(ai, AB_Transaction_dup(t)); sl=AB_Transaction_GetRemoteName(t); s=NULL; if (sl) s=GWEN_StringList_FirstString(sl); if (!s) s=I18N("unknown"); GWEN_Buffer_AppendString(logbuf, s); GWEN_Buffer_AppendString(logbuf, "\t"); s=AB_Transaction_GetRemoteBankCode(t); if (!s) s="????????"; GWEN_Buffer_AppendString(logbuf, s); GWEN_Buffer_AppendString(logbuf, "\t"); s=AB_Transaction_GetRemoteAccountNumber(t); if (!s) s="??????????"; GWEN_Buffer_AppendString(logbuf, s); GWEN_Buffer_AppendString(logbuf, "\t"); sl=AB_Transaction_GetPurpose(t); s=NULL; if (sl) s=GWEN_StringList_FirstString(sl); if (!s) s=""; GWEN_Buffer_AppendString(logbuf, s); GWEN_Buffer_AppendString(logbuf, "\t"); v=AB_Transaction_GetValue(t); if (v) AB_Value_toHumanReadableString(v, logbuf, 2); else GWEN_Buffer_AppendString(logbuf, "0,00 EUR"); GWEN_Buffer_AppendString(logbuf, "\n"); uj=AB_Job_List2Iterator_Next(jit); } /* while */ AB_Job_List2Iterator_free(jit); } AB_ImExporterContext_AddAccountInfo(exCtx, ai); GWEN_Buffer_AppendString(logbuf, I18N("Results:\n")); /* export as DTAUS to bufDtaus */ bufDtaus=GWEN_Buffer_new(0, 1024, 0, 1); DBG_INFO(AQEBICS_LOGDOMAIN, "Exporting transactions to DTAUS[default]"); rv=AB_Banking_ExportToBuffer(AB_Provider_GetBanking(pro), exCtx, "dtaus", profileName, bufDtaus); if (rv<0) { DBG_INFO(AQEBICS_LOGDOMAIN, "here (%d)", rv); GWEN_Buffer_free(bufDtaus); EBC_Provider_SetJobListStatus(EBC_Context_GetJobs(ectx), AB_Job_StatusError); GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, I18N("Error while exporting to DTAUS\n")); GWEN_Buffer_AppendString(logbuf, "END\n"); AB_ImExporterContext_AddLog(ctx, GWEN_Buffer_GetStart(logbuf)); GWEN_Buffer_free(logbuf); return rv; } GWEN_Buffer_AppendString(logbuf, "\t"); GWEN_Buffer_AppendString(logbuf, I18N("Exporting to DTAUS: ok\n")); /* exchange upload request */ DBG_INFO(AQEBICS_LOGDOMAIN, "Uploading."); AB_HttpSession_ClearLog(sess); if (EBC_Context_GetJobType(ectx)==AB_Job_TypeDebitNote) { if (EBC_User_GetFlags(u) & EBC_USER_FLAGS_USE_IZL) rqType="IZL"; else rqType="IZV"; } else rqType="IZV"; rv=EBC_Provider_XchgUploadRequest(pro, sess, u, rqType, (const uint8_t*)GWEN_Buffer_GetStart(bufDtaus), GWEN_Buffer_GetUsedBytes(bufDtaus)); if (rv<0 || rv>=300) js=AB_Job_StatusError; else js=AB_Job_StatusFinished; s=AB_HttpSession_GetLog(sess); if (s) GWEN_Buffer_AppendString(logbuf, s); GWEN_Buffer_AppendString(logbuf, "END\n"); AB_ImExporterContext_AddLog(ctx, GWEN_Buffer_GetStart(logbuf)); GWEN_Buffer_free(logbuf); EBC_Provider_SetJobListStatus(EBC_Context_GetJobs(ectx), js); DBG_INFO(AQEBICS_LOGDOMAIN, "Done"); return 0; }
int AH_ImExporterOFX_AccountCallback_cb(const struct OfxAccountData data, void *user_data) { AH_IMEXPORTER_OFX *ieh; AB_IMEXPORTER_ACCOUNTINFO *ai; DBG_INFO(AQBANKING_LOGDOMAIN, "Account callback"); ieh=(AH_IMEXPORTER_OFX *)user_data; ai=AB_ImExporterAccountInfo_new(); #ifdef HAVE_OFX_WITH_CONNECT if (data.account_number_valid) { AB_ImExporterAccountInfo_SetAccountNumber(ai, data.account_number); if (*(data.account_name)) AB_ImExporterAccountInfo_SetAccountName(ai, data.account_name); } else if (data.account_id_valid) AB_ImExporterAccountInfo_SetAccountNumber(ai, data.account_id); else AB_ImExporterAccountInfo_SetAccountNumber(ai, "----"); if (data.bank_id_valid) AB_ImExporterAccountInfo_SetBankCode(ai, data.bank_id); #else if (data.account_id_valid) { AB_ImExporterAccountInfo_SetAccountNumber(ai, data.account_id); if (*(data.account_name)) AB_ImExporterAccountInfo_SetAccountName(ai, data.account_name); } else { AB_ImExporterAccountInfo_SetAccountNumber(ai, "----"); } #endif if (data.account_type_valid) { AB_ACCOUNT_TYPE at; switch (data.account_type) { case OFX_CHECKING: at=AB_AccountType_Checking; break; case OFX_SAVINGS: at=AB_AccountType_Savings; break; case OFX_MONEYMRKT: at=AB_AccountType_Investment; break; case OFX_CREDITLINE: at=AB_AccountType_Bank; break; case OFX_CMA: at=AB_AccountType_Cash; break; case OFX_CREDITCARD: at=AB_AccountType_CreditCard; break; case OFX_INVESTMENT: at=AB_AccountType_Investment; break; default: at=AB_AccountType_Bank; break; } AB_ImExporterAccountInfo_SetType(ai, at); } else { AB_ImExporterAccountInfo_SetType(ai, AB_AccountType_Bank); } AB_ImExporterContext_AddAccountInfo(ieh->context, ai); ieh->lastAccountInfo=ai; return 0; }
AB_IMEXPORTER_ACCOUNTINFO* AB_ImExporterAccountInfo_fromDb(GWEN_DB_NODE *db){ AB_IMEXPORTER_ACCOUNTINFO *iea; const char *s; GWEN_DB_NODE *dbT; iea=AB_ImExporterAccountInfo_new(); #define RESTORE_CHAR(NAME) \ s=GWEN_DB_GetCharValue(db, __STRING(NAME), 0, 0);\ if (s)\ iea->NAME=strdup(s); #define RESTORE_INT(NAME, DEFAULT) \ iea->NAME=GWEN_DB_GetIntValue(db, __STRING(NAME), 0, DEFAULT); RESTORE_CHAR(bankCode); RESTORE_CHAR(bankName); RESTORE_CHAR(accountNumber); RESTORE_CHAR(iban); RESTORE_CHAR(bic); RESTORE_CHAR(owner); RESTORE_CHAR(currency); RESTORE_CHAR(description); RESTORE_INT(accountType, AB_AccountType_Bank); RESTORE_INT(accountId, 0); #undef RESTORE_CHAR #undef RESTORE_INT dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "statusList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "status"); while(dbT) { AB_ACCOUNT_STATUS *ast; ast=AB_AccountStatus_fromDb(dbT); assert(ast); AB_AccountStatus_List_Add(ast, iea->accStatusList); dbT=GWEN_DB_FindNextGroup(dbT, "status"); } } dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "transactionList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "transaction"); while(dbT) { AB_TRANSACTION *t; t=AB_Transaction_fromDb(dbT); assert(t); AB_Transaction_List_Add(t, iea->transactions); dbT=GWEN_DB_FindNextGroup(dbT, "transaction"); } } dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "standingOrderList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "standingOrder"); while(dbT) { AB_TRANSACTION *t; t=AB_Transaction_fromDb(dbT); assert(t); AB_Transaction_List_Add(t, iea->standingOrders); dbT=GWEN_DB_FindNextGroup(dbT, "standingOrder"); } } dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "transferList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "transfer"); while(dbT) { AB_TRANSACTION *t; t=AB_Transaction_fromDb(dbT); assert(t); AB_Transaction_List_Add(t, iea->transfers); dbT=GWEN_DB_FindNextGroup(dbT, "transfer"); } } dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "datedTransferList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "datedTransfer"); while(dbT) { AB_TRANSACTION *t; t=AB_Transaction_fromDb(dbT); assert(t); AB_Transaction_List_Add(t, iea->datedTransfers); dbT=GWEN_DB_FindNextGroup(dbT, "datedTransfer"); } } dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "notedTransactionList"); if (dbT) { dbT=GWEN_DB_FindFirstGroup(dbT, "notedTransaction"); while(dbT) { AB_TRANSACTION *t; t=AB_Transaction_fromDb(dbT); assert(t); AB_Transaction_List_Add(t, iea->notedTransactions); dbT=GWEN_DB_FindNextGroup(dbT, "notedTransaction"); } } return iea; }