АГАВА ПЛК-40. Codesys. Проблемы с FB.

[mr_nik]

Создал проргамму на ST.
Моточасы.

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

В чём проблема, как думаете?

[+] Пример:

01 пробл.png

02 пробл.png

P.S. Есть ли вообще спецы по Агаве?
Я видел упоминания на форуме.
Или же это по сути тот же Овен?
Стоит ли создать отдельный раздел по КБ Агава и их продукции?

[Jackson]

Стоит ли создать отдельный раздел по КБ Агава и их продукции?

Будет масса вопросов - создадим. Можно хоть сейчас.
Если поможете с моделированием - будет всем хорошо (а Вам - большое спасибо).

[mr_nik]

Будет масса вопросов - создадим. Можно хоть сейчас.
Если поможете с моделированием - будет всем хорошо (а Вам - большое спасибо).

Я только начал работать с Агавой и с Codesys.
Так что помогу, чем смогу, каонечно. Но только когда наработки будут хотя бы)

Ну а по поводу непосредственно моего вопроса у Вас есть совет?

[Jackson]

Ну а по поводу непосредственно моего вопроса у Вас есть совет?

Лично у меня нет. Подождите - здесь же много людей.

[megavolt86]

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

Значит блоки не работают раз не считается, в экземпляре включите вход "en". Должно помочь
Upd.
А еще стесняюсь спросить в plc_prg блоки то вызываются? Мало ли....

[mr_nik]

А еще стесняюсь спросить в plc_prg блоки то вызываются? Мало ли....

Удивительно, но проблема была именно в этом.

Спасибо, за совет.

[mr_nik]

Ещё есть вопрос про архивирование.

У ОВЕНа есть отдельный компонент по этому аспекту.
OwenArchiver.
Я пытался его использовать на Агаве, не мудрствуя лукаво, но не вышло.
Там многое упирается в их же компонент Drives, который идёт в составе ОВЕНовских библиотек (и каждая библиотека заточена под соответствующий ПЛК).
А там как раз есть полезная функция для флешки.

Для Агавы соответственно таких компонентов нет.
И по сути все эти инструкции придётся писать вручную.

В связи с выше сказанным вопрос:
Где можно найти информацию о том, как это всё сформулировать на языке ST?

P.S.: тех.поддержка Агавы посоветовала почитать учебники по Паскаль и Делфи =)
Я, конечно, всё понимаю.
Но хотелось бы более насыщенного и сконцентрированного источника информации.

P.P.S.: читаю Петрова, но там мало нюансов и подробностей.

[pike]

Из переносимых между контроллерами библиотек для CodeSys знаю только OSCAT: https://store.codesys.com/oscat-basic.h ... re=default
Все остальное требует требует знания аппаратной платформы и пишется разработчиками контроллеров. Если Агава не написала библиотеку для записи на флэшку, то у вас это вряд ли получится.

[se_sib]

Ещё есть вопрос про архивирование.

Библиотеки есть в магазине codesys
https://store.codesys.com/application.html

Например работа с CSV есть в сборнике IIoT Libraries SL
https://store.codesys.com/application/i ... es-sl.html
(совместимость с Агава надо проверять.)

[mr_nik]

Нашёл решение: использование библиотеки SysFile.
С помощью неё можно сохранять в .csv файл.

Но теперь есть проблема. Как реализовать выдачу команды на запись в этот файл каждый раз в определённый отрезок времени.
Думал сделать через счётчик. Но как?
Ведь у него вход по типу bool.

Может кто-нибудь подсказать?

[Sergy6661]

По таймеру типа TON, по временной метке ... вариантов много.
На ПЛК (любой) производитель делает руководящий документ- "Руководство по программированию" (либо другое аналогичное название).
Вот пока вы такой документ не изучите толку не будет.

[mr_nik]

На ПЛК (любой) производитель делает руководящий документ- "Руководство по программированию" (либо другое аналогичное название).
Вот пока вы такой документ не изучите толку не будет.

Я изучил руководства производителя. Да там есть информация, но она общая. А такие нюансы не объясняются.
При обращении в поддержку - лениво советуют почитать Паскаль и Делфи.
По ST на русском я нашёл только Петрова, но и там по сути только общая информация.
Можете посоветовать что-то конкретное по моей проблеме?

[mr_nik]

UPD:

Сделал периодическую выдачу сигнала на запись (через счётчик).

Но теперь другая проблема.

Данные не записываются в файл последовательно, а просто обновляется строка.
Как можно это реализовать?
Может с использованием других библиотек?

[SMax]

Отправлено спустя 2 минуты 15 секунд:

SysLibFile_RU.pdf

Отправлено спустя 27 минут 33 секунды:
CoDeSys 3.5



https://product-help.schneider-electric ... tocid=_0_0

Отправлено спустя 2 минуты 34 секунды:
AM_APPEND_PLUS - Open an existing file with Append (read/write) access. If file does not exist, Open creates a new file

[mr_nik]

AM_APPEND_PLUS - Open an existing file with Append (read/write) access. If file does not exist, Open creates a new file

Да, действительно, это помогло.
Теперь данные сохраняются, как задумывалось.

[mr_nik]

Теперь есть задача определять флэш-карту, которая будет подключаться для сохранения на неё файла архива.

Как сохранять - понятно.

Но я хочу сделать условие:
- если карта не подключена, то выводить сообщение.

Но я не могу понять какую библиотеку использовать в данном случае и как это сформулировать на языке ST.
По какому признаку следить за тем, что флэш карта смонтирована?
Стоит использовать SysDir Library?

Поделитесь своими советами, пожалуйста.

[SMax]

Ну наверное по возвращаемому значению функции SysFileOpen, равному RTS_INVALID_HANDLE при невозможности открытия/создания файла.

Отправлено спустя 1 час 53 минуты 13 секунд:
Пример:

Код: Выделить всё

VAR
   FileName : STRING := 'c:/test.txt';
   pResult : POINTER TO SysFile.RTS_IEC_RESULT;
   FileHandle : SysFile.RTS_IEC_HANDLE;
END_VAR

FileHandle := SysFileOpen(szFile := FileName, am := AM_APPEND_PLUS, pResult := pResult);

IF FileHandle = SysFile.RTS_INVALID_HANDLE THEN
   //нет доступа к файлу (вывод сообщения)
ELSE
   //Запись в файл (дальнейшие действия)
END_IF

[mr_nik]

Ну наверное по возвращаемому значению функции SysFileOpen, равному RTS_INVALID_HANDLE при невозможности открытия/создания файла.

Попробовал также.

Я, правда, сделал в виде функции.
И вызываю её при нажатии на кнопку.

Безымянный_12.png

Но в таком случае тоже не получается
Подключаю флешку через переходник - не работает.
Директория не та? У производителя в руководстве написано /run/media/sda.

Подскажите, пожалуйста.

Могу детализировать пример, если потребуется.

[SMax]

В руководстве ПК-40 написано:
Файловая система состоит из системной ФС и монтируемой ФС, которая доступна как на чтение, так и для записи, имеющая следующие точки монтирования:
• /run/media/mmcblk* для SD-карты;
• /run/media/sda* для USB-флеш;

В руководстве ПК-30:
• /run/media/mmcblk[0,1]p[0-3] для SD-карты;
• /run/media/sda[1,4] для USB-flash.

Что означают эти цифры и звездочки?
Вам наверное лучше обратится к производителю, для выяснения как обращаться к сменным носителям через переходники и пр.

[mr_nik]

Что означают эти цифры и звездочки?
Вам наверное лучше обратится к производителю, для выяснения как обращаться к сменным носителям через переходники и пр.

Да, действительно странно.

Я перепробовал возможные варианты sda(1,2,3,4) по аналогии с ПЛК-30 - но не получилось.

Жду ответа от тех.поддержки Агава.

[mr_nik]

В руководстве ПК-40 написано:
Файловая система состоит из системной ФС и монтируемой ФС, которая доступна как на чтение, так и для записи, имеющая следующие точки монтирования:
• /run/media/mmcblk* для SD-карты;
• /run/media/sda* для USB-флеш;
В руководстве ПК-30:
• /run/media/mmcblk[0,1]p[0-3] для SD-карты;
• /run/media/sda[1,4] для USB-flash.
Что означают эти цифры и звездочки?
Вам наверное лучше обратится к производителю, для выяснения как обращаться к сменным носителям через переходники и пр.

Тех. поддержка ответила, что для USB-флэш: /run/media/sda1

Но сохранение всё равно не происходит.

Я монтирую пустую флэшку. Может из-за этого?
Хотя по идее SysFileOpen должен в этом случае создавать новый файл.

Вы видели мой код. Всё корректно?
Или всё-таки что-то надо изменить?

[Velt]

Но сохранение всё равно не происходит.

Проверьте требования к формату флешки. Скорее всего, она должна быть отформатирована под FAT32.

[VADR]

Попробуйте для теста написать другую функцию, с операцией чтения. Файлик вручную на компе создайте и попробуйте прочитать. Если не будет читаться - возможно, у вас обращение не к тому устройству. И, кстати, существует ли функция чтения каталогов? Если есть - попробуйте ей прочитать содержимое каталога /run/media/ - туда по идее должны монтироваться флешки и карты, надо убедиться, что они действительно монтируются.

[mr_nik]

Попробовал другой вариант по совету тех.поддержки Агава (см. вложение под спойлером).
Советовали использовать CAA File библиотеку вместо SysFile.

[+] Вот такой пример

fyecfyceyf1111111111111111.png

Действительно помогло, файл копировался на флешку. (Правда при подключении флешки к любому ПК каждый раз винда ругалась, что флешку надо восстановить).

Но файл копировался корректно.

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

В моём случае я просто взял две текстовых формы и в их признаке невидимости привязал переменные bool (сделав их глобальными).
И просто записывал true или false, меняя видимость этих "табло".

В ответ на эти вопросы, мне сказали вообще использовать CASE.
И я попробовал

[+] Я выполнил в таком виде:

Код: Выделить всё

​​​​
FUNCTION SAVE_TO_FLASH: RTS_IEC_RESULT
VAR CONSTANT
    sFileNewName: STRING := '/run/media/sda1/data.csv';
    sFileOldName: STRING := '/run/media/mmcblk1p1/data.csv';
END_VAR
VAR
    FileStatus: uint := 0;
    Sync: RTS_IEC_RESULT;
    fileopn: FILE.Open;
    filecp: FILE.Copy;
    filecls: FILE.Close;
    filerd: FILE.Read;
    hFile: FILE.CAA.HANDLE;
    sSizeString: STRING := '';
END_VAR

_____________________________________


FileStatus := 0;

CASE FileStatus OF
    0:
        filecp( 
        sFileNameSource := sFileOldName, 
        sFileNameDest := sFileNewName,
        udiTimeOut := 3000000,
        xOverWrite := TRUE);
        FileStatus := 1;
    1:
        filecp.xExecute := TRUE;
        IF filecp.xDone THEN
            FileStatus := 2;
        END_IF
        IF filecp.xError THEN
            GVL.copy_err := TRUE;
            GVL.flash_NC := FALSE;
            GVL.arch_save := FALSE;
        END_IF
    2:    fileopn(
            sFileName := sFileNewName, 
            eFileMode := File.MODE.MREAD);
        fileopn.xExecute := TRUE;
        hFile := fileopn.hFile;
    3:    filerd(
            hFile := hFile,
            udiTimeOut := 3000000,
            pBuffer := ADR(sSizeString),
            szBuffer := 255);
            
        filerd.xExecute := TRUE;
            
        IF filerd.xDone THEN
            GVL.copy_err := FALSE;
            GVL.flash_NC := FALSE;
            GVL.arch_save := TRUE;
            FileStatus := 4;
        ELSE
            GVL.copy_err := FALSE;
            GVL.flash_NC := TRUE;
            GVL.arch_save := FALSE;
            FileStatus := 4;
        END_IF
        IF filerd.xError THEN
            GVL.copy_err := TRUE;
            GVL.flash_NC := FALSE;
            GVL.arch_save := FALSE;
            FileStatus := 4;
        END_IF
    4:
        FileStatus := 0;
        filecls.hFile := hFile;
        filecls.xExecute := TRUE;
END_CASE

SysProcessExecuteCommand( '/bin/sync', ADR( Sync ) );

Но теперь уже ничего не копируется :)

Подскажите, какие нюансы упускаю?
Вроде и библиотечные примеры посмотрел и у Петрова почитал.