(* @PATH := '\/TASK2_ControlMain\/Blender_Logic' *)
(* @SYMFILEFLAGS := '59392' *)
PROGRAM SyrupRoomCtrl
VAR
	mChangeSyrupTankONS				: R_TRIG ;
	mChangeSyrupLitersONS				: R_TRIG ;
	mSaveLiters							: REAL ;
	mSaveNumTank						: INT ;

	mDummy							: BOOL ;
END_VAR

VAR_OUTPUT
	EN_Out						: BOOL ;
END_VAR

(* @END_DECLARATION := '0' *)
_LD_BODY
_NETWORKS : 1
_NETWORK

_COMMENT

_END_COMMENT
_LD_ASSIGN
_EMPTY
_EXPRESSION
_POSITIV


ENABLELIST : 1
_ASSIGN
_FUNCTIONBLOCK
???
_BOX_EXPR : 0
_ENABLED
_EXPRESSION
_POSITIV
SyrupRoomCtrl.UpdateValues
_OUTPUTS : 0
_EXPRESSION
_POSITIV
_OUTPUTS : 1
_OUTPUT
_POSITIV
_NO_SET
mDummy
ENABLELIST_END
_OUTPUTS : 0

END_PROGRAM
ACTION	UpdateValues:
gH_ProcessSetup_SyrupRoomTank := LIMIT (1, gH_ProcessSetup_SyrupRoomTank, 20) ;
IF NOT gH_Blender_OPT_FastChangeOverEnabled THEN
	IF mSaveNumTank=0 THEN
		mSaveNumTank := gH_ProcessSetup_SyrupRoomTank ;
	END_IF
	IF mSaveNumTank<>gH_ProcessSetup_SyrupRoomTank THEN
		gH_ProcessSetup_SyrupRunOutLiters := gSyrupRoomTankLiter[gH_ProcessSetup_SyrupRoomTank] ;
		mSaveNumTank := gH_ProcessSetup_SyrupRoomTank ;
	END_IF
	IF gH_ProcessSetup_SyrupRunOutLiters<>gSyrupRoomTankLiter[gH_ProcessSetup_SyrupRoomTank] THEN
		gSyrupRoomTankLiter[gH_ProcessSetup_SyrupRoomTank] := gH_ProcessSetup_SyrupRunOutLiters ;
	END_IF
ELSE
	gH_ProcessSetup_SyrupRoomTank := 1 ;
END_IF


END_ACTION