Sbo通用数据选择功能的实现

本文著作权属于江湖浪子@IT，任何人未经作者本人批准，不得转载。

 

在Sbo Addon开发中，经常为了业务实现，需要从当前的业务数据库中列举出符合条件信息，供业务操作人员进行选择，并且将选择之后的数据及其相关信息传递到当前的业务界面，或者填充当前的业务控件（比如编辑文本、下拉框等），或者填充Matrix中的指定Column，以及更加个性化的业务处理（比如根据选择的数据进行业务初始化、业务流程处理等）。

 

这的确是一个很常用的功能，有必要对其进行业务抽象和归纳，形成一个通用的数据选择功能。富盛Sbo程序开发框架有效的解决了这一问题。

 

因为业务不同，需要选择的业务数据也不同。就是说，这个通用的数据选择提供的选择数据是不确定的，自然选择条件是不确定的，提供操作用户的表示数据是不确定的，选择之后的传递到业务界面上的数据和业务操作也是不确定的。

 

1、检索条件、数据展示定制化

 

要展示不同的数据选择内容，并且展示数据可能来自不同的数据表中，甚至选择数据集的来源可能是SELECT语句，也完全可能是存储过程的返回集合，能够满足这种展示条件的只有使用Grid控件了。而Grid控件的数据来源是可以定制的，这又满足了数据检索条件不确定性的要求。

实现如下：

                            fsSbo.AddButton2Form(ref oForm, "btnChoose", "选择", 315, 10, 65, 20);
                            fsSbo.AddItem2Form(ref oForm, "2", BoFormItemTypes.it_BUTTON, 315, 80, 65, 20);

                            Grid grd = fsSbo.AddGrid2Form(ref oForm, "grdData", 5, 5, 530, 300);
                            grd.DataTable = oForm.DataSources.DataTables.Add("dtData");
                            grd.SelectionMode = BoMatrixSelect.ms_Single;

                            grd.DataTable.ExecuteQuery(strChooseDataSQL);
                            for (int i = 0; i < grd.DataTable.Columns.Count; i++)
                            {
                                if (grd.DataTable.Columns.Item(i).Type == BoFieldsType.ft_Integer || grd.DataTable.Columns.Item(i).Type == BoFieldsType.ft_Float)
                                    grd.Columns.Item(i).RightJustified = true;

                                grd.Columns.Item(i).Editable = false;

                                if (grd.Columns.Item(i).UniqueID.StartsWith("$$")) grd.Columns.Item(i).Visible = false;
                            }

                            grd.AutoResizeColumns();

当然，在数据展示的时候，应该考虑到行业习惯，Grid数据栏目如果是数据类型应该自动将其展示为右对齐，显然，这是可以办到的。

 

检索条件自动化、展示数据自动化、展示数据惯例化，看来都不是问题。在接下来要解决的是选择结果定制化，这也完全可以办到。

 

2、数据选择业务处理定制化

 

在选择数据窗口中，通过参数获得调用窗体及数据信息需要回写的控件Id，当然了，如果需要回写到Matrix中，除了需要指定这个Matrix的数据回写的列栏目，还应该指定需要回写的对应行；当然了，对于个性化的业务处理，在调用窗体中定义一个回调函数，在数据选择窗体的选择事件通过回调函数来完成个性化业务处理。

实现方法如下：

                    string[] strColumns = strFatherFields.Split(',');
                    string[] strValues = new string[strFatherFields.Length == 0 || frmFather != null ? dt.Columns.Count : strColumns.Length];
                    for (int i = 0; i < strValues.Length; i++)
                    {
                        string strValue = "";
                        if (dt.Columns.Item(i).Cells.Item(nSelectedRow).Value != null) strValue = dt.Columns.Item(i).Cells.Item(nSelectedRow).Value.ToString();
                        if (i < dt.Columns.Count) strValues[i] = strValue;
                    }

                    if (strFatherFId.Length > 0 && strColumns.Length > 0)
                    {
                        Form frm = fsSbo.fsSboApplication.Forms.Item(strFatherFId);

                        oForm.Close();

                        frm.Freeze(true);
                        for (int i = 0; i < strColumns.Length; i++)
                        {
                            if (strMtxId.Length > 0 && nMtxRow > 0)
                            {
                                Matrix mtx = (Matrix)frm.Items.Item(strMtxId).Specific;
                                Column oColumn = mtx.Columns.Item(strColumns[i]);

                                if (oColumn.Type == BoFormItemTypes.it_EDIT || oColumn.Type == BoFormItemTypes.it_EXTEDIT)
                                    fsSbo.SetValue2MtxEditText(ref mtx, strColumns[i], nMtxRow, strValues[i]);
                                else if (oColumn.Type == BoFormItemTypes.it_COMBO_BOX)
                                    fsSbo.SetValue2MtxCombox(ref mtx, strColumns[i], nMtxRow, strValues[i]);
                            }
                            else
                            {
                                Item oItem = frm.Items.Item(strColumns[i]);
                                if (oItem.Type == BoFormItemTypes.it_COMBO_BOX)
                                    fsSbo.SetValue2Combox(ref frm, strColumns[i], strValues[i]);
                                else if (oItem.Type == BoFormItemTypes.it_EDIT || oItem.Type == BoFormItemTypes.it_EXTEDIT)
                                    fsSbo.SetValue2EditText(ref frm, strColumns[i], strValues[i]);
                            }
                        }

                        if (frm.Mode != BoFormMode.fm_ADD_MODE) frm.Mode = BoFormMode.fm_UPDATE_MODE;

                        frm.Freeze(false);
                        frm.Refresh();
                        frm.Update();
                    }
                    else if (frmFather != null)
                    {
                        string strFormId = oForm.UniqueID;

                        oForm.Close();

                        frmFather.SetReturnValue4SelectForm(strValues, strFatherFields);
                    }

 

3、如何调用

 

既然完成了业务处理，调用这个通用的数据选择功能就很简单了。当然将这个调用写成一个通用的函数是个很好的习惯。富盛Sbo程序开发框架就是这样完成的。

public Boolean OpenChooseDataForm(string strTitle, string strFatherId, string strQuerySQL, string strFatherFields, string strMtxId, int nMtxRow)
        {
            Boolean bRet = false;
            try
            {
                fsSboChooseDataBase frm = new fsSboChooseDataBase(this);
                frm.ChooseDataSQL = strQuerySQL;
                frm.FatherFields = strFatherFields;
                frm.FatherFormId = strFatherId;
                if (strMtxId.Length > 0 && nMtxRow > 0)
                {
                    frm.FatherMatrixId = strMtxId;
                    frm.FatherMatrixRow = nMtxRow;
                }
               
                bRet = ShowForm(frm, "ChooseData" + strFatherId, strTitle);
            }
            catch (Exception ex)
            {
                ShowMsg("错误：" + ex.Message);
            }

            return bRet;
        }

 

这里的fsSboChooseDataBase就是上述我们讨论的通用数据选择业务实现类了。

 

4、实例

 

在富盛打叶复烤生产管理系统中，广泛的使用这一通用数据选择功能。

 

4.1 通过以下代码实现加工协议选择，选择之后的信息被回填到业务选择界面的编辑文本中。

                    string strSQL = "", strTitle = "", strFields = "";

                    strTitle = "选择加工协议";
                    strSQL = "SELECT DocEntry as [$$DocEntry], U_DealCode 加工协议, U_DealName 协议描述, U_DealNo 档案编号, U_WrkBatNo 生产批次, U_CardCode 委托方, U_CardName 委托方名称, U_PlanSD 计划开始, U_PlanED 计划结束  FROM [@FSCXFWORKDEALINFO] WHERE IsNull(U_Stts,'0') in ('2','3')";
                    strFields = "DealEntry,emDealCode,emDealName,emDealNo,emBatNo,emCardCode,emCardName";

                    bRet = fsSbo.OpenChooseDataForm(strTitle, oForm.UniqueID, strSQL, strFields, "", -1);

实现的数据选择界面如下：

选后数据回写到以下界面

 

4.2 通过以下代码实现加工物料选择，选择之后的信息被回填到业务选择界面的Matrix中。

                string strSQL = "", strTitle = "选择投料";

                string strDealEntry = fsSbo.GetValue4EditText(oForm, "DealEntry");
                if (strDealEntry.Length > 0)
                {
                        strSQL = "SELECT U_ItemCode 物料代码, U_ItemName 物料描述, U_BaseItem as [$$BaseItem], U_BaseCode as [$$BaseCode], U_GrdEntry as [$$GrdEntry], U_GrdCode 等级, U_FromCode as [$$FromCode], U_FromName [产地], U_ItemAge 年限, IsNull(U_Qty,0) - IsNull(U_Qtyed,0) [$$RemQty], U_ItemGrp [$$ItemGrp], U_WhsCode [$$WhsCode], DocEntry as [$$DocEntry], U_Qty 计划加工, U_Qtyed 已加工, U_Notes 备注 FROM [@FSCXFWORKDEALLINE1] WHERE U_ItemGrp in (" + fsSbo.fsSboMes4CxF.ItemGroupCodeBeforePick + ") AND DocEntry=" + strDealEntry + (strItemList.Length > 0 ? " AND U_ItemCode not in (" + strItemList + ")" : "");
                    bRet = fsSbo.OpenChooseDataForm(strTitle, this, strSQL, "REQUEST");
                }

数据选择界面如下：

选后数据回写到以下界面：

<>