' $System.Access Template
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "テンプレートの詳細"
' Call cmHead $CaptionTitle
</head>
<body>
' $AppliName = $WorkSpace.Template.Name
' $Encode = $Command.String.Encode $Text
' $System.SetParameter BackURL "$Server?page=TemplateIndex&wid=$WID&ctid=$CTID&head=$Head&text=$Encode"
' Call cmHeader $CaptionTitle $BackURL $AppliName
' $System.CloseDatabase "mw"
' Set $Template = $Command.Template.GetTemplate $WID $TID
<p>
' $AccessModify = $Command.Template.IsAccessModify $WID $TID
' If $AccessModify
'  Call cmLink "変更する" "write20.png" "$Server?page=TemplateModify&wid=$WID&tid=$TID&ctid=$CTID&init=1&head=$Head&text=$Encode"
' EndIf
' $AccessDelete = $Command.Template.IsAccessDelete $WID $TID
' If $AccessDelete
'  Call cmLink "削除する" "delete20.png" "$Server?page=TemplateDelete&wid=$WID&tid=$TID&ctid=$CTID&head=$Head&text=$Encode"
' EndIf
' If $WorkSpace.Template.IsAccessCreate
'  Call cmLink "再利用作成" "recycle20.png" "$Server?page=TemplateAdd&wid=$WID&tid=$TID&ctid=$CTID&init=1&head=$Head&text=$Encode"
' EndIf
<table border="1" cellspacing="0" cellpadding="2" bgcolor="#ffffff">
<tr><td class="title" width="120" valign="top" nowrap>ID</td><td width="640">$Template.ID</td></tr>
<tr><td class="title" valign="top" nowrap>名前</td><td>$Template.Name</td></tr>
<tr><td class="title" valign="top" nowrap>件名</td><td>
' If $Template.SetSubject
$Template.Subject
' Else
<font color="#888888">(設定しない)</font>
' EndIf
<br></td></tr>
<tr><td class="title" valign="top" nowrap>カテゴリ</td><td>$Template.Category.Name<br></td></tr>
<tr><td class="title" valign="top" nowrap>内容</td><td nowrap>
' If $Template.HtmlData
'  $Data = $Template.HtmlData
'  $Command.Template.IncludeView 1
<div class="re-content">
'  $Command.RichText.View $Data
</div>
' Else
'  $Data = $Template.Data
'  $Command.Template.IncludeView
'  View $Data
' EndIf
</td></tr>
<tr><td class="title" valign="top" nowrap>ファイル</td><td nowrap>
' $System.SetParameter Inline "Inline$WID"
' For Each $File in $Template.Files
'  $System.FileLink $File "Template" $Login.$Inline 0 "&wid=$WID"
<br>
' Next
' If ! $Template.Files.Count
<br>
' EndIf
</td></tr>
<tr><td class="title" nowrap>作成情報</td><td nowrap>
'  $UID = $Template.UID
'  If $Users.$UID
$Users.$UID.Name
'  Else
$Template.UserName
'  EndIf
'  $t = $Template.CTime
'  If $t
($t.Year/$t.Month/$t.Day $t.Hour:$t.Minute00)
'  EndIf
<br></td></tr>
<tr><td class="title" nowrap>最終更新</td><td nowrap>
'  $UID = $Template.MID
'  If $Users.$UID
$Users.$UID.Name
'  Else
$Template.Modifier
'  EndIf
'  $t = $Template.MTime
'  If $t
($t.Year/$t.Month/$t.Day $t.Hour:$t.Minute00)
'  EndIf
<br></td></tr>
</table>
</p>
' Call cmFooter $BackURL "$AppliNameの一覧へ"
</body>
</html>