<!-- #include file="../../../../include.asp" -->
<!-- #include file="../../../../user/bk/unso/souko/fu_kitaku_view_main_in.asp" -->

<%
'<!--
'################################################
'	 名称	:出庫情報設定
'	 作成日:2002/12/20
'	 作成者:重松
'	 目的 :出庫情報画面を表示する。
'	 概要	:
'		<<表示>>
'	<<入力チェック>>
'	・NULLチェック
'
'	修正日:
'	修正者:
'	 fu_syuko_view.asp
'################################################
'-->
%>

<%
main()
Sub main()
	If Not(SessionCheck()) Then
		 Exit Sub
	End If

	Dim RouteType
	RouteType = Request("RouteType")

	Dim kitakuNo										'契約申込番号
	kitakuNo = Request("kitakuNo")

%>


<html>
<% = HtmlHeader("") %>
<SCRIPT LANGUAGE="JavaScript">
<!--
	HomeAlias = "<% = HomeAlias %>";
	HomeAliasSL = "<% = HomeAliasSL %>";
	ExitFlg = 1;

	//印刷余白指定(ミリ指定)
	PrintTopMargin = 20;
	PrintLeftMargin = 15;
//	PrintTopMargin = 0;
//	PrintLeftMargin = 0;

-->
</SCRIPT>

<body onload="<% = PrintOnLoad %>" onkeydown="if(ExitFlg==2)ExitFlg=3;" bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<% = PrintScriptX %>

<%
		Response.Write(PrintHeader(0, "寄託"))
Dim AutoFlg
If RouteType = "Hakushi" Then
	AutoFlg = -1
Else
	AutoFlg = 0
End If
%>

<% = Uosokitaku(EnshuCD, KaisyaCD, kitakuNo, AutoFlg, 1) %>

<%
		Response.Write(PrintFooter())
%>
</body>
<%= HtmlFooter %>


</html>


<%
End Sub
%>