$PBExportHeader$f_open_cred.srf
global type f_open_cred from function_object
end type

forward prototypes
global subroutine f_open_cred (long arg_credid)
end prototypes

global subroutine f_open_cred (long arg_credid);s_edit_index_tran s_tran_cred //翻页功能窗口 传递参数使用
s_tran_cred.if_retrieve_all = True //是否一次RETRIEVE所有行
s_tran_cred.work_mode = 0 //0-单纯编辑模式, 1-选择模式
s_tran_cred.arg_pkid = 0 //目标定位PKID (备用)
s_tran_cred.arg_string_code = '' //查询列部分内容,用于初步筛选 
s_tran_cred.e_long = arg_credid

OpenWithParm(w_credence_edit,s_tran_cred)

end subroutine