| 12345678910111213141516171819 |
- $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
|
