跳转到二次开发功能

 跳转到对象为“YSB”对象的功能

Global Char GYSHOCONNUM    : GYSHOCONNUM=[M:ZSC0]SHOCONNUM 

   Call OBJET("YSB",[M:ZSC0]SHOCONNUM,"") From GOBJET

#GESYSB

$FILTRE #定位主关键字
If (dim(GYSHOCONNUM)>0 )
    CRITERE = "ysorbzbh = GYSHOCONNUM "
Endif
Default File [YSB]
Return

#########################################################################################
#结束时 释放全局变量参数
##########################################################################################
$FERME
If dim(GYSHOCONNUM)>0
  Kill GYSHOCONNUM
Endif


Return