f_init_flowdef.srf 750 B

1234567891011121314151617181920212223242526272829303132
  1. $PBExportHeader$f_init_flowdef.srf
  2. global type f_init_flowdef from function_object
  3. end type
  4. forward prototypes
  5. global function integer f_init_flowdef ()
  6. end prototypes
  7. global function integer f_init_flowdef ();//初始化默认的审批流程
  8. int rslt=1
  9. string arg_msg = ''
  10. s_oaflow_def[1].flowid=1
  11. s_oaflow_def[1].flowname='发文'
  12. s_oaflow_def[1].flowtype='公文'
  13. s_oaflow_def[1].sortnum='1'
  14. s_oaflow_def[1].if_rivet=0
  15. //s_oaflow_def[1].funcid=35
  16. s_oaflow_def[2].flowid=2
  17. s_oaflow_def[2].flowname='收文'
  18. s_oaflow_def[2].flowtype='公文'
  19. s_oaflow_def[2].sortnum='1'
  20. s_oaflow_def[2].if_rivet=0
  21. //s_oaflow_def[2].funcid=36
  22. if f_update_ins_flowdef(true,arg_msg) = 0 then
  23. messagebox('系统提示',arg_msg)
  24. end if
  25. return rslt
  26. end function