<!-- #include file="../../include.asp" --> <% '<!-- '################################################ ' 名称 :運送・保険メニュー ' 作成日:2002/12/02 ' 作成者:重松 '################################################ '--> %> <% main() Sub main() If Not(SessionCheck()) Then Exit Sub End If Dim PageType PageType = "経理業務" Dim Query, Content Dim KyuyoDaichoHyoji Dim AutoGenkinNyuSyukinRireki Dim InputGenkinSuitotyo Dim AutoGenkinSuitotyo Query = "exec SPM演習取得 '" & GB_SystemCD & "','" & EnshuCD & "'" Set Content = OpenQuery(Query) If Not(Content.BOF Or Content.EOF) Then Dim YobiA YobiA = Content.Fields("履歴表示") AutoGenkinNyuSyukinRireki = Mid(YobiA, 1, 1) KyuyoDaichoHyoji = "" & Content.Fields("給与台帳表示") InputGenkinSuitotyo = "" & Content.Fields("現金出納帳表示") AutoGenkinSuitotyo = "" & Content.Fields("自動転記現金出納帳表示") End If Dim bGenkinMinusCheck, bGinkoMinusCheck bGenkinMinusCheck = 0 bGinkoMinusCheck = 0 Dim Nyukin , Syukin , Zandaka Zandaka = 0 Query = "exec SPK現金入出金履歴一覧 '" & GB_SystemCD & "','" & EnshuCD & "', '" & KaisyaCD & "'" Set Content = OpenQuery(Query) Do While Not(Content.BOF Or Content.EOF) If Content.Fields("現金取引区分") = "GN" Then Nyukin = Content.Fields("金額") Syukin = 0 ElseIf Content.Fields("現金取引区分") = "GS" Then Nyukin = 0 Syukin = Content.Fields("金額") Else Nyukin = Content.Fields("金額") Syukin = Content.Fields("金額") End If Zandaka = Zandaka + Nyukin - Syukin If Zandaka < 0 Then bGenkinMinusCheck = 1 End If Content.MoveNext Loop Dim Query1, Content1 Query = "exec SPB銀行口座一覧 '" & GB_SystemCD & "','" & EnshuCD & "', '" & KaisyaCD & "', '', ''" Set Content = OpenQuery(Query) Do While Not(Content.BOF Or Content.EOF) Query1 = "exec SPB銀行口座入出金一覧 '" & GB_SystemCD & "','" & EnshuCD & "', '', '" & Content.Fields("銀行CD") & "', '" & Content.Fields("口座区分") & "', '" & Content.Fields("口座番号") & "'" Set Content1 = OpenQuery(Query1) Zandaka = 0 Do While Not(Content1.BOF Or Content1.EOF) Dim tmpKingaku tmpKingaku = Content1.Fields("金額") If IsNull(tmpKingaku) Then tmpKingaku = 0 End If If tmpKingaku = "" Then tmpKingaku = 0 End If If Right(Content1.Fields("銀行取引区分"), 1) = "N" Then Zandaka = Zandaka + tmpKingaku Else Zandaka = Zandaka - tmpKingaku End If If Zandaka < 0 Then bGinkoMinusCheck = 1 End If Content1.MoveNext Loop Content.MoveNext Loop %> <html> <% = HtmlHeader("") %> <SCRIPT LANGUAGE="JavaScript"> <!-- HomeAlias = "<% = HomeAlias %>"; HomeAliasSL = "<% = HomeAliasSL %>"; ExitFlg = 1; --> </SCRIPT> <body onkeydown="if(ExitFlg==2)ExitFlg=3;" onBeforeUnload="if(ExitFlg!=0)window.event.returnValue = ExitMsg(ExitFlg)" bgcolor="#5C70B6" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <% Response.Write(HtmlDesign(1)) Response.Write(HttpL1(3)) Response.Write(HttpL2("会社選択" ,"tblbtn( '/" & HomeAlias & "/user/bk/')", "銀行", "tblbtn( '/" & HomeAlias & "/user/bk/menu_b.asp')", PageType , "", "", "", "", "", "", "")) Response.Write(HttpL3("", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "")) Response.Write(HttpL3_1("", "", "", "", "", "", "", "", "", "")) Response.Write(HttpL3_2("", "", "", "", "", "", "", "", "", "")) Response.Write(HttpL4(PageType , "")) If bGenkinMinusCheck = 1 Then Response.Write(HttpL5("現金がマイナスになっている時点があります")) ElseIf bGinkoMinusCheck = 1 Then Response.Write(HttpL5("預金がマイナスになっている時点があります")) End If %> <div id="L0" style="position: absolute; visibility: hidden; left: 0px; top: -2000px;"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5"> <tr> <td> <table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%"> <tr> <td align="CENTER" valign="MIDDLE"> <TABLE BORDER="0" CELLSPACING="5" CELLPADDING="0" BGCOLOR="#FFFFFF" STYLE="BORDER:1px solid #000000"> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_r.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" width="100%"> <TR> <TD HEIGHT="1"><% = Spacer(1,10) %></TD> </TR> <!-- <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 経理業務 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> --> <TR> <TD HEIGHT="1"><% = Spacer(1,10) %></TD> </TR> <TR> <TD WIDTH="20" CLASS="tx1214"> </TD> <TD ALIGN="CENTER"> <table BORDER="0" CELLSPACING="0" CELLPADDING="0" width="100%"> <tr> <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 経理課 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="360" HEIGHT="60" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/menu_s11.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">伝票</TD> </TR> </TABLE> </TD> <TD> <% If InputGenkinSuitotyo = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/hojyobo/fk_genkinsuitotyo.asp?RouteType=Ginko')"> <TR> <TD ALIGN="CENTER">現金出納帳</TD> </TR> </TABLE> <% ElseIf AutoGenkinSuitotyo = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_hojobo.asp?RouteType=Ginko&PageType=AA')"> <TR> <TD ALIGN="CENTER">現金出納帳<br><span class="tx1416">(自動転記)</span></TD> </TR> </TABLE> <% End If %> </TD> <TD> <% If KyuyoDaichoHyoji = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kyuyo/fk_kyuyo_ichiran.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">給与台帳</TD> </TR> </TABLE> <% End If %> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> <!-- <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn" nowrap>【 期首設定 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" width="120" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="120" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="60"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kisyusettei/fk_kanjyozandaka.asp')"> <TR> <TD ALIGN="CENTER">勘定残高<br>設定</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> --> <td colspan="2"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 現金 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="360" HEIGHT="60" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kinko/fk_nyukin.asp?PageType=入金')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">入金</TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kinko/fk_nyukin.asp?PageType=出金')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">出金</TD> </TR> </TABLE> </TD> <TD> <% If AutoGenkinNyuSyukinRireki = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/syokaisyukei/fk_kinko_rireki.asp?PageType=入出金履歴')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER"> <% If bGenkinMinusCheck = 1 Then %> <font color="#FF0000">入出金履歴</font> <% Else %> 入出金履歴 <% End If %> </TD> </TR> </TABLE> <% End If %> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> <tr> <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 財務集計 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="360" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_shiwaketyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">仕訳帳 </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_gokeizandakeshisanhyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">合計残高<br> 試算表 </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sokanjyomototyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">総勘定元帳 </TD> </TR> </TABLE> </TD> </TR> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_hachiketaseisanhyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER"> <p>八桁精算表</p> </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_taisyakutaisyouhyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">貸借対照表 </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sonekikeisansyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER"> <p>損益計算書</p> </TD> </TR> </TABLE> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 預金 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="240" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn('/<% = HomeAlias %>/user/bk/ginkomadoguchi/fb_ginkosyorui.asp?BunsyoSyuruiCD=BB')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">預入 </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn('/<% = HomeAlias %>/user/bk/ginkomadoguchi/fb_ginkosyorui.asp?BunsyoSyuruiCD=BC')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">引出 </TD> </TR> </TABLE> </TD> </TR> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn('/<% = HomeAlias %>/user/bk/ginkomadoguchi/fb_ginkosyorui.asp?BunsyoSyuruiCD=BD')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">振込 </TD> </TR> </TABLE> </TD> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>" onClick="tblbtn('/<% = HomeAlias %>/user/bk/ginkomadoguchi/fb_torihikimeisai.asp?GinkoCD=<% = KaisyaCD %>&KozaKubun=B&KozaBango=3999999')"> <TR> <TD ALIGN="CENTER"> <% If bGinkoMinusCheck = 1 Then %> <font color="#FF0000">別段預金</font> <% Else %> 別段預金 <% End If %> </TD> </TR> </TABLE> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> <!-- 3段目 --> <tr> <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 期首設定 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="120" HEIGHT="60" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kisyusettei/fk_kanjyozandaka.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <TR> <TD ALIGN="CENTER">勘定残高<br>設定</TD> </TR> </TABLE> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> <td> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hur.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhr.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn"> 【 期末処理 】 </TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rur.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>"> <TABLE WIDTH="240" HEIGHT="60" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD> <% If GetEnshuParam(EnshuCD, "整理記入精算表利用") = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kimatsusettei/fk_seisanhyo.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <% Else %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kimatsusettei/fk_furikae.asp')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <% End If %> <TR> <TD ALIGN="CENTER">決算整理<br>仕訳</TD> </TR> </TABLE> </TD> <TD> <% If GetEnshuParam(EnshuCD, "整理記入精算表利用") = "1" Then %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kimatsusettei/fk_seisanhyo.asp?Kimatsu=Kurikoshi')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <% Else %> <TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" CLASS="tbtn5" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/kimatsusettei/fk_furikae.asp?Kimatsu=Kurikoshi')" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2r.gif?<% = GB_STU %>"> <% End If %> <TR> <TD ALIGN="CENTER">決算振替<br>仕訳</TD> </TR> </TABLE> </TD> </TR> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <!--ボタン下の隙間調節--><tr> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_rd.gif?<% = GB_STU %>" CLASS="tx1214"></TD> <TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrr.gif?<% = GB_STU %>" CLASS="tx1214"></TD> </tr> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdr.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> </table> </TD> <TD WIDTH="20" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" CLASS="tx1214"> </TD> <TD HEIGHT="20" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" CLASS="tx1214"> </TD> </TR> </TABLE> </TD> </TR> </TABLE> </td> </tr> </table> </td> </tr> </table> </div> </body> <script language="JavaScript"> function NextPage(url) { if(url == "#") { return; } if(GinkoCD.selectedIndex == 0) { alert("銀行を選択して下さい"); return; } url = url + "&GinkoCD=" + GinkoCD.value; tblbtn( url); } </script> <% = HtmlFooter %> </html> <% End Sub %>