<!-- #include file="../../include.asp" --> <% '<!-- '################################################ ' 名称 :商社-製造部メニュー ' 作成日 :2008/03/13 ' 作成者 :小野 '################################################ '--> %> <% main() Sub main() If Not(SessionCheck()) Then Exit Sub End If Dim AutoGenkinNyusyukinRireki, AutoYokinNyusyukinRireki, AutoNyukoJisseki, AutoSyukoJisseki Dim AutoSyohinZaiko, AutoUketoriTegataIchiran, AutoShiaraiTegataIchiran Dim Query, Content Query = "exec SPM演習取得 '" & GB_SystemCD & "','" & EnshuCD & "'" Set Content = OpenQuery(Query) If Not(Content.BOF Or Content.EOF) Then Dim YobiA YobiA = Content.Fields("履歴表示") AutoGenkinNyusyukinRireki = Mid(YobiA, 1, 1) AutoYokinNyusyukinRireki = Mid(YobiA, 2, 1) AutoNyukoJisseki = Mid(YobiA, 3, 1) AutoSyukoJisseki = Mid(YobiA, 4, 1) AutoSyohinZaiko = Mid(YobiA, 5, 1) AutoUketoriTegataIchiran = Mid(YobiA, 6, 1) AutoShiaraiTegataIchiran = Mid(YobiA, 7, 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')", "製造部", "", "", "", "", "", "", "")) 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="0" BGCOLOR="#FFFFFF" STYLE="BORDER:1px solid #000000"> <TR> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_o.gif?<% = GB_STU %>"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" background="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" background="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="150" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 製造部 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" background="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" CLASS="tx1214"> </TD> <TD ALIGN="CENTER"> <table border="0" height="280" cellspacing="0" cellpadding="0"> <TR> <!-- 左側 --> <td valign="top" align="center" width="240"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_luo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_huo.gif?<% = GB_STU %>"> <TABLE WIDTH="100" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hho.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 経理課 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ruo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="200" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/denpyo/fk_zairyoshiire.asp')"> <TR> <TD ALIGN="CENTER">仕入伝票</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/denpyo/fk_furikae.asp?Mode=Seizo')"> <TR> <TD ALIGN="CENTER">振替伝票</TD> </TR> </TABLE> </TD> </TR> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn('/<% = HomeAlias %>/user/bk/jidotyobo/rm_gokeizandakeshisanhyo.asp?RouteType=SeizoBu')"> <TR> <TD ALIGN="CENTER">合計残高<br>試算表</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn('/<% = HomeAlias %>/user/bk/jidotyobo/rm_seizougenkahoukokusho.asp?RouteType=SeizoBu')"> <TR> <TD ALIGN="CENTER">製造原価<br>報告書</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vro.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_luo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_huo.gif?<% = GB_STU %>"> <TABLE WIDTH="100" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hho.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 期首設定 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ruo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="200" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn('/<% = HomeAlias %>/user/bk/kisyusettei/fk_kanjyozandaka.asp?Mode=Seizo');"> <TR> <TD ALIGN="CENTER">勘定残高<br>設定</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn('/<% = HomeAlias %>/user/bk/kisyusettei/fk_kurikoshizandaka.asp?Mode=Seizo');"> <TR> <TD ALIGN="CENTER">繰越残高<br>設定</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vro.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> <!-- 右側 --> <td width="380" align="center"> <table border="0" width="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <tr> <td align="center"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_luo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_huo.gif?<% = GB_STU %>"> <TABLE WIDTH="140" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hho.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 商品企画課 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ruo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="300" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/admin/master/shohin/fm_shohin.asp?Action=1&PageType=SeizoBu')"> <TR> <TD ALIGN="CENTER">商品企画</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/admin/master/shohin/fm_shohin.asp?Action=1&PageType=SeizoBu&Mode=Zairyo')"> <TR> <TD ALIGN="CENTER">材料企画</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/admin/master/shohin/fm_shohin_ichiran.asp?PageType=SeizoBu&Mode=BuhinTenkai')"> <TR> <TD ALIGN="CENTER">部品展開</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vro.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> </table> <table border="0" width="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <tr> <td align="center"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_luo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_huo.gif?<% = GB_STU %>"> <TABLE WIDTH="100" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hho.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 資材課 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ruo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="200" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/shiireuriage/fd_nyusyukko.asp?BunsyoSyuruiCD=ZS')"> <TR> <TD ALIGN="CENTER">材料入庫</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/syokaisyukei/rm_syohinzaiko.asp?RouteType=Zairyo')"> <TR> <TD ALIGN="CENTER">材料在庫<BR>照会</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vro.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> </table> <table border="0" width="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0"> <tr> <td align="center"> <TABLE BORDER="0" CELLSPACING="0" CELLPADDING="0"> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_luo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_huo.gif?<% = GB_STU %>"> <TABLE WIDTH="100" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hho.gif?<% = GB_STU %>" style="border-collapse: collapse" bordercolor="#111111"> <TR> <TD ALIGN="CENTER" VALIGN="BOTTOM" CLASS="tx1618mn">【 製造課 】</TD> </TR> </TABLE> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ruo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vlo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD ALIGN="CENTER" BACKGROUND="/<% = HomeAlias %>/images/wdwbk_od.gif?<% = GB_STU %>"> <TABLE WIDTH="300" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="80"> <TR ALIGN="CENTER" VALIGN="MIDDLE"> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="if(BuhinTenkaiHyoCheck())tblbtn('/<% = HomeAlias %>/user/bk/shiireuriage/fd_seizosashizusho.asp');"> <TR> <TD ALIGN="CENTER">製造指図書</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="if(BuhinTenkaiHyoCheck())tblbtn('/<% = HomeAlias %>/user/bk/shiireuriage/fd_seizosashizusho_ichiran.asp?Mode=Shukko');"> <TR> <TD ALIGN="CENTER">製品出庫</TD> </TR> </TABLE> </TD> <TD HEIGHT="80" WIDTH="100"> <TABLE WIDTH="90" BORDER="0" CELLSPACING="0" CELLPADDING="0" HEIGHT="70" BGCOLOR="#FFFFFF" CLASS="tbtn3" BACKGROUND="/<% = HomeAlias %>/images/mnbtn03_o.gif?<% = GB_STU %>" onClick="tblbtn( '/<% = HomeAlias %>/user/bk/syokaisyukei/rm_syohinzaiko.asp?RouteType=Seihin')"> <TR> <TD ALIGN="CENTER">製品在庫<BR>照会</TD> </TR> </TABLE> </TD> </tr> </TABLE> </TD> <TD WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_vro.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> <TR> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_ldo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_hdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> <TD HEIGHT="20" WIDTH="20" BACKGROUND="/<% = HomeAlias %>/images/ndlgline_rdo.gif?<% = GB_STU %>" CLASS="tx1214"> </TD> </TR> </TABLE> </td> </tr> </table> </td> </TR> </TABLE> </TD> <TD WIDTH="20" CLASS="tx1214"> </TD> </TR> </TABLE> </TD> </TR> </TABLE> </td> </tr> </table> </td> </tr> </table> </div> </body> <SCRIPT LANGUAGE="JavaScript"> function BuhinTenkaiHyoCheck() { <% '部品展開表存在チェック Dim Flg Flg = 0 Query = "exec SPM部品展開表商品一覧 '" & GB_SystemCD & "', '" & EnshuCD & "', '" & KaisyaCD & "'" Set Content = OpenQuery(Query) If Not(Content.BOF Or Content.EOF) Then Flg = 1 End If If Flg = 0 Then Query = "exec SPM部品展開表材料一覧 '" & GB_SystemCD & "', '" & EnshuCD & "', '" & KaisyaCD & "'" Set Content = OpenQuery(Query) If Not(Content.BOF Or Content.EOF) Then Flg = 1 End If End If %> <% If Flg = 0 Then %> alert("部品展開表が作成されていません "); return false; <% Else %> return true; <% End If %> } </SCRIPT> <% = HtmlFooter %> </html> <% End Sub %>