更新KUKA程序

KUKA/KRC/R1/TP/EthernetKRL/EthernetKRL_USER.src

@@ -0,0 +1,39 @@
+&ACCESS RO
+&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