' If $System.IsPost
'  $Command.User.SetNotify
'  If $Admin or ( $UID != $Login.ID )
'   $System.Redirect $Server?page=SystemUserCustomize&uid=$UID&gid=$GID
'  Else
'   $System.Redirect $Server?page=PersonalAdmin&wid=$WID
'  EndIf
'  Exit
' EndIf
' Set $u = $Users.$UID
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "通知の設定"
' If $Admin or ( $UID != $Login.ID )
'  Call cmHead $CaptionTitle 1
' Else
'  Call cmHead $CaptionTitle
' EndIf
</head>
<body>
' If $Admin or ( $UID != $Login.ID )
'  $System.SetParameter BackURL "$Server?page=SystemUserCustomize&uid=$UID&gid=$GID"
'  Call cmHeaderView 1 $CaptionTitle "$Server?page=SystemAdmin" "システム設定" "$Server?page=SystemUserAdmin&gid=$GID" "ユーザーの設定" $BackURL "個人設定"
' Else
'  $System.SetParameter BackURL "$Server?page=PersonalAdmin&wid=$WID"
'  Call cmHeader $CaptionTitle $BackURL "個人設定"
' EndIf
<form method="post" action="$Server?">
<input type="hidden" name="CSRFTicket" value="$System.MakeCSRFKey">
<input type="hidden" name="rw" value="User">
<input type="hidden" name="Page" value="$Page">
<input type="hidden" name="UID" value="$UID">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="GID" value="$GID">
<input type="hidden" name="Admin" value="$Admin">
<p>$u.Name さんの $WorkSpace.Name の通知を設定してください。</p>
' For Each $m in $WorkSpace.Mails
'  Set $MailProfile = $Command.Mail.GetMailTop $m.ID
'  $System.SetParameter AssignedNotify "AssignedNotify$m.ID"
'  $System.SetParameter ReceivedNotify "ReceivedNotify$m.ID"
'  $System.SetParameter NotifyFID "NotifyFID$m.ID"
'  $System.SetParameter NotifySF "NotifySF$m.ID"
<p>
' Call cmImage "pin.png"
$m.Name
<table border="0" cellspacing="0" cellpadding="4">
<tr><td><img src="$IMG_PATH/spacer.gif" width="25" height="25"></td><td valign="top" nowrap>
' Call formCheckBox $AssignedNotify "メールの担当者に設定された時、通知メールを受け取る" $u.$AssignedNotify 1 $AssignedNotify
</td></tr>
<tr><td><img src="$IMG_PATH/spacer.gif" width="25" height="25"></td><td valign="top" nowrap>
'  Call formCheckBox $ReceivedNotify "メールを受信した時、通知メールを受け取る" $u.$ReceivedNotify 1 $ReceivedNotify
'  If $MailProfile.Folder.Disable
<input type="hidden" name="$NotifyFID" value="-5">
'  Else
<br><img src="$IMG_PATH/spacer.gif" width="25" height="25">対象受信フォルダ
<select name="$NotifyFID" onChange="$ReceivedNotify$.checked=true;">
'   If $u.$NotifyFID = -5
'    $Sel = "Selected"
'   Else
'    $Sel = ""
'   EndIf
<option value="-5" $Sel>(受信メール)
'   $FolderOptions = $Command.Mail.GetFolderOptions $m.ID $u.$NotifyFID 1 1
$_FolderOptions</select>&nbsp;
'   Call formCheckBox $NotifySF "サブフォルダも対象とする" $u.$NotifySF 1 $NotifySF
'  EndIf
</td></tr>
</table>
</p>
' Next
' Call formCommit "変更する"
</form>
' Call cmChildFooter $BackURL "個人設定へ"
</body>
</html>