Initializer

FUNCTION_BLOCK Initializer EXTENDS Intra.RootObject IMPLEMENTS Intra.IInifileProcessor
VAR_INPUT

END_VAR
VAR_OUTPUT
END_VAR
VAR

	xFirstRun : BOOL := TRUE;
	fbSDOSender : SDOSender;

	refIni : Intra.IInifileProcessor;
	fbIniFileReader : Intra.IniFileReader;


	Packet : ARRAY [1..56] OF SDOData;
	usiCNT	:	USINT := 1;

	usiSDOCnt : USINT := 1;

	xEnableReset : BOOL := FALSE;
	xIniFileError : BOOL;
	sIniFileError : STRING (60);

	xError : BOOL;
	sError : STRING;

	uiDebugCNT : UINT := 0;

END_VAR


IF xTriggerAufbereitungIniChanged THEN

	IF  xEnableReset THEN
		usiSDOCnt := 1;
		usiCNT := 1;
		xFirstRun := TRUE;
		xEnableReset := FALSE;
		fbIniFileReader.PxInifileDone := FALSE;
	END_IF

	//Aktiviere Inifile reader:
	;
	__QUERYINTERFACE(PLC_PRG.fbModel.muTriggerAufbereitung.fbInitializer, refIni);
	fbIniFileReader(sIniFileName := 'Storage\TriggerAufbereitung.ini', refIInifileProc := refIni);


END_IF


IF fbIniFileReader.xInifileDone THEN
		uiDebugCNT := uiDebugCNT + 1;
		IF usiSDOCnt < 57 THEN
			IF fbSDOSender.xSDODone OR xFirstRun THEN
			xFirstRun := FALSE;
			fbSDOSender.udiValue := Packet[usiSDOCnt].Values[1];
			fbSDOSender.uiIndex := Packet[usiSDOCnt].Indices[1];
			fbSDOSender.uiSubIndex := Packet[usiSDOCnt].SubIndices[1];
			fbSDOSender.xSend := TRUE;
			usiSDOCnt := usiSDOCnt + 1;


			END_IF
			ELSE
			xTriggerAufbereitungIniChanged := FALSE;
			fbIniFileReader.PxInifileDone := FALSE;
			xEnableReset := TRUE;
		END_IF
END_IF

fbSDOSender();