牛刀小试、用SharePoint 实现请假管理功能

“请假管理”应用，应该算是 SharePoint 的“Hello World！”、川菜里面的鱼香肉丝、粤菜里面的蛋炒饭 。。。吧？

怎么样才能做出简易、实用的请假管理，一直都是都是一个问题。完全 code free 不写代码是搞不出来的，完全写代码实现的话又何必用 SharePoint？简洁、轻快的解决方案才是我们追求的。

问题

通常的“请假管理” SharePoint 实现存在这样几个问题：

权限。
要么就是所有人都可以看见你的请假单，要么就是只有你自己可以看到，要了命了。参见 这里 的描述。常见的解决方案，要么就是直接忽略这个问题，或者用视图来过滤筛选，但这不是根本的办法。

预先指定审批人员。
而实用的要求，其实是动态的指定审批人员。而且，往往并不是先由上级职能经理审批，而是先由所在项目的项目经理审批、职能经理一般只要项目经理没意见都会同意的。

年假天数约束。
假别里面如果是年假，则应该有天数的限制，且每年重置。软件应当自动对剩余年假天数做核对，避免需要人工再去查年假天数。

孤立。
没有和 SharePoint 其它应用配合，比如项目、日历。

目标

实用的“请假管理”应该什么样子呢？

1、所有人都可以提出请假申请。如下图所示：

2、自动查找合适的审批人。在项目中则项目经理就是审批人（直接去项目列表中找“项目经理”字段对应的用户），否则就是职能部门经理（如下图所示）。

3、不能申请超出可用年假天数的年假。

4、但是，一旦提交申请，就只有本人、审批人、管理员可以看到。而且审批人有“批准”权限。

注意：SharePoint 只允许每个列表拥有 8000 个独立权限的列表项。所以，后面要配合列表的信息管理策略将完成的请假单转移到别的地方。

5、申请人发起请假流程。

6、审批人审批请假申请。

7、审批完成后不能再修改申请。

配置信息管理策略将“声明为记录”的项在1个月后移动到其它的文档库，避免拥有独立权限的项目超过 SharePoint 对每个列表 8000 条的限制。

8、如果同意了年假申请，那么，自动从当年年假中扣除。

9、申请同意后自动加入请假日历。

该日历可以和其它日历合并在内网门户上显示。

实现

说实话，实现起来并不简单。但是，通过努力，可以保持解决方案的干净、轻快，与整个架构体系融合在一起。

1、所有人都可以提出请假申请。
直接断开“请假单”列表的权限继承，为所有用户设置“参与讨论”权限级别即可。
具体操作参见这里 中断列表或库的权限继承。

2、自动查找合适的审批人。
开发自定义字段，加入“请假单”列表。
此自定义字段将获取申请人所在项目的项目经理或者申请人的上级职能经理。
创建自定义字段类型的文章在这里 创建自定义 SharePoint 2010 字段类型。
获取当前用户的上级职能经理。需要用到 UserProfileManager 对象。

UserProfileManager upm = new UserProfileManager(SPServiceContext.Current);
if (upm.UserExists(user.LoginName))
{   
    UserProfile u = upm.GetUserProfile(user.LoginName);
    UserProfile[] managers = u.GetManagers();
    if (managers != null)
    {
        foreach(UserProfile manager in managers){
            SPUser u_manager = web.SiteUsers[manager[PropertyConstants.AccountName].Value.ToString()];
            // 其它自定义代码。
        }
    }
}

3、不能申请超出可用年假天数的年假。
这里需要用 SharePoint Designer 修改“请假单”列表的“NewForm.aspx”文件，利用 JavaScript 脚本调用 SharePoint 的 Client Object Model 获取剩余年假并显示在界面上。
首先，需要引入几个 js 库：jQuery 和 jQuery.SPServices。jQuery 已经放入 masterpage。

<SharePoint:ScriptLink Name="SP.js" runat="server" OnDemand="true" Localizable="false" />
<script src="http://www.cnblogs.com/DocLib/spservices/jquery.SPServices-0.7.1a.min.js" type="text/javascript"></script>

然后，在选择假别的下拉框内容改变时，读取可用年假天数。 （我当时为什么要用 lj 做变量名？我也很奇怪。）

$('select[title="假别"]').change(function(){
    var lj=$(this).val();
    if(lj=='年假'){
        ExecuteOrDelayUntilScriptLoaded(get_annual_leave_days, "sp.js");        }
    else{
        $("nobr:contains('请假天数')").children().each(function(){
            $(this).html("*");
        });
    }
});

get_annual_leave_days 方法将读取当前用户所剩余年假天数。下面函数中变量命名方法并不统一，这是这些代码来自多个不同时期的不同项目的印记啊！软件开发是个手艺活儿。
"_x5269__x4f59__x5e74__x5047__x59" 是字段“剩余年假天数”的 InnerName。

var _ctx = null;
var _items = null;
function get_annual_leave_days(){
    _ctx = new SP.ClientContext.get_current();
    var web = _ctx.get_web();
    var lists = web.get_lists();
    var list_annual_leave = lists.getByTitle("年假汇总");

    var currentDate = new Date();
    var year = currentDate.getFullYear();
    var currentUserID = $().SPServices.SPGetCurrentUser({
        fieldName: "ID",
        debug: false
    });
    

    var camlQuery = new SP.CamlQuery();
    var strCaml = "<View>" +
        "<Query>" +
            "<Where>"+
                "<And>"+
                    "<Eq>"+
                        "<FieldRef Name='_x4eba__x5458_' LookupId='TRUE' />"+
                        "<Value Type='Lookup'>"+currentUserID+"</Value>"+
                    "</Eq>"+
                    "<Eq>"+
                        "<FieldRef Name='_x5e74__x4efd_' />"+
                        "<Value Type='Integer'>"+year+"</Value>"+
                    "</Eq>"+
                "</And>"+
            "</Where>"+
        "</Query>" +
    "</View>";
    camlQuery.set_viewXml(strCaml);
    this._items = list_annual_leave.getItems(camlQuery);
    _ctx.load(_items);

    _ctx.executeQueryAsync(Function.createDelegate(this, this.onSuccess), Function.createDelegate(this, this.onFail));
}
function onSuccess(sender, args) {
    var listItemEnumerator = this._items.getEnumerator();
    while(listItemEnumerator.moveNext()) {
        var oListItem = listItemEnumerator.get_current();
        var days = oListItem.get_item("_x5269__x4f59__x5e74__x5047__x59");
        $("nobr:contains('请假天数')").children().each(function(){
            $(this).html("（剩余 "+days+" 天）*");
        });
    }
}
function onFail(sender, args) {
    alert('获取年假天数时出错：' + args.get_message());
}

更多的技术细节可以参考 ECMAScript 对象模型系列，这个系列讲解很细致了。另外，JS 脚本调用 SharePoint 的 JSCOM 时是异步操作，回调次数多了代码会很乱，这篇 使用Jscex增强SharePoint 2010 JavaScript Client Object Model (JSOM) 提供了一优化代码的解决方案可供参考。

4、但是，一旦提交申请，就只有本人、审批人、管理员可以看到。而且审批人有“批准”权限。
为实现这个功能，需要处理列表的 Create 事件。
先断开现有的继承权限。

item.BreakRoleInheritance(false);

然后，绑定新的权限。

protected void bind_role(SPListItem item, SPPrincipal principal, SPRoleDefinition definition)
{
    try
    {
        SPRoleAssignment assignment = new SPRoleAssignment(principal);
        assignment.RoleDefinitionBindings.Add(definition);
        item.RoleAssignments.Add(assignment);
    }
    catch (Exception ex)
    {
        throw ex;
    }
}

对某个用户执行绑定角色的操作。

bind_role(item, user, web.RoleDefinitions["参与讨论"]);

5、申请人发起请假流程。
用 SharePoint Designer 建立请假流程。

6、审批人审批请假申请。
审批即可。可以用 InfoPath Designer 从 SPD 中打开美化一下任务界面。
如果需要对任务也实施和“请假单”相同的权限控制，可以参考对“请假单”的处理一样进行。

7、审批完成后不能再修改申请。
需要开发处理工作流事件的代码，声明当前项目为记录。

SPWorkflow wf = new SPWorkflow(web, properties.InstanceId);
SPList list = web.Lists[wf.ListId];
if (list.Title == "请假单") 
{
       SPListItem item = list.Items.GetItemById(wf.ItemId);
       title = item.Title;
       if (!Records.IsRecord(item))
       {
     Records.DeclareItemAsRecord(item);
     }
}

还需要配置信息管理策略，自动备份已经完成流程的“请假单”到归档库中。

8、如果同意了年假申请，那么，自动从当年年假中扣除。
同样在工作流事件代码中处理，扣除年假天数。做减法即可。由于申请人本人没有直接修改年假天数的权限（这是当然的），所以需要提升权限才能操作。而这也意味着要服务器场解决方案，“全程沙盒方案”梦想破灭。

9、申请同意后自动加入请假日历。
在 SPD 工作流中处理。

10、签入代码和 SPD 文件（导出来备份，或者直接 stsadm o backup 备份网站集），写好部署操作手册。完工。