f_init_yunregcom.srf 392 B

123456789101112131415161718
  1. $PBExportHeader$f_init_yunregcom.srf
  2. global type f_init_yunregcom from function_object
  3. end type
  4. forward prototypes
  5. global subroutine f_init_yunregcom (ref string arg_msg)
  6. end prototypes
  7. global subroutine f_init_yunregcom (ref string arg_msg);uo_comhelper uo_com
  8. uo_com = create uo_comhelper
  9. arg_msg = ''
  10. YunRegCom = uo_com.uf_get_yunregcom(ref arg_msg)
  11. destroy uo_com
  12. end subroutine