AcsiQualitySource_To_Source

Converts the Source-Bit component of the structured type: ST_AcsiQuality into the enumeration type: E_AcsiQualitySource. Only the Source-Bit component is converted.

Namespace: Tc3_Acsi
Library: Tc3_Acsi (Tc3_Acsi.compiled-library)

Syntax

FUNCTION AcsiQualitySource_To_Source : E_AcsiQualitySource
VAR_INPUT
    in : ST_AcsiQuality;
END_VAR

AcsiQualitySource_To_Source 1: Inputs

Name

Type

Description

in

ST_AcsiQuality

The information to be converted as a Quality-Source-Bit component.

AcsiQualitySource_To_Source 2: Return value

Name

Type

Description

AcsiQualitySource_To_Source

E_AcsiQualitySource

Converted information as a Quality-Source enumeration type.

Sample

METHOD AcsiQualitySource_ToFrom_Source : BOOL
VAR_INPUT
    fbIED  : REFERENCE TO FB_IED;
END_VAR
VAR
    qValue : ST_AcsiQuality;
    sValue : STRING;
END_VAR
IF NOT __ISVALIDREF(fbIED) THEN
    RETURN;
END_IF

Validity_To_AcsiQualityValidity(E_AcsiQualityValidity.Good, bValidity0=>qValue.Validity0, bValidity1=> qValue.Validity1 );
qValue.Overflow := FALSE;
qValue.OutOfRange := FALSE;
qValue.BadReference := FALSE;
qValue.Oscillatory := FALSE;
qValue.Failure := FALSE;
qValue.OldData := FALSE;
qValue.Inconsistent := FALSE;
qValue.Inaccurate := FALSE;
qValue.Source := Source_To_AcsiQualitySource(E_AcsiQualitySource.Substituted);
qValue.Test := TRUE;
qValue.OperatorBlocked := FALSE;
sValue := AcsiQuality_To_String(qValue);(* sValue := 'Q#00|00000000|1|10' *)

IF fbIED.Relay.LLN0.Beh.q.eSource <> AcsiQualitySource_To_Source(qValue) THEN
     qValue := fbIED.Relay.LLN0.Beh.q.qValue;
END_IF

AcsiQualitySource_ToFrom_Source := TRUE;