we got new Hardware of POS (IBM SurePOS 300) , we try to configure the MSR , while we open device it gives the following error :
invalid assignment : it's not possible to assign IPOSMSR to OPOSMSR
i don't know if the problem in the OCX , i try to regester it but the same error ... ??
anybody can help us please ...
0
Comments
Independent Consultant/Developer
blog: https://dynamicsuser.net/nav/b/ara3n
but when we try to click ( Open Device) give the same error .
in Codeunit ( POS OPOS Utility )
function (initMSRDDevice)
/InitMSR
MSR_TR_1 := 1;
MSR_TR_2 := 2;
MSR_TR_3 := 4;
OPOS_EMSR_START := 1 + OPOSERREXT;
OPOS_EMSR_END := 2 + OPOSERREXT;
OPOS_EMSR_PARITY := 3 + OPOSERREXT;
OPOS_EMSR_LRC := 4 + OPOSERREXT;
/////////////////////////////////////////////////////////////////////
IF NOT pOPOS THEN
EXIT(TRUE);
SetModuleID('MSR');
CLEAR(OleMSR);
CLEAR(OleMSR2);
IF pRemote THEN BEGIN
//LS4.1-03-
IF pUseRemoteClientName THEN
res := OleMap.CreateRemoteOle2('{CCB90122-B81E-11D2-AB74-0040054C3719}', pRemoteClientName)
ELSE
res := OleMap.CreateRemoteOle('{CCB90122-B81E-11D2-AB74-0040054C3719}');
//LS4.1-03+
IF res < 0 THEN BEGIN
//IsError(993,0); //LS4.1-02
IsError(993,res); //LS4.1-02
EXIT(FALSE);
END;
OleMSR := OleMap.GetRemoteOlePtr;
END ELSE BEGIN
IF NOT CREATE(OleMSR2,FALSE) THEN BEGIN
IsError(999,0);
EXIT(FALSE);
END;
error is here OleMSR := OleMSR2;
END;