FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour DLL-Calls
Posts: 2
Joined: Thu Dec 08, 2005 02:56 PM
DLL-Calls
Posted: Thu Dec 08, 2005 02:59 PM
Hi friends,

can anybody help me to translate this into a xHarbour or FiveWin-Code:

Declaration



Delphi:

function CheckAccountNumber(const AAccountNumber: WideString; const
ABankCode: WideString; out ABankName: WideString; out AResultString:
WideString): ReturnCodes;



IDL:

[id(0x00000003), helpstring("Funktion zum Testen der Kontonummer")]

HRESULT _stdcall CheckAccountNumber([in] BSTR AAccountNumber, [in] BSTR
ABankCode, [out] BSTR * ABankName, [out] BSTR * AResultString, [out, retval]
ReturnCodes * Res );



Description

Die Methode CheckAccountNumber ist die 'Hauptmethode' der Bibliothek. Mit
ihr kann man prüfen, ob eine Kombination aus Kontonummer und Bankleitzahl
eine mögliche Kontonummer beschreibt.

Im Parameter AAccountNumber übergibt man die zu prüfende Kontonummer und im
Parameter ABankCode die dazugehörende Bankleitzahl. Zuerst prüft die
Methode, ob die Bankleitzahl gültig ist und ermittelt die zur Bankleitzahl
gehörende Prüfmethode. Mit dieser Prüfmethode wird anschließend die
übergebene Kontonummer geprüft.

Über den ReturnCode kann man auswerten, ob die Prüfung erfolgreich war bzw.
welcher Fehler aufgetreten ist. Zusätzlich erhält man im Parameter ABankName
den Namen der ermittelten Bank zurück sowie im Parameter AResultString das
Ergebnis der Prüfung im Klartext.



Es werden folgende Properties überschrieben:

AccountNumber mit dem Wert von AAccountNumber

BankCode mit dem Wert von ABankCode

BankName mit dem ermittelten Banknamen

CheckMethod mit der ermittelten Prüfmethode

ResultString mit dem Ergebnisstring



Best regards


Bodo
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: DLL-Calls
Posted: Thu Dec 08, 2005 03:19 PM

Is this a function from a DLL? If yes, what is the DLL name?

EMG

Posts: 2
Joined: Thu Dec 08, 2005 02:56 PM
DLL-Calls
Posted: Thu Dec 08, 2005 03:58 PM

The name of the DLL is: LKontoLb.dll. I send it to you by E-Mail.

Bodo

Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
DLL-Calls
Posted: Thu Dec 08, 2005 04:13 PM
Try (not tested):

DLL32 FUNCTION CHECKACCOUNTNUMBER( cAccountNumber AS LPSTR, cBankCode AS LPSTR, cBankName AS LPSTR, cResultString AS LPSTR ) AS LONG;
      PASCAL FROM "CheckAccountNumber" LIB "LKontoLb.dll"


EMG

Continue the discussion