<%
'
%>
<%
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")
%>
<% = HtmlHeader("") %>
<%
End Sub
%>