Heisig_GmbH/Uniper_PLC
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added safety program pre comissioning and started implementing different modes

Browse Source
This commit is contained in:
Matthias Heisig
2024-03-20 18:08:57 +01:00
parent 57987cb19f
commit ef26159a4f
55 changed files with 10419 additions and 1663 deletions
Download Patch File Download Diff File Expand all files Collapse all files

58
PLC/POUs/FB_Module.TcPOU
View File

@@ -24,6 +24,9 @@ VAR_INPUT
// Release analog io limit errors
xReleaseLimitErrors : BOOL;
// Release manual mode
xReleaseManualMode : BOOL;
// Input to confirm all errors
xConfirmAlarms : BOOL;
END_VAR
@@ -86,7 +89,8 @@ _fbUnit1(
rSetpointNegolytPumpInlet:= GVL_CONFIG.rPumpNegolytOnPower,
xReleaseErrors:= xReleaseErrors,
xReleaseLimitErrors:= xReleaseLimitErrors,
xConfirmAlarms:= xConfirmAlarms,
xConfirmAlarms:= xConfirmAlarms,
xReleaseManualMode := xReleaseManualMode,
_xWarningConfirmPending=> );
IF _fbUnit1.xWarning THEN
@@ -114,7 +118,8 @@ _fbUnit2(
rSetpointNegolytPumpInlet:= GVL_CONFIG.rPumpNegolytOnPower,
xReleaseErrors:= xReleaseErrors,
xReleaseLimitErrors:= xReleaseLimitErrors,
xConfirmAlarms:= xConfirmAlarms,
xConfirmAlarms:= xConfirmAlarms,
xReleaseManualMode := xReleaseManualMode,
_xWarningConfirmPending=> );
IF _fbUnit2.xWarning THEN
@@ -142,7 +147,8 @@ _fbUnit3(
rSetpointNegolytPumpInlet:= GVL_CONFIG.rPumpNegolytOnPower,
xReleaseErrors:= xReleaseErrors,
xReleaseLimitErrors:= xReleaseLimitErrors,
xConfirmAlarms:= xConfirmAlarms,
xConfirmAlarms:= xConfirmAlarms,
xReleaseManualMode := xReleaseManualMode,
_xWarningConfirmPending=> );
IF _fbUnit3.xWarning THEN
@@ -170,7 +176,8 @@ _fbUnit4(
rSetpointNegolytPumpInlet:= GVL_CONFIG.rPumpNegolytOnPower,
xReleaseErrors:= xReleaseErrors,
xReleaseLimitErrors:= xReleaseLimitErrors,
xConfirmAlarms:= xConfirmAlarms,
xConfirmAlarms:= xConfirmAlarms,
xReleaseManualMode := xReleaseManualMode,
_xWarningConfirmPending=> );
IF _fbUnit4.xWarning THEN
@@ -213,6 +220,7 @@ xOff := _fbUnit1.xOff AND _fbUnit2.xOff AND _fbUnit3.xOff AND _fbUnit4.xOff;
// Calculate module voltage
// ===============================
rCurrentVoltage := _fbUnit1.rCurrentVoltage + _fbUnit2.rCurrentVoltage + _fbUnit3.rCurrentVoltage + _fbUnit4.rCurrentVoltage;
stHMIInterface.rVoltage := rCurrentVoltage;
// ===============================
@@ -278,6 +286,21 @@ IF _xAllUnitsReady AND _xBalanceOk THEN
xReady := TRUE;
ELSE
xReady := FALSE;
END_IF
// ===============================
// Module status sum
// ===============================
IF xOff THEN
stHMIInterface.eStatus := E_COMPONENT_STATUS.OFF;
END_IF
IF xReady THEN
stHMIInterface.eStatus := E_COMPONENT_STATUS.ON;
END_IF
IF xError THEN
stHMIInterface.eStatus := E_COMPONENT_STATUS.ERROR;
END_IF]]></ST>
</Implementation>
<Method Name="FB_init" Id="{369c1d27-76e4-45f8-9dbe-03524d3389df}">
@@ -340,25 +363,33 @@ _fbUnitsOutOfBalanceAlarm.ipArguments.Clear().AddString(_sName);]]></ST>
<LineId Id="575" Count="0" />
<LineId Id="251" Count="4" />
<LineId Id="456" Count="0" />
<LineId Id="256" Count="16" />
<LineId Id="256" Count="7" />
<LineId Id="742" Count="0" />
<LineId Id="264" Count="8" />
<LineId Id="560" Count="0" />
<LineId Id="559" Count="0" />
<LineId Id="561" Count="1" />
<LineId Id="273" Count="5" />
<LineId Id="457" Count="0" />
<LineId Id="279" Count="16" />
<LineId Id="279" Count="7" />
<LineId Id="743" Count="0" />
<LineId Id="287" Count="8" />
<LineId Id="563" Count="2" />
<LineId Id="296" Count="0" />
<LineId Id="574" Count="0" />
<LineId Id="297" Count="4" />
<LineId Id="458" Count="0" />
<LineId Id="302" Count="16" />
<LineId Id="302" Count="7" />
<LineId Id="744" Count="0" />
<LineId Id="310" Count="8" />
<LineId Id="566" Count="2" />
<LineId Id="319" Count="0" />
<LineId Id="573" Count="0" />
<LineId Id="320" Count="4" />
<LineId Id="459" Count="0" />
<LineId Id="325" Count="15" />
<LineId Id="325" Count="7" />
<LineId Id="745" Count="0" />
<LineId Id="333" Count="7" />
<LineId Id="188" Count="0" />
<LineId Id="569" Count="2" />
<LineId Id="441" Count="0" />
@@ -385,6 +416,7 @@ _fbUnitsOutOfBalanceAlarm.ipArguments.Clear().AddString(_sName);]]></ST>
<LineId Id="446" Count="1" />
<LineId Id="445" Count="0" />
<LineId Id="442" Count="0" />
<LineId Id="659" Count="0" />
<LineId Id="440" Count="0" />
<LineId Id="378" Count="3" />
<LineId Id="387" Count="0" />
@@ -434,6 +466,16 @@ _fbUnitsOutOfBalanceAlarm.ipArguments.Clear().AddString(_sName);]]></ST>
<LineId Id="463" Count="0" />
<LineId Id="462" Count="0" />
<LineId Id="455" Count="0" />
<LineId Id="661" Count="0" />
<LineId Id="660" Count="0" />
<LineId Id="662" Count="4" />
<LineId Id="668" Count="0" />
<LineId Id="667" Count="0" />
<LineId Id="669" Count="1" />
<LineId Id="672" Count="0" />
<LineId Id="671" Count="0" />
<LineId Id="675" Count="0" />
<LineId Id="674" Count="0" />
</LineIds>
<LineIds Name="FB_Module.FB_init">
<LineId Id="7" Count="0" />