Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

SCL compiler error "period not allowed"

Created by: FormatC at: 6/23/2018 2:10 AM (2 Replies)

Rating (1)

Thanks 1

3 Entries

6/23/2018 2:10 AM	Rate (0)
FormatC Advanced Member Joined: 4/9/2018 Last visit: 8/31/2022 Posts: 16 Rating: (0)	Hi all. Im having trouble with the scl compiler. It returns "period not allowed". Anyone know what this mean? Im thinking it may got something to do with the structured arrays used in the code (i relly want to keep these). If you have any ideas im happy for some input. Note. Block is alpha version, be kind:) Code; //Build DP state structure, and timestamp changes in state for tiCt:=1 to 128 do //Trigger oneshots for time monitoring tbRtrigHealthy[tiCt] := tbDPHelathy[tiCt] and not sDPstate[tiCt].Healthy; //Healthy pos edge tbRtrigFaulty[tiCt] := (sDPstate[tiCt].Configured and not sDPstate[tiCt].Healthy); //Scratch tbRtrigFaulty[tiCt] := tbRtrigFaulty[tiCt] and not sDPstate[tiCt].Failure; //Failure pos edge //Update static vars sDPstate[tiCt].Configured := tbDPConf[tiCt]; sDPstate[tiCt].Healthy := tbDPHelathy[tiCt]; sDPstate[tiCt].Failure := sDPstate[tiCt].Configured and not sDPstate[tiCt].Healthy; IF tbRtrigHealthy[tiCt] OR tbRtrigFaulty[tiCt]THEN sDPstate.TSFOR[tiCt] := T#0s; //Reset timer sDPstate.TSTAMP[tiCt] := ttNow; //Time stamp event END_IF; sDPstate.TSFOR[tiCt] := ttNow - sDPstate.TSTAMP[tiCt]; if (sDPstate.TSFOR[tiCt] < T#0s) then sDPstate.TSFOR[tiCt] := sDPstate.TSFOR[tiCt] + dint_to_time(cdiMaxTimeValue); end_if; end_for; Attachment (Sys) Diag.zip (23 Downloads)
	L P#Problem LAR1 L #Solution T B [AR1 , P#0.0] SIT PRAY
Suggestion To thank Quote Answer

6/23/2018 10:47 AM	Rate (1)
jacek d Platinum Member Joined: 9/23/2005 Last visit: 3/24/2023 Posts: 4129 Rating: (634)	Don't you think that sDPstate array indexing in this part is s...d up? FormatC sDPstate.TSFOR[tiCt] := T#0s; //Reset timer sDPstate.TSTAMP[tiCt] := ttNow; //Time stamp event END_IF; sDPstate.TSFOR[tiCt] := ttNow - sDPstate.TSTAMP[tiCt]; if (sDPstate.TSFOR[tiCt] < T#0s) then sDPstate.TSFOR[tiCt] := sDPstate.TSFOR[tiCt] + dint_to_time(cdiMaxTimeValue);
	Regards, Jacek What is confusing you is the fact that you never see a number but always its digit representation. So you end up thinking that the number is the representation. - Andrej Bauer Any claims against me - based on whatever legal reason - resulting from the use of any code and/or ideas presented on this forum shall be excluded. #StayWithUkraine
Suggestion To thank Quote Answer

6/23/2018 11:10 AM	Rate (0)
FormatC Advanced Member Joined: 4/9/2018 Last visit: 8/31/2022 Posts: 16 Rating: (0)	Omg Late night programming... Thank you for yor reply. Code compiles Code: IF tbRtrigHealthy[tiCt] OR tbRtrigFaulty[tiCt]THEN sDPstate[tiCt].TSFOR := T#0s; //Reset timer sDPstate[tiCt].TSTAMP := ttNow; //Time stamp event END_IF; sDPstate[tiCt].TSFOR := ttNow - sDPstate[tiCt].TSTAMP; if (sDPstate[tiCt].TSFOR < T#0s) then sDPstate[tiCt].TSFOR := sDPstate[tiCt].TSFOR + dint_to_time(cdiMaxTimeValue); end_if; end_for;
	L P#Problem LAR1 L #Solution T B [AR1 , P#0.0] SIT PRAY
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users jacek d

|

Share this page:

Share this page on...

Follow us on