<!-- #include file="../../include.asp" -->

<%
'<!-- 
'################################################
' 	名称	:商社-財務集計-試算表・元帳メニュー	 
' 	作成日:2002/10/18
' 	作成者:山崎
'################################################
'-->
%>

<%
main()
Sub main()
	If Not(SessionCheck()) Then
		Exit Sub
	End If
	
	
  	Dim Query, Content
	Dim InputShiwaketyo, InputShiwakeShukeihyo, InputGokeiZandakaShisanhyo, InputSokanjyoMototyo
	Dim InputTaisyakuTaisyohyo, InputSonekiKeisansyo, InputHachiketaSeisanhyo
	Dim AutoShiwaketyo, AutoShiwakeShukeihyo, AutoGokeiZandakaShisanhyo, AutoSokanjyoMototyo
	Dim AutoTaisyakuTaisyohyo, AutoSonekiKeisansyo, AutoHachiketaSeisanhyo
	Dim RiyoDenpyoSu  
	Dim AutoStockholderEquity

	Dim ZaimuTaishaku
	Dim ZaimuSoneki
	Dim ZaimuCashflow
	Dim ZaimuStockholder
	Dim BunsekiSonekijisseki
	Dim BunsekiAnzensei
	Dim BunsekiShuekisei
	Dim BunsekiSonekibunki

	Query = "exec SPM演習取得 '" & GB_SystemCD & "','" & EnshuCD & "'" 
	Set Content = OpenQuery(Query)

    
    If Not(Content.BOF Or Content.EOF) Then
  
		RiyoDenpyoSu = Content.Fields("利用伝票数区分")
		
		InputShiwaketyo = Content.Fields("手動仕訳帳表示")
		InputShiwakeShukeihyo = Content.Fields("手動仕訳集計表表示")
		InputGokeiZandakaShisanhyo = Content.Fields("手動合計残高試算表表示")
		InputSokanjyoMototyo = Content.Fields("手動総勘定元帳表示")
		InputTaisyakuTaisyohyo = Content.Fields("手動貸借対照表表示")
		InputSonekiKeisansyo = Content.Fields("手動損益計算書表示")
		InputHachiketaSeisanhyo = Content.Fields("手動8桁精算表表示")

		AutoShiwaketyo = Content.Fields("自動転記仕訳帳表示")
		AutoShiwakeShukeihyo = Content.Fields("自動転記仕訳集計表表示")
		AutoGokeiZandakaShisanhyo = Content.Fields("自動転記合計残高試算表表示")
		AutoSokanjyoMototyo = Content.Fields("自動転記総勘定元帳表示")
		AutoTaisyakuTaisyohyo = Content.Fields("自動転記貸借対照表表示")
		AutoSonekiKeisansyo = Content.Fields("自動転記損益計算書表示")
		AutoHachiketaSeisanhyo = Content.Fields("自動転記8桁精算表表示")
		AutoStockholderEquity = Content.Fields("自動転記株主資本等変動計算書表示")

		ZaimuTaishaku = "" & Content.Fields("財務諸表貸借対照表表示")
		ZaimuSoneki = "" & Content.Fields("財務諸表損益計算書表示")
		ZaimuCashflow = "" & Content.Fields("財務諸表キャッシュフロー計算書表示")
		ZaimuStockholder = "" & Content.Fields("財務諸表株主資本等変動計算書表示")
		BunsekiSonekijisseki = "" & Content.Fields("財務分析損益実績表示")
		BunsekiAnzensei = "" & Content.Fields("財務分析収益性表示")
		BunsekiShuekisei = "" & Content.Fields("財務分析安全性表示")
		BunsekiSonekibunki = "" & Content.Fields("財務分析損益分岐点表示")

	End If		

	'演習会社ログイン時は全てON								演習管理者は管理演習でのみ全てON
	If Session(HomeAlias & "AutoLoginButton") = "1" And (GB_AdminPCE = "" Or GB_AdminPCE = GB_EnshuCD) Then
		ZaimuTaishaku = "1"
		ZaimuSoneki = "1"
		ZaimuCashflow = "1"
		ZaimuStockholder = "1"
		BunsekiSonekijisseki = "1"
		BunsekiAnzensei = "1"
		BunsekiShuekisei = "1"
		BunsekiSonekibunki = "1"
	End If

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=shift_jis">
<meta http-equiv="Pragma" content="no-cache">
<meta http-equiv="Cache-Control" content="no-cache">
<meta http-equiv="Expires" content="-1">
<link href="../../binx/sj3web.css?<% = TimeUniq() %>" rel="stylesheet" type="text/css">
<title><% = AppTitle %></title>
<script language="JScript" src="../../include.js?<% = TimeUniq() %>"></script>
<script language="JScript" src="../../includesj.js?<% = TimeUniq() %>"></script>
<script language="JScript.Encode" src="../../include_enc.js?<% = TimeUniq() %>"></script>
<script language="JScript.Encode" src="../../includesj_enc.js?<% = TimeUniq() %>"></script>
<script type="text/javascript" src="../../javascript.js?<% = TimeUniq() %>"></script>
</head>
<SCRIPT LANGUAGE="JavaScript">
<!--
	HomeAlias = "<% = HomeAlias %>";
	HomeAliasSL = "<% = HomeAliasSL %>";
	ExitFlg = 1;
-->
</SCRIPT>

<body onkeydown="if(ExitFlg==2)ExitFlg=3;" onBeforeUnload="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/')", GB_GyosyuMeisyo, "tblbtn( '/" & HomeAlias & "/user/bk/menu_" & GB_Gyosyu & ".asp')", "社長室・総務部", "tblbtn( '/" & HomeAlias & "/user/bk/menu_s4.asp')", "財務諸表", "", "", "", "", ""))

	Response.Write(HttpL3("", "", "", "", "", "", "", "", "", "", "", "", "", "", "", ""))

	Response.Write(HttpL3_1("", "", "", "", "", "", "", "", "", ""))

	Response.Write(HttpL3_2("", "", "", "", "", "", "", "", "", ""))

	Response.Write(HttpL4("財務諸表", ""))
%>
								
<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="20" BGCOLOR="#FFFFFF" STYLE="BORDER:1px solid #000000">
								<TR> 
									<TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_p.gif?<% = GB_STU %>"> 
										<table border="0" width="100%" height="100%" cellspacing="0" cellpadding="0">
											<tr>
												<td width="100%">

												
													<TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
														<TR> 
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lup.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hup.gif?<% = GB_STU %>"> 
																<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhp.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111">
																	<TR> 
																		<TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn">&nbsp;【財務諸表】&nbsp;</TD>
																	</TR>
																</TABLE>
															</TD>
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rup.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
														<TR> 
															<TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_pd.gif?<% = GB_STU %>"> 
																<TABLE WIDTH="480" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80">
																	<TR ALIGN="CENTER" VALIGN="MIDDLE"> 

																	<% If ShachoZaimu = 1 Then %>

																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoShiwaketyo = "1" Then %>
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_shiwaketyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">仕訳帳</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoShiwakeShukeihyo = "1" Then %>
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_shiwakesyukeihyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">仕訳集計表</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoGokeiZandakaShisanhyo = "1" Then %> 
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_gokeizandakeshisanhyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">合計残高<br>試算表</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoSokanjyoMototyo = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sokanjyomototyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">総勘定元帳</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoHachiketaSeisanhyo = "1" Then %>
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_hachiketaseisanhyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">8桁精算表</TD>
																				</TR>																							
																			</TABLE>
																		<% End If %>
																		</TD>																																					
																	</TR>

																	<TR ALIGN="CENTER" VALIGN="MIDDLE"> 
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoTaisyakuTaisyohyo = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_taisyakutaisyouhyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">貸借対照表</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120"> 
																		<% If AutoSonekiKeisansyo = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sonekikeisansyo.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益計算書</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If AutoTaisyakuTaisyohyo = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_taisyakutaisyouhyohoukoku.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">貸借対照表<br><span class="tx1214">(報告書形式)</span></TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If AutoSonekiKeisansyo = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sonekikeisansyohoukoku.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益計算書<br><span class="tx1214">(報告書形式)</span></TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>

																	<% ElseIf GB_Gyosyu <> "B" Then %>  

																		<TD HEIGHT="77" WIDTH="120">
																		<% If ZaimuTaishaku = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_taisyakutaisyouhyohoukoku.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">貸借対照表</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If ZaimuSoneki = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_sonekikeisansyohoukoku.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益計算書</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>

																	<% Else '銀行 %>  

																		<TD HEIGHT="77" WIDTH="120">
																			&nbsp;
																		</TD>

																	<% End If %>

																		<TD HEIGHT="77" WIDTH="120">
																		<% If ZaimuStockholder = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_stockholder_equity.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">株主資本等<br>変動計算書</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>

																	<% If GB_Gyosyu = "B" Then '銀行 %>

																		<TD HEIGHT="77" WIDTH="120">
																			&nbsp;
																		</TD>

																	<% End If %>

																		<TD HEIGHT="77" WIDTH="120">
																		<% If ZaimuCashflow = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/jidotyobo/rm_cashflow.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">キャッシュ<br>フロー<span class="tbtn3">計算書</span></TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>

																	<% If GB_Gyosyu = "B" Then '銀行 %>

																		<TD HEIGHT="77" WIDTH="120">
																			&nbsp;
																		</TD>

																	<% End If %>

																	</TR>
																</TABLE>
															</TD>
															<TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
														<!--ボタン下の隙間調節--><tr>
															<TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlp.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
															<TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_pd.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
															<TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrp.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
														</tr>
														<TR> 
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
													</TABLE>
												</td>
											</tr>
											<tr>
												<td width="100%">
															
													<TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
														<TR> 
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_lup.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hup.gif?<% = GB_STU %>"> 
																<TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hhp.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111">
																	<TR> 
																		<TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx2022mn">&nbsp;【財務分析】&nbsp;</TD>
																	</TR>
																</TABLE>
															</TD>
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rup.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
														<TR> 
															<TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_pd.gif?<% = GB_STU %>"> 
																<TABLE WIDTH="600" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80">
																	<TR ALIGN="CENTER" VALIGN="MIDDLE"> 
																		<TD HEIGHT="77" WIDTH="120">
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/bunseki/fk_sonekikeikaku.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益計画</TD>
																				</TR>
																			</TABLE>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If BunsekiSonekijisseki = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/bunseki/fk_sonekijisseki_view.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益実績</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If BunsekiShuekisei = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/bunseki/fk_syuekisei_view.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">収益性の<br>
																						分析</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If BunsekiAnzensei = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/bunseki/fk_anzensei_view.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">安全性の<br>
																						分析</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																		<TD HEIGHT="77" WIDTH="120">
																		<% If BunsekiSonekibunki = "1" Then %>  
																			<TABLE WIDTH="110" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="75" BGCOLOR="#FFFFFF" CLASS="tbtn5" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_2p.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/bunseki/fk_sonekibunkiten_view.asp')">
																				<TR> 
																					<TD ALIGN="CENTER">損益分岐点<br>
																						分析</TD>
																				</TR>
																			</TABLE>
																		<% End If %>
																		</TD>
																	</TR>
																</TABLE>
															</TD>
															<TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
														<!--ボタン下の隙間調節--><tr>
															<TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlp.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
															<TD HEIGHT="5" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_pd.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
															<TD HEIGHT="5" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vrp.gif?<% = GB_STU %>" CLASS="tx1214"></TD>
														</tr>
														<TR> 
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
															<TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdp.gif?<% = GB_STU %>" CLASS="tx1214"> </TD>
														</TR>
													</TABLE>																										
												
												</td>
											</tr>
										</table>
									</TD>
								</TR>
							</TABLE>
						</td>
					</tr>
				</table>
			</td>
		</tr>
	</table>

</div>
</body>
<% = HtmlFooter %>
</html>
<% 
End Sub
%>