<!-- #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"> 【財務諸表】 </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"> </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"> </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"> </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"> 【財務分析】 </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 %>