phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixed mode change delay

Browse Source
This commit is contained in:
Infineon\StieberD
2024-09-06 15:22:15 -07:00
parent 6a433af299
commit c4a3a9ddce
3 changed files with 23 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
LSL2/STPROC/MONA_SERVICES.txt
View File

@ -98,12 +98,13 @@ Service SendBufferedStatus(MonaResource, StatusName, StatusValue)
Loop
while (isSuccessful EQ False$ and retries GT 0)
waitSeconds = (2 - retries) * backoffSeconds
waitSeconds = (3 - retries) * backoffSeconds
Delay(waitSeconds)
retries = retries - 1
response = Httpclient_Services('SendHTTPRequest', 'POST', ApiUrl, 'Content-Type':@VM:'application/json':@FM:'Accept':@VM:'*/*', RequestBodyJson, '', '', False$, False$, '')
If response EQ '"Request queued for processing"' then
isSuccessful = True$
end
@ -154,7 +155,7 @@ Service SendBufferedAverageMetric(MonaResource, MetricName, MetricValue)
Loop
while (isSuccessful EQ False$ and retries GT 0)
waitSeconds = (2 - retries) * backoffSeconds
waitSeconds = (3 - retries) * backoffSeconds
Delay(waitSeconds)
retries = retries - 1