Jetter JVM-407B Betriebsanleitung Seite 165

JVM-407B
JetSym-STX-Programm
Jetter AG
JVM-407B fordert mit dem Aufruf der Funktion SAEJ1939GetDM2 () die
aktuellen Diagnosefehlercodes an (PGN 65227).
#Include "SAEJ1939.stxp"
Var
bySAEJ1939Channel
own_Source_Address : Byte;
stdm2stat_pow : TJ1939DM2STAT;
stdm2msg_pow : Array[10]
End_Var;
Task main autorun
// Initialisierung CAN 1
bySAEJ1939Channel := 1;
own_Source_Address := 20;
SAEJ1939Init (bySAEJ1939Channel, own_Source_Address);
// Wird benötigt für einen zyklischen Task
TaskAllEnableCycle ();
EnableEvents;
End_Task;
Task t_RequestPGN_5000 cycle
Var
Return_value : Int;
End_Var;
// Die Diagnosefehlercodes DM2 POW anfordern
stdm2stat_pow.lBuffer := sizeof (stdm2msg_pow);
Return_value := SAEJ1939GetDM2 (bySAEJ1939Channel, 0x00,
stdm2stat_pow, stdm2msg_pow);
If Return_value Then
Trace ('DM2 Request failed');
End_If;
End_Task;
: Byte;
of STJ1939DM2MSG;
5000
SAE J1939-STX-API
165