Сообщения

1

Ваши вопросы / Re: Вопросы и предложения по Simple-Scada 2

« : 18 Июня 2025, 16:41:21 »

При отправке PUT-запроса все работает нормально.
На такой же POST-запрос сервер отвечает: 501 - Not Supported
На GET-запрос - ответ 500 - Server Error

2

Ваши вопросы / Re: Вопросы и предложения по Simple-Scada 2

« : 18 Июня 2025, 14:08:38 »

Добрый день. Полное описание сервиса отсутствует.
Запрос  методом Put http://192.168.16.200:8080/R2500~std~DT7AJBL/process-command
заголовки:

Код

Accept: application/json, 
Content-Type: application/json, 
Connection:keep-alive, 
Cookie: sid=..., 
Expect: 100-continue.

Тело запроса:

Код

{"command' : "pause", "delay": null}

или

Код

{"command' : "start", "delay": null, "phase" : 8}

Ответ: Response code: 200
Тело ответа:

Код

{
    "ticket": "325c9a32-085a-43b6-9c23-fc1b8aef3dca"
} 

3

Ваши вопросы / Re: Вопросы и предложения по Simple-Scada 2

« : 12 Июня 2025, 11:50:33 »

Добрый день! Добавьте пожалуйста возможность отправлять PUT-запросы.

4

Ваши вопросы / Re: Вопросы по скриптам в Simple-Scada 2

« : 13 Января 2025, 16:35:39 »

Добрый день!
Есть таблица MySql, которую SCADA заполняет переменными. Эта таблица отображается в SCADA через метод RunSQL компонента таблица. Необходимо корректировать значения некоторых полей вручную из скады.
Пробовал подвязать такой скрипт на событие oncelldatachange таблицы

Код: (delphi)

var aID, aValue, aField, aQuery:string;
AisString:boolean;
begin
aID:=Table17.GetCell(0, Cell.Row).Text;
aValue:= Table17.GetCell(Cell.Col, Cell.Row).Text;
AisString:= false;
case Cell.Col of
0: exit;
1: aField:='cam';   //
2: aField:='poc';
3: aField:='vol';
4: begin aField:='sta'; AisString:= true; end;
5: begin aField:='end'; AisString:= true; end;
6: begin aField:='ope'; AisString:= true; end;
7: aField:='drd';
8: aField:='drh';
9: aField:='drs';
10: aField:='tck';
11: begin aField:='wid'; AisString:= true; end;
12: begin aField:='por'; AisString:= true; end;
13: begin aField:='typ'; AisString:= true; end;
14: aField:='wms';
15: aField:='wmf';
16: aField:='ene';
17: aField:='qen';
18: aField:='war';
19: aField:='qwa';
20: aField:='zag';
21: aField:='pro';
end;
if AisString then aQuery:= 'UPDATE `test` SET `'+aField+'`='+Quotedstr(aValue) +' WHERE `id`=' +aID+';'
else aQuery:= 'UPDATE `test` SET `'+aField+'`='+aValue +' WHERE `id`=' +aID+';';
RunSQL(aQuery, nil, 134);
end.

, но скрипт не выполняется вероятно из-за того, что не изменялись переменные, связанные с таблицей. Есть ли какая-нибудь возможность выполнить UPDATE поля таблицы БД при изменении соответствующего поля таблицы в SCADA?