Server-Script公共代码

DeleteRows（函数在wunway中）
功能：
　　删除指定表记录
参数：
　　{Table,OrigrecList} Table表名，OrigrecList标识符列表， 必须为Origrec ，为数组。
返回值：无

还有一种写法，就是自定义删除函数，由于每个表格绑定一个数据源，所以只要传入一个控件名字，然后获取数据库表格名字， 执行后边的删除语句
具体代码如下：

function DeleteRows_diy(dg, TableName )
{
    if(TableName == null || TableName == "")        //判断传过来的数据库表格名字是否为空，如果为空，则根据控件获取表格名字
    {
        TableName = dg.RootTable.DataMember;        //获取表格名字
    }
    if(dg.RowCount < 1)                                //如果删除的表格行数少于1，则返回，删除失败
        return;
        
        //调用弹出窗，确定是否删除，返回值为YES和其他值NO。，然后赋值给okToDelete
    var okToDelete = Dialogs.MessageBox(form.Resources("mesAreYouSureDel"), form.Resources["Question"], "YESNO", "QUESTION");
    if (okToDelete == "YES")    //如果为YES    ，则执行删除
    {
        var OrigrecList = dg.GetSelectedRowsData("ORIGREC");        //获取当前行。可多行
        lims.CallServer("Sunway.DeleteRows",[TableName,OrigrecList]);        //往DeleteRows传入表格名和唯一值Origrec，执行删除操作
        dg.Refresh();                                    //刷新表格
        return true;                                    //返回刷新成功
    }
    else return;                                //返回
}

Update

功能：
　　更新某个表中的某个字段的值
参数：
　　{TableName,FieldName, FieldValue,Origrec} TableName表名，FieldName字段名，FieldValue 字段值，Origrec唯一标识符
返回值：无

:PARAMETERS TableName, UpdateFieldName, UpdateFieldValue, PkFieldValue, PkFieldName, Datasource;
:DEFAULT PkFieldName, "ORIGREC";
:DEFAULT Datasource, "DATABASE";
:RETURN SqlExecute("update " + TableName + " set " + UpdateFieldName + " = ?UpdateFieldValue? where " + PkFieldName + " = ?PkFieldValue? ", Datasource);

Find
功能：
　　按照某列查找
参数：
　　{TableName,FieldName,FieldValue} TableName表名，FieldName字段名，FieldValue字段值
返回值：返回找到的第一个列值，并且定位到上面。