| |
| |
Eric-Funktion mit Strukturreferenz- #15769 in section [733570] |
| Sec: |
(51) MS-Visual FoxPro 9.0 |
| Von: |
Volkmar Höhn |
| An: |
Christof Wollenhaupt |
| Am/Um: |
13.03.2012 18:35:40 |
Lieber Christof,
danke für Deine Antwort.
Bei meinen Recherchen bin ich schon auf die Struct.zip von 1999 gestoßen. Damals noch von Christof Lange.
Leider habe ich Verständigungsprobleme sowohl mit dem englischen Text als auch inhaltlich mit Klassen-Anwendungen.
In meinem Lohnprogramm muss ich u. a. Lohnsteuerbescheinigungen maschinell übertragen.
Seit diesem Jahr verlangen die Eric-Funktionen eben auch strukturierte Parameter.
Der Ablauf ist folgender:
EricGetHandleToCertificate(PSE-Zertifikat)
EricGetPublicKey (nur zur Bestimmung des Transportschlüssel)
EricCloseHandleToCertificate(PSE-Zertifikat)
...
Mein Lösungsversuch:
DECLARE long EricGetHandleToCertificate IN ericapi.dll long @ hToken, integer @ iInfo, string pathkey
rcZertifikat = EricGetHandleToCertificate(@hToken, @iInfo, pathkey) && --> in Ordnung
Do EricParameter &&Strukturdefinition
pHandle = hToken
cPIN = "xxxxxx"
DECLARE long EricGetPublicKey IN ericapi.dll string @ EricKey, integer @ pPuffer, integer nBufferlen
rcEricKey = EricGetPublicKey(@EricKey, @pPuffer, nBufferlen) && --> Fehler: Datentyp stimmt nicht überein.
DECLARE integer EricCloseHandleToCertificate IN ericapi.dll long hToken
rcZertifikatClose = EricCloseHandleToCertificate(hToken) && --> inOrdnung
Das Problem ist der Parameter EricKey.
In dem Programm EricParameter.prg habe ich folgende Klassendefinition:
DEFINE CLASS EricKey as struct &&eric_verschluesselungs_parameter_t
pHandle = 0
cPIN = ""
ENDDEFINE
Wahrscheinlich habe ich es mir zu einfach gemacht.
Aber wie macht man's richtig? Wie kann ich der Funktion EricGetPublicKey einen ordentlichen EricKey übermitteln?
Danke für weitere Hinweise
Volkmar
|
|
|
|
