<!-- #include file="../../../include.asp" --> <% '<!-- '################################################ ' 名称 :勘定残高の照会の親ウィンドウ ' 作成日:2006/2/9 ' 作成者:濱田 ' 目的 :勘定残高帳を表示するための親ウィンドウ ' 概要 : '################################################ '--> %> <% main() Sub main() Dim KaisyaCD,Amend,DenpyoNo KaisyaCD = Request("KaisyaCD") Amend = Request("amend") DenpyoNo = Request("DenpyoNo") Dim HyojiFlg HyojiFlg = Request("HyojiFlg") Dim ShijoCD ShijoCD = Request("ShijoCD") '製造部対応(080411小野) Dim Mode Mode = Request("Mode") Dim AutoPrint AutoPrint = Request("AutoPrint") %> <html> <% = HtmlHeader("") %> <SCRIPT LANGUAGE="JavaScript"> <!-- ExitFlg = 1; --> </SCRIPT> <frameset rows="*,0" framespacing="0" border="0" frameborder="0"> <frame name="main" src="fk_kanjyozandaka_view_main.asp?KaisyaCD=<% = KaisyaCD %>&Amend=<% = Amend %>&DenpyoNo=<% = DenpyoNo %>&Mode=<% = Mode %>&ShijoCD=<% = ShijoCD %>&HyojiFlg=<% = HyojiFlg %>&Zandaka=<% = Request("Zandaka") %>&AutoPrint=<% = AutoPrint %>&<% = TimeUniq() %>" scrolling="no" noresize> <frame name="printout" id="fk_kanjyozandaka_view_print.asp?KaisyaCD=<% = KaisyaCD %>&Amend=<% = Amend %>&DenpyoNo=<% = DenpyoNo %>&Mode=<% = Mode %>&ShijoCD=<% = ShijoCD %>&HyojiFlg=<% = HyojiFlg %>&<% = TimeUniq() %>"> <noframes> <body onkeydown="if(ExitFlg==2)ExitFlg=3;"> <p>このページにはフレームが使用されていますが、お使いのブラウザではサポートされていません。</p> </body> </noframes> </frameset> </html> <% End Sub %>