' $System.Access Admin
' If $System.IsPost
'  If $BPage
'   $System.Redirect $Server?page=$BPage
'  Else
'   $System.Redirect $Server?page=SystemLicense
'  EndIf
'  $Command.System.SetCustomerData
'  Exit
' EndIf
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "お客様情報の変更"
<script language="JavaScript" type="text/javascript"><!--
function onSubmit( form )
{
	if( ! form.UserNumber.value )
	{
		alert( "お客様番号を入力してください。" );
		return false;
	}
	if( ! form.Company.value )
	{
		alert( "会社名を入力してください。" );
		return false;
	}
	return true;
}
-->
</script>
' Call cmHead $CaptionTitle
</head>
<body>
' $System.SetParameter URLMWSetting 
' If $BPage
'  $System.SetParameter URLSystemLicense "$Server?page=SystemLicense"
'  $System.SetParameter BackURL "$Server?page=$BPage"
'  Call cmHeaderView 1 $CaptionTitle "$Server?page=SystemAdmin" "システム設定" $URLSystemLicense "ライセンスキーの設定" $BackURL "ライセンス情報の登録"
'  $CaptionBackPage = "ライセンス情報の登録へ"
' Else
'  $System.SetParameter BackURL "$Server?page=SystemLicense"
'  Call cmHeaderView 1 $CaptionTitle "$Server?page=SystemAdmin" "システム設定" $BackURL "ライセンスキーの設定"
'  $CaptionBackPage = "ライセンスキーの設定へ"
' EndIf
<form method="post" action="$Server?" onSubmit="return onSubmit( this );">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="Page" value="SystemLicenseModify">
<input type="hidden" name="rw" value="User">
<input type="hidden" name="BPage" value="$BPage">
<p>
変更するお客様情報を入力してください。<br>
' Call formNote 1
</p>
' $UserNumber = $Command.System.GetUserNumber
' $Company = $Command.System.GetCompany
' $Section = $Command.System.GetSection
<p><table border="0" cellspacing="0" cellpadding="2">
<tr><td nowrap>お客様番号
' Call formNecessaryMark
</td><td>
' Call formText "UserNumber" $UserNumber 7 1 6
</td></tr>
<tr><td nowrap>会社名
' Call formNecessaryMark
</td><td>
' Call formText "Company" $Company 30 1
</td></tr>
<tr><td nowrap>部署名</td><td>
' Call formText "Section" $Section 30 1
</td></tr>
</table></p>
' Call formCommit "変更する"
</form>
' Call cmChildFooter $BackURL $CaptionBackPage
</body>
</html>