40 lines
1.1 KiB
Plaintext
40 lines
1.1 KiB
Plaintext
&ACCESS RO3
|
|
&REL 2314
|
|
&PARAM DISKPATH = TP/EthernetKRL
|
|
DEF EthernetKRL_USER( )
|
|
;************************************************************
|
|
; CopyRight KUKA Deutschland GmbH 2018
|
|
; last modified 11.07.2012
|
|
; prefix EKI
|
|
; functions user routine for error handling
|
|
;************************************************************
|
|
END
|
|
|
|
;FOLD EKI_UserProgram
|
|
; ===========================================================
|
|
GLOBAL DEF EKI_Check_User(Ret:IN,Type:IN,strChannelName[]:IN)
|
|
;FOLD Initialize variables
|
|
DECL CHAR strChannelName[]
|
|
DECL EKI_STATUS Ret
|
|
DECL EKrlMsgType Type
|
|
INT Handle
|
|
DECL KrlMsg_T name
|
|
DECL KrlMsgPar_T params[3]
|
|
DECL KrlMsgOpt_T options
|
|
DECL STATE_T Stat
|
|
DECL MODUS_T Mode
|
|
DECL BOOL B
|
|
DECL INT Offset
|
|
;ENDFOLD
|
|
|
|
IF (VARSTATE("strChannelName[]")==#INITIALIZED) THEN
|
|
; strChannelName is initialized
|
|
ENDIF
|
|
|
|
;************************************************************
|
|
;write your error handling here
|
|
;************************************************************
|
|
|
|
END
|
|
;ENDFOLD EKI_UserProgram
|
