' $System.Access Login
' $WorkSpace.AccessManage
' If $System.IsPost
'  $System.Redirect $Server?page=ManageFormNotifyConfig&wid=$WID&id=$ID
'  $Command.Form.SetNotify
'  Exit
' EndIf
' $AppliName = $WorkSpace.Forms.$ID.Name
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "通知内容の変更"
' Call cmHead $CaptionTitle 1
<script language="JavaScript" type="text/javascript"><!--
function onSubmit( form )
{
	if( ! form.Name.value )
	{
		alert( "通知メールの件名を入力してください。" );
		return false;
	}
	return true;
}
-->
</script>
</head>
<body>
' $System.SetParameter BackURL "$Server?page=ManageFormNotifyConfig&wid=$WID&id=$ID"
' Call cmHeaderView 1 $CaptionTitle "$Server?page=ManageAdmin&wid=$WID&id=$ID" "運用管理" $BackURL "通知の設定"
' $System.CloseDatabase "mw"
' Set $FormProfile = $Command.Form.GetFormTop $ID
' Set $Notify = $FormProfile.Notify
<form method="post" action="$Server?" onSubmit="return onSubmit( this );">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="Page" value="ManageFormNotifySet">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="ID" value="$ID">
<p>他のユーザーに通知するメールの情報を設定してください。<br>
' Call formNote 1
</p><p>
<table border="0" cellspacing="0" cellpadding="2">
<tr><td nowrap>通知メールの件名
' Call formNecessaryMark
</td><td nowrap>
' If $Notify.Name
'  $Name = $Notify.Name
' Else
'  $System.SetParameter Name "[メールワイズ]$AppliNameからの通知"
' EndIf
' Call formText "Name" $Name 40 1
</td></tr>
</td><td valign="top" nowrap>通知メール本文の内容</td><td nowrap>
<table border="0" cellspacing="0" cellpadding="2">
<tr><td nowrap>
' Call cmImage "check20.png" "変更できません。"
コメント</td></tr>
<tr><td nowrap>
' If $Notify.URL
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "URL" "参照URL" $Checked 1 "URL"
</td></tr>
<tr><td nowrap>
' If $Notify.Creator
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "Creator" "作成者" $Checked 1 "Creator"
</td></tr>
<tr><td nowrap>
' If $Notify.Subject
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "Subject" "件名" $Checked 1 "Subject"
</td></tr>
<tr><td nowrap>
' If $Notify.DateTime
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "DateTime" "日時" $Checked 1 "DateTime"
</td></tr>
<tr><td nowrap>
' If $Notify.Company
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "Company" "会社" $Checked 1 "Company"
</td></tr>
<tr><td nowrap>
' If $Notify.Person
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "Person" "顧客" $Checked 1 "Person"
</td></tr>
' For Each $Item in $FormProfile.Items
'  $Contains = $Notify.IIDs.Contains $Item.ID
<tr><td nowrap>
'  If $Contains
'   $Checked = 0
'  Else
'   $Checked = 1
'  EndIf
'  Call formCheckBox "IID" $Item.Name $Checked $Item.ID "IID$Item.ID"
</td></tr>
' Next
<tr><td nowrap>
' If $Notify.File
'  $Checked = 0
' Else
'  $Checked = 1
' EndIf
' Call formCheckBox "File" "添付ファイル名" $Checked 1 "File"
</td></tr>
</table>
</td></tr>
</table>
</p>
</ul>
' Call formCommit "変更する"
</form>
' Call cmChildFooter $BackURL "通知の設定へ"
</body>
</html>