Files
thinkyu/Web/forms/summary/fmSalaryCalc.ascx
T
sryang 577060bc78 chore: 首次簽入 Thinkyu ASP.NET 專案
- 加入 Visual Studio / ASP.NET .gitignore
- 排除建置輸出、IDE 設定、NuGet packages、大型 MSI 安裝檔
2026-09-10 09:42:37 +08:00

284 lines
12 KiB
Plaintext

<%@ Control Language="C#" AutoEventWireup="true"
CodeFile="fmSalaryCalc.ascx.cs"
Inherits="forms_summary_fmSalaryCalc" %>
<%@ Register Assembly="WNET" Namespace="Wellan.Web.UI"
TagPrefix="cc1" %>
<cc1:WLabel ID="WLabel1" runat="server"
CssClass="pageTitle" TextMessageId="FMSALERYCALC.NAME"></cc1:WLabel>
<asp:CustomValidator ID="cvMessage"
runat="server" Display="None"></asp:CustomValidator>
<asp:MultiView ID="MultiView1"
runat="server" ActiveViewIndex="0">
<asp:View ID="View1" runat="server">
<table border="0" cellpadding="0"
cellspacing="2">
<tr>
<td colspan="1" style="width: 50px;
height: 0px">
</td>
<td colspan="1" style="height: 0px">
</td>
</tr>
<tr>
<td style="text-align: right">
<cc1:WLabel ID="lbBPIDN" runat="server"
TextMessageId="">年月:</cc1:WLabel></td>
<td nowrap="noWrap">
<asp:TextBox ID="txtYYMM" runat="server"
CssClass="textInput1" Columns="6"></asp:TextBox>
<cc1:WButton ID="btnSSMS" runat="server"
AccessKey="Y" CssClass="button"
OnClick="btnSSMS_Click" Text="Y.確定" /></td>
</tr>
</table>
</asp:View>
<asp:View ID="View2" runat="server">
<table border="0" cellpadding="0"
cellspacing="2">
<tr>
<td colspan="1" style="width: 50px;
height: 0px">
</td>
<td colspan="1" style="height: 0px; width: 400px;">
</td>
<td colspan="1" style="height: 0px; width: 100px;">
</td>
</tr>
<tr>
<td style="text-align: right">
<cc1:WLabel ID="WLabel2" runat="server"
TextMessageId="">年月:</cc1:WLabel></td>
<td>
<asp:Label ID="lbYYMM" runat="server"></asp:Label></td>
<td>
</td>
</tr>
<tr>
<td style="text-align: right">
<cc1:WLabel ID="WLabel3" runat="server"
TextMessageId="">專案:</cc1:WLabel></td>
<td colspan="2">
<cc1:WDropDownList ID="ddlRSPYN"
runat="server" CssClass="textInput1"
DataTextField="BPPYM" DataValueField="BPPYN"
Width="500px">
</cc1:WDropDownList></td>
</tr>
<tr>
<td colspan="2"><cc1:WButton ID="btnOk" runat="server"
AccessKey="Y" CssClass="button"
OnClick="btnOk_Click" Text="Y.重新計算"
OnClientClick="ShowProcessing(2000);" />
<cc1:WButton ID="btnCloseBPAA" runat="server"
AccessKey="C" CssClass="button"
OnClick="btnCloseBPAA_Click" Text="C.本月關帳"
OnClientClick='return confirm("是否確定關帳?");' />
<cc1:WButton ID="btnOpenBPAA" runat="server"
AccessKey="O" CssClass="button"
OnClick="btnOpenBPAA_Click" Text="O.本月開帳"
OnClientClick='return confirm("是否確定開帳?");' /></td>
<td align="right">
<cc1:WButton ID="btnInputYYMM" runat="server"
AccessKey="R" CssClass="button"
Text="R.輸入年月" OnClick="btnInputYYMM_Click" /></td>
</tr>
<tr>
<td colspan="2">
<cc1:WButton ID="Next" runat="server"
AccessKey="J" CausesValidation="False"
CssClass="button" OnClick="Next_Click"
Text="J.輸入總表項目" UseSubmitBehavior="False"
Width="120px" />
<cc1:WButton ID="btnSACD" runat="server"
AccessKey="T" CssClass="button"
Text="T.顯示總表" OnClick="btnSACD_Click" />
<cc1:WButton ID="btnAccDoc" runat="server"
AccessKey="M" CausesValidation="False"
CssClass="button" OnClick="btnAccDoc_Click"
Text="M.輸入科目備註" UseSubmitBehavior="False"
Width="120px" /></td>
<td align="right">
</td>
</tr>
</table>
<asp:Panel ID="pnBPSXX" runat="server"
Visible="false" Width="100%">
<asp:DataList ID="DataList1" runat="server"
OnUpdateCommand="DataList1_UpdateCommand"
RepeatColumns="2" OnCancelCommand="DataList1_CancelCommand">
<FooterTemplate>
<cc1:WButton ID="btnSave" runat="server"
AccessKey="S" CssClass="button"
OnClientClick="return confirm(msgConfirmSave);"
Text="S.存檔" TextMessageId="S.+SAVE"
CommandName="Update" /><cc1:WButton
ID="btnCancel1" runat="server"
AccessKey="C" CssClass="button"
OnClientClick="return confirm(msgConfirmCancel);"
Text="C.取消" CommandName="Cancel" />
</FooterTemplate>
<ItemTemplate>
<table border="0">
<tr>
<td align="right" width="120">
<asp:Label ID="Label1" runat="server"
Text='<%# Bind("BPAME") %>'></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox1" runat="server"
Text='<%# Bind("AMT") %>'></asp:TextBox>
<asp:HiddenField ID="HiddenField1"
runat="server" Value='<%# Bind("BPACC") %>' />
</td>
</tr>
</table>
</ItemTemplate>
</asp:DataList>
<asp:SqlDataSource ID="dsSubject"
runat="server"></asp:SqlDataSource>
</asp:Panel>
<asp:Panel ID="pnSACD" runat="server"
Width="100%" Visible="False">
<asp:SqlDataSource ID="dsSACD"
runat="server" ConnectionString="Data Source=(local);Initial Catalog=THINKYU_WEB;Persist Security Info=True;User ID=sa"
ProviderName="System.Data.SqlClient"
SelectCommand="SELECT BPAB.BPPYN, BPAB.BPACC, ISNULL(BPAB.BPBGT, 0) AS BPBGT, BPAB.BPCLS, BPAB.BPAME, ISNULL(SACD.SAAMT, 0) AS SAAMT, SACD.SADOC FROM BPAB LEFT OUTER JOIN SACD ON BPAB.BPPYN = SACD.SAPYN AND BPAB.BPACC = SACD.SAACC AND SACD.SAYMM = @SAYMM WHERE (BPAB.BPPYN = @BPPYN) AND (SUBSTRING(BPAB.BPACC, 5, 2) <> '00') ORDER BY BPAB.BPCLS">
<SelectParameters>
<asp:Parameter Name="SAYMM" />
<asp:Parameter Name="BPPYN" />
</SelectParameters>
</asp:SqlDataSource>
<table cellpadding="0" cellspacing="0">
<tr>
<td>
<asp:GridView ID="GridView1" runat="server"
AutoGenerateColumns="False"
DataSourceID="dsSACD">
<Columns>
<asp:BoundField DataField="BPACC"
HeaderText="科目編號" ReadOnly="True"
SortExpression="BPACC" />
<asp:BoundField DataField="BPAME"
HeaderText="科目名稱" SortExpression="BPAME" />
<asp:BoundField DataField="BPBGT"
DataFormatString="{0:###,###,###,##0}"
HeaderText="科目年度預算" HtmlEncode="False"
SortExpression="BPBGT">
<ItemStyle HorizontalAlign="Right" />
</asp:BoundField>
<asp:BoundField DataField="SAAMT"
DataFormatString="{0:###,###,###,##0}"
HeaderText="本月金額" HtmlEncode="False"
SortExpression="SAAMT">
<ItemStyle HorizontalAlign="Right" />
</asp:BoundField>
<asp:BoundField DataField="SADOC"
HeaderText="備註" SortExpression="SADOC" />
</Columns>
<EmptyDataTemplate>
<asp:Label ID="Label4" runat="server"
BackColor="#507CD1" Font-Bold="False"
ForeColor="White" Text="無資料"
Width="100%"></asp:Label>
</EmptyDataTemplate>
</asp:GridView></td>
</tr>
<tr>
<td bgcolor="#507cd1">
<asp:Label ID="Label2" runat="server"
Text="合計金額:" Font-Bold="True" ForeColor="White"></asp:Label>
<asp:Label ID="lbSumSacd" runat="server"
Font-Bold="True" ForeColor="White"></asp:Label></td>
</tr>
</table>
</asp:Panel>
<asp:Panel ID="pnAccDoc" runat="server"
Visible="False" Width="100%">
<asp:SqlDataSource ID="dsSACDDoc"
runat="server" ConnectionString="Data Source=(local);Initial Catalog=THINKYU_WEB;Persist Security Info=True;User ID=sa"
ProviderName="System.Data.SqlClient"
SelectCommand="SELECT A.BPACC SAACC, A.BPAME, ISNULL(B.SAAMT, 0) SAAMT, B.SADOC&#13;&#10;FROM BPAB A &#13;&#10;LEFT OUTER JOIN SACD B ON A.BPPYN=B.SAPYN AND A.BPACC=B.SAACC AND B.SAYMM=@SAYMM&#13;&#10;WHERE A.BPPYN=@SAPYN &#13;&#10; AND SUBSTRING(A.BPACC, 5, 2)<>'00'">
<SelectParameters>
<asp:Parameter Name="SAPYN" />
<asp:Parameter Name="SAYMM" />
</SelectParameters>
</asp:SqlDataSource>
<asp:DataList ID="dlSACDDoc" runat="server"
OnUpdateCommand="dlSACDDoc_UpdateCommand"
RepeatColumns="2" DataSourceID="dsSACDDoc" OnCancelCommand="DataList1_CancelCommand">
<HeaderTemplate>
<table border="0" cellpadding="0" cellspacing="0">
<tr height="30px">
<td width="60" align="center" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label14" runat="server" Font-Bold="true">科目編號</asp:Label></td>
<td width="5">
</td>
<td width="130" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label7" runat="server" Font-Bold="true">科目名稱</asp:Label></td>
<td width="5">
</td>
<td align="right" width="60" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label8" runat="server" Font-Bold="true">金額</asp:Label></td>
<td width="5">
</td>
<td width="200" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label9" runat="server" Font-Bold="true">備註</asp:Label></td>
<td width="15">
</td>
<td width="60" align="center" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label10" runat="server" Font-Bold="true">科目編號</asp:Label></td>
<td width="5">
</td>
<td width="130" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label11" runat="server" Font-Bold="true">科目名稱</asp:Label></td>
<td width="5">
</td>
<td align="right" width="60" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label12" runat="server" Font-Bold="true">金額</asp:Label></td>
<td width="5">
</td>
<td width="200" valign="bottom" style="border-bottom:solid 1px black">
<asp:Label ID="label13" runat="server" Font-Bold="true">備註</asp:Label></td>
</tr>
</table>
</HeaderTemplate>
<FooterTemplate>
<cc1:WButton ID="btnSave" runat="server"
AccessKey="S" CssClass="button"
OnClientClick="return confirm(msgConfirmSave);"
Text="S.存檔" TextMessageId="S.+SAVE"
CommandName="Update" /><cc1:WButton
ID="btnCancel1" runat="server"
AccessKey="C" CssClass="button"
OnClientClick="return confirm(msgConfirmCancel);"
Text="C.取消" CommandName="Cancel" />
</FooterTemplate>
<ItemTemplate>
<table border="0" cellpadding="0" cellspacing="0">
<tr height="30">
<td width="60" align="center">
<asp:Label ID="Label1" runat="server"
Text='<%# Bind("SAACC") %>'></asp:Label></td>
<td width="5">
</td>
<td width="130">
<asp:Label ID="Label5" runat="server"
Text='<%# Bind("BPAME") %>'></asp:Label></td>
<td width="5">
</td>
<td align="right" width="60">
<asp:Label ID="Label6" runat="server"
Text='<%# Bind("SAAMT", "{0:###,###,##0}") %>'></asp:Label></td>
<td width="5">
</td>
<td width="200">
<asp:TextBox ID="TextBox1" runat="server"
Text='<%# Eval("SADOC") %>' CssClass="textInput"></asp:TextBox></td>
<td width="13">
</td>
</tr>
</table>
</ItemTemplate>
</asp:DataList></asp:Panel>
</asp:View>
</asp:MultiView>