xsharp.eu

Code: Select all

USING RKSV.Light
CLASS RKSVCOM
	PROTECT _oRKSVCom AS RKSVLight

Code: Select all

error XS1061: 'RKSV.Light.RKSVLight' does not contain a definition for 'GetReadersCount' and no accessible extension method 'GetReadersCount' accepting a first argument of type 'RKSV.Light.RKSVLight' could be found (are you missing a using directive or an assembly reference?)

Code: Select all

	_oRKSVCom := RKSVCOM{}
	IF !_oRKSVCom:fInit
		// Fehlermeldung
		RETURN SELF
	ENDIF	

Code: Select all

class RKSV inherit RKSVCom
Constructor()
return
end class

Code: Select all

CLASS RKSV   // Enthält die Aufrufe aus meinen Kassenprogrammen
     PROTECT _oRKSVWrapper as RKSVWrapper
CONSTRUCTOR
     _oRKSVWrapper := RKSVWrapper{}   // Wrapper der RKSVComComplete Dll
...
END CLASS

USING RKSVComComplete
CLASS RKSVWrapper   // Spiegelt praktisch die Methoden aus RKSVComComplete
     PROTECT _oRKSVCom as RKSVCom
CONSTRUCTOR
     _oRKSVCom := RKSVCom{}   // RKSVComComplete Dll
...
END CLASS

Code: Select all

METHOD ConvertJWSCompactToText(cJws AS STRING) AS STRING PASCAL 
	LOCAL cResult AS STRING
	LOCAL cAnswer AS STRING
	LOCAL uRet AS USUAL
	uRet := _oRKSVCom:ConvertJWSCompactToText(cJws, @cResult, @cAnswer)

Code: Select all

error XS1503: Argument 2: cannot convert from 'System.IntPtr*' to 'string'

Code: Select all

CLASS _RKSVCOM INHERIT OLEAutoObjectEx

METHOD ConvertJWSCompactToText(;
		jwsCompact,;		// AS STRING
		text,;		// REF STRING
		errorMessage;		// REF STRING
		) CLASS _RKSVCOM

METHOD DecodeBase64URL(;
		data;		// AS STRING
		) CLASS _RKSVCOM

METHOD DecryptAES256_CTR(;
		encrypted,;		// AS ARRAY OF  BYTE
		decrypted,;		// AS ARRAY OF  BYTE
		key,;		// AS ARRAY OF  BYTE
		kassenID,;		// AS STRING
		renummer;		// AS STRING
		) CLASS _RKSVCOM

METHOD Equals(;
		obj;		// AS USUAL
		) CLASS _RKSVCOM

METHOD ExportJWS(;
		certificate,;		// AS STRING
		certificateChain,;		// AS STRING
		jwsCompactReceipts,;		// AS ARRAY OF  STRING
		exportResult;		// REF STRING
		) CLASS _RKSVCOM

METHOD ExportJWSDelimitedString(;
		certificate,;		// AS STRING
		certificateChain,;		// AS STRING
		delimitedReceipts,;		// AS STRING
		exportResult;		// REF STRING
		) CLASS _RKSVCOM

METHOD ExportJWSDelimitedStringToFile(;
		certificate,;		// AS STRING
		certificateChain,;		// AS STRING
		delimitedReceipts,;		// AS STRING
		path;		// AS STRING
		) CLASS _RKSVCOM

METHOD ExportJWSToFile(;
		certificate,;		// AS STRING
		certificateChain,;		// AS STRING
		jwsCompactReceipts,;		// AS ARRAY OF  STRING
		path;		// AS STRING
		) CLASS _RKSVCOM

METHOD GenerateAes256Key(;
		initialvalue,;		// AS STRING
		result,;		// REF STRING
		errorMessage;		// REF STRING
		) CLASS _RKSVCOM

METHOD GetCardCertificate(;
		readername,;		// AS STRING
		certificateBase64,;		// REF STRING
		certificateChainBase64;		// REF STRING
		) CLASS _RKSVCOM

METHOD GetCardInReader(;
		reader;		// AS STRING
		) CLASS _RKSVCOM

METHOD GetCardReaders(		) CLASS _RKSVCOM

METHOD GetChainApdu(;
		readername;		// AS STRING
		) CLASS _RKSVCOM

METHOD GetHashCode(		) CLASS _RKSVCOM

METHOD GetLibraryVersion(		) CLASS _RKSVCOM

METHOD GetMachineCode(;
		machinecode;		// REF STRING
		) CLASS _RKSVCOM

METHOD GetQrCodeString(;
		jwsInput,;		// AS STRING
		qrOutput;		// REF STRING
		) CLASS _RKSVCOM

METHOD GetReaderAt(;
		position;		// AS LONG
		) CLASS _RKSVCOM

METHOD GetReadersCount(		) CLASS _RKSVCOM

METHOD GetType(		) CLASS _RKSVCOM

METHOD GetVersion(;
		readername;		// AS STRING
		) CLASS _RKSVCOM

METHOD Init(ObjID, fROTCHECK) CLASS _RKSVCOM

METHOD IsCardNumberPresent(;
		cardnumber;		// AS STRING
		) CLASS _RKSVCOM

METHOD IsCardReaderPresent(;
		readername;		// AS STRING
		) CLASS _RKSVCOM

METHOD IsLicenseValid(		) CLASS _RKSVCOM

METHOD RKSVJwsToImage(;
		jws,;		// AS STRING
		qrCode,;		// REF STRING
		ocraCode;		// REF STRING
		) CLASS _RKSVCOM

METHOD SaveImageToFile(;
		base64image,;		// AS STRING
		path,;		// AS STRING
		mimetype;		// AS STRING
		) CLASS _RKSVCOM

METHOD SignReceipt(;
		sKassenID,;		// AS STRING
		sReaderName,;		// AS STRING
		sCardPIN,;		// AS STRING
		sReNummer,;		// AS STRING
		sReBelegDatumUhrzeit,;		// AS STRING
		sReBetragSatzNormal,;		// AS STRING
		sReBetragSatzErmaessigt1,;		// AS STRING
		sReBetragSatzErmaessigt2,;		// AS STRING
		sReBetragSatzBesonders,;		// AS STRING
		sReBetragSatzNull,;		// AS STRING
		sReStandUmsatzzaehler,;		// AS STRING
		sReSigVorigerBeleg,;		// AS STRING
		sAesKey,;		// AS STRING
		sJWSCompactresult,;		// REF STRING
		sQRImageBase64,;		// REF STRING
		sOCRAImageBase64,;		// REF STRING
		sAntwort;		// REF STRING
		) CLASS _RKSVCOM

METHOD SignStornoReceipt(;
		sKassenID,;		// AS STRING
		sReaderName,;		// AS STRING
		sCardPIN,;		// AS STRING
		sReNummer,;		// AS STRING
		sReBelegDatumUhrzeit,;		// AS STRING
		sReBetragSatzNormal,;		// AS STRING
		sReBetragSatzErmaessigt1,;		// AS STRING
		sReBetragSatzErmaessigt2,;		// AS STRING
		sReBetragSatzBesonders,;		// AS STRING
		sReBetragSatzNull,;		// AS STRING
		sReSigVorigerBeleg,;		// AS STRING
		sJWSCompactresult,;		// REF STRING
		sQRImageBase64,;		// REF STRING
		sOCRAImageBase64,;		// REF STRING
		sAntwort;		// REF STRING
		) CLASS _RKSVCOM

METHOD SignTrainReceipt(;
		sKassenID,;		// AS STRING
		sCardSerial,;		// AS STRING
		sReaderName,;		// AS STRING
		sReNummer,;		// AS STRING
		sReBelegDatumUhrzeit,;		// AS STRING
		sReBetragSatzNormal,;		// AS STRING
		sReBetragSatzErmaessigt1,;		// AS STRING
		sReBetragSatzErmaessigt2,;		// AS STRING
		sReBetragSatzBesonders,;		// AS STRING
		sReBetragSatzNull,;		// AS STRING
		sReSigVorigerBeleg,;		// AS STRING
		sJWSCompactresult,;		// REF STRING
		sQRImageBase64,;		// REF STRING
		sOCRAImageBase64,;		// REF STRING
		sAntwort;		// REF STRING
		) CLASS _RKSVCOM

ACCESS ToString(		) CLASS _RKSVCOM

METHOD VerifyJWS(;
		jwsCompact,;		// AS STRING
		certificateBase64;		// AS STRING
		) CLASS _RKSVCOM

METHOD VerifyPin(;
		readername,;		// AS STRING
		pin;		// AS STRING
		) CLASS _RKSVCOM