Jetter JVM-407B-HMI, Руководство пользователя

Страница: 162 / 300

162 Jetter AG
7 SAE J1939 STX API
By calling up the function SAEJ1939GetDM1 () , the JVM-407B requests the
current diagnostics error code (PGN 65226).
#Include "SAEJ1939.stxp"
Var
bySAEJ1939Channel : Byte;
own_Source_Address : Byte;
stdm1stat_pow : TJ1939DM1STAT;
stdm1msg_pow :
Array [ 10 ] of STJ1939DM1MSG;
MyTimer : TTimer;
End_Var ;
Task main autorun
// Initializing CAN 1
bySAEJ1939Channel := 1 ;
own_Source_Address := 20 ;
SAEJ1939Init (bySAEJ1939Channel, own_Source_Address);
TimerStart (MyTimer,
T#2s );
Loop
When (TimerEnd (MyTimer)) Continue ;
// Requesting diagnostics error codes DM1 POW
stdm1stat_pow.lBuffer := sizeof (stdm1msg_pow);
SAEJ1939GetDM1 (bySAEJ1939Channel,
0x00 , stdm1stat_pow,
stdm1msg_pow);
TimerStart (MyTimer,
T#2s );
End_Loop ;
End_Task ;
JetSym STX program