FB_SoEReadDcBusVoltage_ByDriveRef

With the FB_SoEReadDcBusVoltage_ByDriveRef function block the DC-Bus voltage of the drive (S-0-0380) can be read.

Inputs

VAR_INPUT
   stDriveRef : ST_DriveRef; 
   bExecute   : BOOL; 
   tTimeout   : TIME := DEFAULT_ADS_TIMEOUT;
END_VAR

Name	Type	Description
stDriveRef	ST_DriveRef	Reference to the drive. The reference to the drive can be linked directly to the PLC in the System Manager. To do this, an instance of the structure ST_PlcDriveRef must be allocated and the NetID must be converted from the byte array into a string. (Type: ST_DriveRef)
bExecute	BOOL	The function block is enabled via a positive edge at this input.
tTimeout	TIME	Maximum time allowed for the execution of the function block.

Outputs

VAR_OUTPUT
   bBusy         : BOOL;
   bError        : BOOL;
   iAdsErrId     : UINT;
   iSercosErrId  : UINT;
   dwAttribute   : DWORD;
   fDcBusVoltage : REAL;
END_VAR

Name	Type	Description
bBusy	BOOL	This output is set when the function block is activated, and remains set until a feedback is received.
bError	BOOL	This output is set after the bBusy output has been reset when an error occurs in the transmission of the command.
iAdsErrId	UINT	In the case of a set bError output returns the ADS error code of the last executed command.
iSercosErrId	UINT	In the case of a set bError output returns the Sercos error of the last executed command.
dwAttribute	DWORD	Returns the attributes of the Sercos parameter.
fDcBusVoltage	REAL	Supplies the DC bus voltage of the drive.

Sample

VAR
   bInit                : BOOL;
   fbReadDcBusVoltage   : FB_SoEReadDcBusVoltage_ByDriveRef;
   bReadDcBusVoltage    : BOOL;
   fDcBusVoltage        : REAL;
   stPlcDriveRef AT %I* : ST_PlcDriveRef;
   stDriveRef           : ST_DriveRef;
END_VAR

IF bInit THEN
   stDriveRef.sNetId := F_CreateAmsNetId(stPlcDriveRef.aNetId);
   stDriveRef.nSlaveAddr := stPlcDriveRef.nSlaveAddr;
   stDriveRef.nDriveNo := stPlcDriveRef.nDriveNo;
   stDriveRef.nDriveType := stPlcDriveRef.nDriveType;
   IF (stDriveRef.sNetId <> '') AND (stDriveRef.nSlaveAddr <> 0) THEN
      bInit := FALSE;
   END_IF
END_IF

IF bReadDcBusVoltage AND NOT bInit THEN
   fbReadDcBusVoltage(stDriveRef := stDriveRef,
                      bExecute := TRUE,
                      tTimeout := DEFAULT_ADS_TIMEOUT,
                      fDcBusVoltage => fDcBusVoltage );

   IF NOT fbReadDcBusVoltage.bBusy THEN
      fbReadDcBusVoltage(stDriveRef := stDriveRef, bExecute := FALSE);
      bReadDcBusVoltage := FALSE;
   END_IF
END_IF