Jetter JVM-407 Betriebsanleitung Seite 144

7 SAE J1939-STX-API
JetSym STX-Programm
144
JVM-407 fordert mit dem Aufruf der Funktion SAEJ1939GetDM2 () die aktuel-
len Diagnose-Fehlercodes an (PGN 65227).
#Include "SAEJ1939.stxp"
Var
bySAEJ1939Channel
own_Source_Address : Byte;
stdm2stat_pow : TJ1939DM2STAT;
stdm2msg_pow : Array[10]
End_Var;
// 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_wert : Int;
End_Var;
// Die Diagnose-Fehlercodes DM2 POW anfordern
stdm2stat_pow.lBuffer := sizeof (stdm2msg_pow);
Return_wert := SAEJ1939GetDM2 (bySAEJ1939Channel, 0x00,
stdm2stat_pow, stdm2msg_pow);
If Return_wert Then
Trace ('DM2 Request failed');
End_If;
End_Task;
: Byte;
of STJ1939DM2MSG;
5000
Jetter AG