Sub Initialize
'depNames = linkeyuser.GetFullDeptNameByUserName(WF_UserName)+","+linkeyuser.GetOtherDeptNameByUserName(WF_UserName)
depNames = linkeyuser.GetFullDeptNameByUserName(WF_UserName)+","+join(LinkeyUser.GetUserPropertyByUserName(WF_UserName,"OtherFolderId_show"),",")
WF_Document.WF_FieldValue=fulltrim(split(depNames, ","))
End Sub
'depNames = linkeyuser.GetFullDeptNameByUserName(WF_UserName)+","+linkeyuser.GetOtherDeptNameByUserName(WF_UserName)
depNames = linkeyuser.GetFullDeptNameByUserName(WF_UserName)+","+join(LinkeyUser.GetUserPropertyByUserName(WF_UserName,"OtherFolderId_show"),",")
WF_Document.WF_FieldValue=fulltrim(split(depNames, ","))
End Sub