feat: fmBpab/fmBpabBig/fmBpabSmall GridView 改用 ObjectDataSource

- 新增 BpabDAC（SelectPage/SelectCount，mode 區分 科目/大類/小類）

- 三檔 dsBPABGrid 改 ObjectDataSource（EnablePaging）

- Search/Selected 調整

- 計畫文檔更新

Doc/GridView改用ObjectDataSource計畫.md

@@ -1,4 +1,4 @@
-# GridView 銜接的 SqlDataSource 改用 ObjectDataSource
+# GridView 銜接的 SqlDataSource 改用 ObjectDataSource
 
 分支：`feature/gridview-to-objectdatasource`
 
@@ -18,9 +18,9 @@
 |---|---|---|---|---|---|---|
 | 1 | forms/customer/fmBcus.ascx | gvBCUS | dsBCUSGrid | BCUS | 無→BcusDAC | **完成** |
 | 2 | forms/customer/fmBpaa.ascx | gvBPAA | dsBPAAGrid | BPAA | BpaaDAC(+Select) | **完成** |
-| 3 | forms/customer/fmBpab.ascx | gvBPAB | dsBPABGrid | BPAB | 無 | 待辦 |
+| 3 | forms/customer/fmBpab.ascx | gvBPAB | dsBPABGrid | BPAB | 無→BpabDAC | **完成** |
-| 4 | forms/customer/fmBpabBig.ascx | gvBPAB | dsBPABGrid | BPAB | 無 | 待辦 |
+| 4 | forms/customer/fmBpabBig.ascx | gvBPAB | dsBPABGrid | BPAB | 無→BpabDAC | **完成** |
-| 5 | forms/customer/fmBpabSmall.ascx | gvBPAB | dsBPABGrid | BPAB | 無 | 待辦 |
+| 5 | forms/customer/fmBpabSmall.ascx | gvBPAB | dsBPABGrid | BPAB | 無→BpabDAC | **完成** |
 | 6 | forms/customer/fmBpja.ascx | gvBPJA | dsBPJAGrid | BPJA | 無 | 待辦 |
 | 7 | forms/customer/fmBpjb.ascx | gvBPJB | dsBPJBGrid | BPJB | 無 | 待辦 |
 | 8 | forms/customer/fmBprj.ascx | gvBPRJ | dsBPRJGrid | BPRJ | BprjDAC | 待辦 |
@@ -144,3 +144,4 @@
 | 2026-09-10 | 分頁 SQL 形式比較：`BETWEEN` 與 `TOP` 相同（無改善）；改採 KEYSET（窄集合算 ROWID 再 join 明細）並將 SelectCount/SelectBPENOIndex 改為窄集合。深頁 2,166ms/262萬 reads → 48ms/6,549 reads；count 714ms/608,176 reads → 110ms/6,253 reads；aspnet_compiler 編譯通過 |
 | 2026-09-10 | 轉換 fmBcus（BCUS）：新增 BcusDAC；dsBCUSGrid 改 ObjectDataSource；跳回選取列改用 SelectBCNUMIndex；aspnet_compiler 編譯通過 |
 | 2026-09-10 | 轉換 fmBpaa（BPAA）：BpaaDAC 新增 SelectPage/SelectCount/SelectBPAAIndex；dsBPAAGrid 改 ObjectDataSource；編譯通過 |
+| 2026-09-10 | 轉換 fmBpab / fmBpabBig / fmBpabSmall（BPAB）：新增 BpabDAC（SelectPage/SelectCount，mode 區分科目/大類/小類）；三檔 dsBPABGrid 改 ObjectDataSource；編譯通過 |

Web/App_Code/DAC/BpabDAC.cs

@@ -0,0 +1,103 @@
+using System;
+using System.Data;
+using System.Data.Common;
+using System.Text;
+using System.ComponentModel;
+using Wellan.Data;
+
+/// <summary>
+/// 年度科目設定的資料處理類別
+/// </summary>
+[DataObject(true)]
+public class BpabDAC : Wellan.Data.WDAC
+{
+    public BpabDAC()
+    {
+    }
+
+    public BpabDAC(string connectionConfig, string connectionConfigName)
+        : this()
+    {
+        this._connectionConfig = connectionConfig;
+        this._connectionConfigName = connectionConfigName;
+    }
+
+    public BpabDAC(WQuery query)
+    {
+        this._query = query;
+    }
+
+    /// <summary>
+    /// 年度科目設定 Grid 分頁查詢
+    /// mode: BIG=大類, SMALL=小類, 其他=科目
+    /// </summary>
+    [DataObjectMethod(DataObjectMethodType.Select)]
+    public DataTable SelectPage(int startRowIndex, int maximumRows, string BPPYN, string mode)
+    {
+        DbCommand cmd = Query.NewCommand();
+
+        StringBuilder filter = new StringBuilder();
+        BuildFilter(filter, cmd, BPPYN, mode);
+
+        cmd.CommandText = String.Format(
+            @"SELECT * FROM
+              (
+                SELECT *, ROW_NUMBER() OVER (ORDER BY {0}) AS ROWID
+                FROM BPAB WHERE 1=1 {1}
+              ) AS TMP
+              WHERE ROWID BETWEEN @STARTROWINDEX + 1 AND @STARTROWINDEX + @MAXIMUMROWS
+              ORDER BY ROWID",
+            OrderBy(mode), filter.ToString());
+        cmd.Parameters.Add(Query.NewParameter("STARTROWINDEX", startRowIndex));
+        cmd.Parameters.Add(Query.NewParameter("MAXIMUMROWS", maximumRows));
+
+        return Query.Select(cmd);
+    }
+
+    /// <summary>
+    /// 年度科目設定 Grid 查詢筆數
+    /// </summary>
+    [DataObjectMethod(DataObjectMethodType.Select)]
+    public int SelectCount(string BPPYN, string mode)
+    {
+        DbCommand cmd = Query.NewCommand();
+
+        StringBuilder filter = new StringBuilder();
+        BuildFilter(filter, cmd, BPPYN, mode);
+
+        cmd.CommandText = String.Format("SELECT COUNT(*) FROM BPAB WHERE 1=1 {0}", filter.ToString());
+        return WDAC.GetInt32Value(Query.ExecuteScalar(cmd));
+    }
+
+    private static string OrderBy(string mode)
+    {
+        if (mode == "BIG" || mode == "SMALL")
+            return "BPPYN, BPCLS, BPORD";
+        return "BPPYN, BPCLS";
+    }
+
+    /// <summary>
+    /// 組出年度科目設定 Grid 的查詢條件 (與舊 Search 行為一致)
+    /// </summary>
+    private void BuildFilter(StringBuilder sb, DbCommand cmd, string BPPYN, string mode)
+    {
+        if (!string.IsNullOrEmpty(BPPYN))
+        {
+            sb.Append(" AND BPPYN LIKE @BPPYN1 ");
+            cmd.Parameters.Add(Query.NewParameter("BPPYN1", BPPYN + "%"));
+        }
+
+        switch (mode)
+        {
+            case "BIG":
+                sb.Append(" AND SUBSTRING(BPACC,3,4) = '0000' ");
+                break;
+            case "SMALL":
+                sb.Append(" AND SUBSTRING(BPACC,3,2) <> '00' AND SUBSTRING(BPACC,5,2) = '00' ");
+                break;
+            default:
+                sb.Append(" AND SUBSTRING(BPACC,3,2) <> '00' AND SUBSTRING(BPACC,5,2) <> '00' ");
+                break;
+        }
+    }
+}

Web/forms/customer/fmBpab.ascx

@@ -72,10 +72,14 @@
     </table>
   </asp:View>
   <asp:View ID="EditView" runat="server">
-    <asp:SqlDataSource ID="dsBPABGrid" runat="server" ConflictDetection="CompareAllValues"
+    <asp:ObjectDataSource ID="dsBPABGrid" runat="server"
-      SelectCommand="SELECT * FROM BPAB WHERE 1=0" ConnectionString="Data Source=(local);Initial Catalog=THINKYU_WEB;Persist Security Info=True;User ID=sa"
+      TypeName="BpabDAC" SelectMethod="SelectPage" SelectCountMethod="SelectCount"
-      ProviderName="System.Data.SqlClient" OnSelected="dsBPABGrid_Selected">
+      EnablePaging="true" OnSelected="dsBPABGrid_Selected">
-    </asp:SqlDataSource>
+      <SelectParameters>
+        <asp:Parameter Name="BPPYN" Type="String" />
+        <asp:Parameter Name="mode" Type="String" DefaultValue="ALL" />
+      </SelectParameters>
+    </asp:ObjectDataSource>
     <asp:SqlDataSource ID="dsBPABForm" runat="server" InsertCommand="INSERT INTO BPAB
                      (BPPYN, BPACC, BPAME, BPBGT, BPCLS, BPORD, 
                       APPNO, TRDAT, TRMOD, TRUSR) 

Web/forms/customer/fmBpab.ascx.cs

@@ -23,10 +23,6 @@ public partial class forms_customer_fmBpab : Wellan.Web.UI.WUserControlBase
     protected string _BPNUM = "";
     protected string _BPPYN = "";
     private string _OLD_BPACC = "";
-    private string select = "SELECT * ";
-    private string from = " FROM BPAB ";
-    private string where = " WHERE 1=1 ";
-    private string order = " ORDER BY BPPYN, BPCLS";
     private DbCommand cmdTree;
 
     protected void Page_Load(object sender, EventArgs e)
@@ -42,7 +38,6 @@ public partial class forms_customer_fmBpab : Wellan.Web.UI.WUserControlBase
         Page.ClientScript.RegisterStartupScript(Page.GetType(), "RestoreDivPosition", "RestoreDivPosition();", true);
 
         dsBPABForm.ConnectionString = ConnectionString;
-        dsBPABGrid.ConnectionString = ConnectionString;
         dsBPABBig.ConnectionString = ConnectionString;
         dsBPABSmall.ConnectionString = ConnectionString;
 
@@ -60,16 +55,7 @@ public partial class forms_customer_fmBpab : Wellan.Web.UI.WUserControlBase
     // 查詢動作
     private new void Search()
     {
-        StringBuilder sql = new StringBuilder();
+        dsBPABGrid.SelectParameters["BPPYN"].DefaultValue = _BPPYN;
-        sql.Append(select);
-        sql.Append(from);
-        sql.Append(where);
-
-        dsBPABGrid.SelectParameters.Clear();
-        AddSearch(sql, dsBPABGrid, "BPPYN", _BPPYN, "", true);
-        sql.Append(" AND SUBSTRING(BPACC,3,2) <> '00' AND SUBSTRING(BPACC,5,2) <> '00' ");
-        sql.Append(order);
-        dsBPABGrid.SelectCommand = sql.ToString();
     }
 
     private new void CalcFields(SqlDataSourceCommandEventArgs e)
@@ -129,9 +115,9 @@ public partial class forms_customer_fmBpab : Wellan.Web.UI.WUserControlBase
         gv.DataBind();
     }
 
-    protected void dsBPABGrid_Selected(object sender, SqlDataSourceStatusEventArgs e)
+    protected void dsBPABGrid_Selected(object sender, ObjectDataSourceStatusEventArgs e)
     {
-        if (e.AffectedRows == 0)
+        if (e.ReturnValue is Int32 && WDAC.GetInt32Value(e.ReturnValue) == 0)
         {
             gvBPAB.Visible = false;
             fvBPAB.ChangeMode(FormViewMode.Insert);

Web/forms/customer/fmBpabBig.ascx

@@ -10,13 +10,14 @@
 <asp:MultiView ID="MultiView1"
   runat="server" ActiveViewIndex="0">
   <asp:View ID="BigClassView" runat="server">
-    <asp:SqlDataSource ID="dsBPABGrid"
+    <asp:ObjectDataSource ID="dsBPABGrid" runat="server"
-      runat="server" ConflictDetection="CompareAllValues"
+      TypeName="BpabDAC" SelectMethod="SelectPage" SelectCountMethod="SelectCount"
-      SelectCommand="SELECT TRDAT, TRMOD, TRUSR, BPPYN, BPACC, BPAME, BPBGT, BPCLS, BPORD, APPNO FROM BPAB WHERE (1 = 0)"
+      EnablePaging="true" OnSelected="dsBPABGrid_Selected">
-      ConnectionString="Data Source=(local);Initial Catalog=THINKYU_WEB;Persist Security Info=True;User ID=sa"
+      <SelectParameters>
-      ProviderName="System.Data.SqlClient"
+        <asp:Parameter Name="BPPYN" Type="String" />
-      OnSelected="dsBPABGrid_Selected">
+        <asp:Parameter Name="mode" Type="String" DefaultValue="BIG" />
-    </asp:SqlDataSource>
+      </SelectParameters>
+    </asp:ObjectDataSource>
     <asp:SqlDataSource ID="dsBPABForm"
       runat="server" InsertCommand="INSERT INTO BPAB&#13;&#10;                     (BPPYN, BPACC, BPAME, BPBGT, BPCLS, BPORD, &#13;&#10;                      APPNO, TRDAT, TRMOD, TRUSR) &#13;&#10;                     VALUES &#13;&#10;                     (@BPPYN, @BPACC, @BPAME, @BPBGT, @BPCLS, @BPORD, &#13;&#10;                      1, GETDATE(), 'INSERT', @TRUSR)"
       UpdateCommand="UPDATE BPAB SET &#13;&#10;                        BPACC = @BPACC, &#13;&#10;                        BPAME = @BPAME, &#13;&#10;                        BPBGT = @BPBGT, &#13;&#10;                        BPCLS = @BPCLS, &#13;&#10;                        BPORD = @BPORD, &#13;&#10;                        APPNO = APPNO + 1, &#13;&#10;                        TRDAT = GETDATE(), &#13;&#10;                        TRMOD = 'UPDATE', &#13;&#10;                        TRUSR = @TRUSR&#13;&#10;                     WHERE BPPYN = @OLD_BPPYN&#13;&#10;                       AND BPACC = @OLD_BPACC&#13;&#10;                       AND APPNO = @OLD_APPNO"

Web/forms/customer/fmBpabBig.ascx.cs

@@ -22,10 +22,6 @@ public partial class forms_customer_fmBpabBig : Wellan.Web.UI.WUserControlBase
 {
     protected string _BPNUM = "";
     protected string _BPPYN = "";
-    private string select = "SELECT * ";
-    private string from = " FROM BPAB ";
-    private string where = " WHERE 1=1 ";
-    private string order = " ORDER BY BPPYN, BPCLS, BPORD";
 
     protected void Page_Load(object sender, EventArgs e)
     {
@@ -37,7 +33,6 @@ public partial class forms_customer_fmBpabBig : Wellan.Web.UI.WUserControlBase
     {
         base.OnInit(e);
         dsBPABForm.ConnectionString = ConnectionString;
-        dsBPABGrid.ConnectionString = ConnectionString;
 
         _BPNUM = GetStringParam("BPNUM");
         _BPPYN = GetStringParam("BPPYN");
@@ -50,16 +45,7 @@ public partial class forms_customer_fmBpabBig : Wellan.Web.UI.WUserControlBase
     // 查詢動作
     private new void Search()
     {
-        StringBuilder sql = new StringBuilder();
+        dsBPABGrid.SelectParameters["BPPYN"].DefaultValue = _BPPYN;
-        sql.Append(select);
-        sql.Append(from);
-        sql.Append(where);
-
-        dsBPABGrid.SelectParameters.Clear();
-        AddSearch(sql, dsBPABGrid, "BPPYN", _BPPYN, "", true);
-        sql.Append(" AND SUBSTRING(BPACC,3,4) = '0000' ");
-        sql.Append(order);
-        dsBPABGrid.SelectCommand = sql.ToString();
     }
 
     private new void CalcFields(SqlDataSourceCommandEventArgs e)
@@ -139,9 +125,9 @@ public partial class forms_customer_fmBpabBig : Wellan.Web.UI.WUserControlBase
         gvBPAB.DataBind();
     }
 
-    protected void dsBPABGrid_Selected(object sender, SqlDataSourceStatusEventArgs e)
+    protected void dsBPABGrid_Selected(object sender, ObjectDataSourceStatusEventArgs e)
     {
-        if (e.AffectedRows == 0)
+        if (e.ReturnValue is Int32 && WDAC.GetInt32Value(e.ReturnValue) == 0)
         {
             gvBPAB.Visible = false;
             fvBPAB.ChangeMode(FormViewMode.Insert);

Web/forms/customer/fmBpabSmall.ascx

@@ -9,13 +9,14 @@
 <asp:MultiView ID="MultiView1"
   runat="server" ActiveViewIndex="0">
   <asp:View ID="BigClassView" runat="server">
-    <asp:SqlDataSource ID="dsBPABGrid"
+    <asp:ObjectDataSource ID="dsBPABGrid" runat="server"
-      runat="server" ConflictDetection="CompareAllValues"
+      TypeName="BpabDAC" SelectMethod="SelectPage" SelectCountMethod="SelectCount"
-      SelectCommand="SELECT * FROM BPAB WHERE 1=0"
+      EnablePaging="true" OnSelected="dsBPABGrid_Selected">
-      ConnectionString="Data Source=(local);Initial Catalog=THINKYU_WEB;Persist Security Info=True;User ID=sa"
+      <SelectParameters>
-      ProviderName="System.Data.SqlClient"
+        <asp:Parameter Name="BPPYN" Type="String" />
-      OnSelected="dsBPABGrid_Selected">
+        <asp:Parameter Name="mode" Type="String" DefaultValue="SMALL" />
-    </asp:SqlDataSource>
+      </SelectParameters>
+    </asp:ObjectDataSource>
     <asp:SqlDataSource ID="dsBPABForm"
       runat="server" InsertCommand="INSERT INTO BPAB
                      (BPPYN, BPACC, BPAME, BPBGT, BPCLS, BPORD, 

Web/forms/customer/fmBpabSmall.ascx.cs

@@ -23,10 +23,6 @@ public partial class forms_customer_fmBpabSmall : Wellan.Web.UI.WUserControlBase
     protected string _BPNUM = "";
     protected string _BPPYN = "";
     private string _OLD_BPACC = "";
-    private string select = "SELECT * ";
-    private string from = " FROM BPAB ";
-    private string where = " WHERE 1=1 ";
-    private string order = " ORDER BY BPPYN, BPCLS, BPORD";
 
     protected void Page_Load(object sender, EventArgs e)
     {
@@ -38,7 +34,6 @@ public partial class forms_customer_fmBpabSmall : Wellan.Web.UI.WUserControlBase
     {
         base.OnInit(e);
         dsBPABForm.ConnectionString = ConnectionString;
-        dsBPABGrid.ConnectionString = ConnectionString;
         dsBPABBig.ConnectionString = ConnectionString;
 
         _BPNUM = GetStringParam("BPNUM");
@@ -54,16 +49,7 @@ public partial class forms_customer_fmBpabSmall : Wellan.Web.UI.WUserControlBase
     // 查詢動作
     private new void Search()
     {
-        StringBuilder sql = new StringBuilder();
+        dsBPABGrid.SelectParameters["BPPYN"].DefaultValue = _BPPYN;
-        sql.Append(select);
-        sql.Append(from);
-        sql.Append(where);
-
-        dsBPABGrid.SelectParameters.Clear();
-        AddSearch(sql, dsBPABGrid, "BPPYN", _BPPYN, "", true);
-        sql.Append(" AND SUBSTRING(BPACC,3,2) <> '00' AND SUBSTRING(BPACC,5,2) = '00' ");
-        sql.Append(order);
-        dsBPABGrid.SelectCommand = sql.ToString();
     }
 
     private new void CalcFields(SqlDataSourceCommandEventArgs e)
@@ -194,9 +180,9 @@ public partial class forms_customer_fmBpabSmall : Wellan.Web.UI.WUserControlBase
         gvBPAB.DataBind();
     }
 
-    protected void dsBPABGrid_Selected(object sender, SqlDataSourceStatusEventArgs e)
+    protected void dsBPABGrid_Selected(object sender, ObjectDataSourceStatusEventArgs e)
     {
-        if (e.AffectedRows == 0)
+        if (e.ReturnValue is Int32 && WDAC.GetInt32Value(e.ReturnValue) == 0)
         {
             gvBPAB.Visible = false;
             fvBPAB.ChangeMode(FormViewMode.Insert);