[r817]: / branches / FeatureBranches / Debuglogging / SparkplugB / Function Blocks / CmpSparkplugLog / CmpSparkplugLog_1 / AddLogEntry / svnobj  Maximize  Restore  History

Download this file

34 lines (33 with data), 3.6 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
// adds a message to the log
METHOD AddLogEntry : ERROR
VAR_IN_OUT CONSTANT
	sMsg : T_MaxString;
END_VAR
VAR_INPUT    
    udiCmpID : UDINT(4096..8191);
	udiLogClass : UDINT;
VAR
// check if verbose level isn't matching 
IF NOT VerboseLevelOK( udiLogClass := udiLogClass, 
                       LogError => AddLogEntry ) THEN
    RETURN;
END_IF
// Check component input vs configured
CASE udiCmpID OF
    GC_Sparkplug.CMP_EDGE, 
    GC_Sparkplug.CMP_HOST, 
    GC_Sparkplug.CMP_CORE : 
        AddLogEntry := ERROR.NO_ERROR;
ELSE
	AddLogEntry := ERROR.CREATE_LOGGER;
END_CASE
// finally add the log
CmpLog.LogAdd2( hLogger := _hLog, 
                udiCmpID := udiCmpID, 
                udiClassID := ANY_NUM_TO_UDINT(udiLogClass), 
                udiErrorID := udiRTS_IEC_RESULT, 
                udiInfoID := UDINT#0, 
                pszInfo := sMsg);
// return with a message	
IF udiRTS_IEC_RESULT <> 0 THEN
	AddLogEntry := ERROR.CREATE_MSG;