SysLibCom.lib (SysComRead) потеря байтов.

[AlexPC1]

http://www.owen.ru/forum/showthread....ight=SysLibCom
К UNM претензий нет, но если я правильно понимаю то это ОВЕНовская библиотека, а программа которая сейчас в разработке должна работать и на ОВЕН и на WAGO
P.S. На WAGO она уже работает, потери байт нет

[AlexPC1]

И начнете жалавацца начальству - овен такой, овен сякой, выходите подлые трусы
А Вы, блин, сдвигаете константное окно для приема за пределы буфера. Не факт что именно Ваша проблема - из-за этого. Но легенда - пойдет в мир.

Я не жалуюсь начальству, я и принимаю решение о выборе контроллера, начальству пофиг с чем мы работаем. Мне не пофиг, почему моя программа не работает так как мне необходимо.

[capzap]

А как себя ведет плк если работа с сокетами и портом разнесены по разным задачам?

[Дмитрий Артюховский]

1. Время цикла давайте с запасом, если у вас на выполнение тратиться 1.5-3.5 мс -> минимальное время цикла 4 мс. Разные прошивки плк очень по разному распределяют время для системных задач и задач пользователя при недостатке оного, поэтому резервируйте его. В модуле статистика есть индикатор достаточности ресурса времени - он не должен быть активен для стабильной работы.
2. Буфер для порта (резервируемый при открытии) можно и побольше, а не в притык.
3. Считывайте буфер в каждом цикле и накапливайте где-нить, собственно обработку можно и пореже проводить.

[AlexPC1]

Пробовал в разные задачи, результат тот же. Только при исключении всего из проекта, ком читает нормально

[AlexPC1]

1. Время цикла давайте с запасом, если у вас на выполнение тратиться 1.5-3.5 мс -> минимальное время цикла 4 мс. Разные прошивки плк очень по разному распределяют время для системных задач и задач пользователя при недостатке оного, поэтому резервируйте его. В модуле статистика есть индикатор достаточности ресурса времени - он не должен быть активен для стабильной работы.
2. Буфер для порта (резервируемый при открытии) можно и побольше, а не в притык.
3. Считывайте буфер в каждом цикле и накапливайте где-нить, собственно обработку можно и пореже проводить.

1. Время цикла перебиралось в пределах от 1 до 50 мс
2. Буфер порта 512, при чтении 255, запас 2х кратный
3. Считывание в каждом цикле, обработки пока вообще нет в программе, то есть в программе пока тупо чтение и все никаких обработок запроса, тупо смотрю на размер

[capzap]

Переходите на скорость 38400, где то писался примерный расчет затраченного времени на передачу стандартного запроса модбас на скорости 9600, вроде выходило на 10 байт 4мс, значит на 255 байт уйдет около 100мс, поэтому удивляет что пытаетесь принять за один цикл, но может я и не прав

[AlexPC1]

Переходите на скорость 38400, где то писался примерный расчет затраченного времени на передачу стандартного запроса модбас на скорости 9600, вроде выходило на 10 байт 4мс, значит на 255 байт уйдет около 100мс, поэтому удивляет что пытаетесь принять за один цикл, но может я и не прав

Я не пытаюсь принять за один цикл, я читаю до появления в буфере 0, а потом еще жду 10мс и считаю прием закончен.

[lazy]

Чтение может происходить в нескольких циклах ПЛК. Поэтому ReciveBuffer+totalBytesResive верно. Но во фразе IF ByteResive > 0 THEN - ошибка (чтение кончаецо на первом цикле хотя вполне может и хотеть продолжицо. видимо отсюда потеря части пакета. ). Должно быть как то так:

IF ByteResive = Длинна ожидаемого пакета (вы же мастер и длину можно рассчитать)
OR ReadTimeout.Q THEN
чтение закончили
Ошибка таймаута = ReadTimeout.Q;
END_IF

А так же:

ByteResive := ByteResive + SysComRead(Port, Адрес буфера + ByteResive , Длинна ожидаемого пакета - ByteResive, 0 );

Соотв. перед началом чтения КАЖДОГО НОВОГО ПАКЕТА ByteResive должно быть рано нулю.
Остальной код не смотрел. )

[AlexPC1]

Чтение может происходить в нескольких циклах ПЛК. Поэтому ReciveBuffer+totalBytesResive верно. Но во фразе IF ByteResive > 0 THEN - ошибка (чтение кончаецо на первом цикле хотя вполне может и хотеть продолжицо. видимо отсюда потеря части пакета. ). Должно быть как то так:

IF ByteResive = Длинна ожидаемого пакета (вы же мастер и длину можно рассчитать)
OR ReadTimeout.Q THEN
чтение закончили
Ошибка таймаута = ReadTimeout.Q;
END_IF

А так же:

ByteResive := ByteResive + SysComRead(Port, Адрес буфера + ByteResive , Длинна ожидаемого пакета - ByteResive, 0 );

Соотв. перед началом чтения КАЖДОГО НОВОГО ПАКЕТА ByteResive должно быть рано нулю.
Остальной код не смотрел. )

Спасибо, попробую. Отпишусь