У меня с ККМ все прекрасно было
вот кусок кода

KKM = CREATE OLEObject
l_status = KKM.ConnectToNewObject("AddIn.FprnM45")
IF l_status <> 0 THEN
OLEEnabled=false
else
OLEEnabled=true
// инициализируем устройство
this.post init()
END IF

в инит
if not OLEEnabled then return 1

// читаем статус
ResultCode=KKM.GetStatus()
If ResultCode = 0 Then
// закрываем чек
If KKM.CheckState <> 0 Then
ResultCode=KKM.CancelCheck()
If ResultCode <> 0 Then
return 1
end if
End If
else
// занимаем порт
KKM.DeviceEnabled = True
ResultCode=KKM.ResultCode
If ResultCode <> 0 Then
return 1
End If
DeviceEnabled = True

// Получить Параметры Устройства
ResultCode=KKM.GetDeviceMetrics()
If ResultCode <> 0 Then
// необходима полная инициализация
b_init_full=true
return 1
End If
// проверяем тип устройства
if KKM.UType<>1 then
return 1
end if
и т.д.

и правильней наверно надо было обращаться
le_cassa.NumPort = 1
ole_cassa.BaudRate = 9600
ole_cassa.Password = '0000'
ole_cassa.Open()