' $System.Access Template
<!--#include file="LibraryCommon.html"-->
' Call cmHtmlHead
<!--#include file="LibraryForm.html"-->
' $CaptionTitle = "テンプレートの予約語"
' Call cmHead $CaptionTitle
</head>
<body>
' Call cmChildHeader
' $System.CloseDatabase "mw"
' Sub SelectedCategory $sfName
 <tr class="selected"><td nowrap>
 <img src="$IMG_PATH/category20.png"><b>$sfName</b>
 </td></tr>
' EndSub
<form method="get" action="$Server">
<input type="hidden" name="Page" value="TemplateInclude">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="CTID" value="$CTID">
<p>他のテンプレートの内容を挿入する場合、対象テンプレートの「予約語」欄の値を記述してください。</p>
<p><table border="0" width="100%" cellspacing="0" cellpadding="4"><tr>
'' <!---------------------左側----------------------------->
<td class="active" width="10%" valign="top">
 <table width="100%" border="0" cellspacing="0" cellpadding="2">
' If $CTID
<tr><td nowrap>
'  Call cmLink "(全テンプレート)" "category20.png" "$Server?page=$Page&wid=$WID&ctid=0"
' Else
<tr class="selected"><td nowrap>
'  Call cmImage "category20.png"
<b>(全テンプレート)</b>
' EndIf
</td></tr>
' $CategoryTree = $Command.Template.GetCategoryView $WID $CTID
$_CategoryTree
 </table><br>
</td>
'' <!---------------------右側----------------------------->
<td width="90%" valign="top" nowrap>
' Set $Templates = $Command.Template.GetTemplates $WID $CTID
' If $Text or ( $Text = "0" )
'  $Templates.SearchText = $Text
' EndIf
' Call cmImage "search20.png"
' Call formText "Text" $Text 20 1
' Call formSubmit "Search" "検索"
 <table width="100%" border="0" cellspacing="0" cellpadding="2" bgcolor="#ffffff">
 <tr class="title"><td nowrap><b>名前</b></td>
<td nowrap><b>予約語</b></td>
' If ! $CTID
<td nowrap><b>カテゴリ</b></td>
' EndIf
 </tr>
' Init $Head = 0
' $Rows = 50
' $Tail = $Rows + $Head
' $Count = 0
' $RowNum = 0
' For Each $Template in $Templates
'  If $Count < $Head
'   Inc $Count
'   Continue
'  EndIf
'  If $Count >= $Tail
'   $Next = $Count
'   Exit
'  EndIf
'  Inc $Count
'  Inc $RowNum
'  $Remainder = $Command.Math.Modulus $RowNum 2
'  If $Remainder = 0
'   $RowClass = "evenRow"
'  Else
'   $RowClass = "oddRow"
'  EndIf
<tr class="$RowClass underline"><td nowrap>
'  Call cmLink $Template.Name "template20.png" "$Server?page=TemplateIncludeView&wid=$WID&ctid=$CTID&tid=$Template.ID"
 </td><td nowrap>
<b>%Include%$Template.ID%</b>
 </td>
'  If ! $CTID
<td nowrap>$Template.Category.Name<br></td>
'  EndIf
 </tr>
' Next
 </table>
 <table width="100%" border="0" cellspacing="0" cellpadding="4">
 <tr><td nowrap>
 <div style="line-height:1.5em">
' If $Head
 <a href="$Server?page=$Page&wid=$WID&ctid=$CTID&text=$Text">先頭へ</a> |
'  If $Head > $Rows
'   $Prev = $Head - $Rows
 <a href="$Server?page=$Page&wid=$WID&ctid=$CTID&text=$Text&head=$Prev">&lt;&lt; 前の$Rows件へ</a>
'  Else
 <a href="$Server?page=$Page&wid=$WID&ctid=$CTID&text=$Text">&lt;&lt; 前の$Rows件へ</a>
'  EndIf
' Else
<font color="#888888">先頭へ | &lt;&lt; 前の$Rows件へ</font>
' EndIf
' If $Next
| <a href="$Server?page=$Page&wid=$WID&ctid=$CTID&text=$Text&head=$Next">次の$Rows件へ &gt;&gt;</a>
'   Else
 <font color="#888888">| 次の$Rows件へ &gt;&gt;</font>
'   EndIf
 </div>
 </td></tr>
 </table>
</td>
</tr></table></p>
</form>
' Call cmChildFooter
</body>
</html>