' $System.Access Template
' If $OpenFID
'  $Command.Template.OpenFolder $WID $OpenFID
' Elif $CloseFID
'  $Command.Template.CloseFolder $WID $CloseFID
' EndIf
' $Encode = $Command.String.Encode $Text
<!--#include file="LibraryCommon.html"-->
<!--#include file="LibraryForm.html"-->
' Call cmHtmlHead
' $CaptionTitle = $WorkSpace.Template.Name
' Call cmHead $CaptionTitle
</head>
<body>
' Call cmHeader $CaptionTitle
''
<form method="get" action="$Server" onSubmit="if( ! Text.value ){ return false; }">
<input type="hidden" name="Page" value="TemplateIndex">
<input type="hidden" name="WID" value="$WID">
<input type="hidden" name="CTID" value="$CTID">
''
' Sub menuColumn
'  Set $Templates = $Command.Template.GetTemplates $WID $CTID
<table class="menuColumn">
<tr><td width="1%" nowrap>\\
' If $WorkSpace.Template.IsAccessCreate
'  Call cmLinkButton "テンプレートを追加する" "btn_edit20.png" "$Server?page=TemplateAdd&wid=$WID&ctid=$CTID&init=1"
' EndIf
' If $WorkSpace.Template.IsAccessFile
'  Call cmLinkButton "ファイル入出力" "btn_file20.png" "$Server?page=TemplateFile&wid=$WID"
' EndIf
<br></td>
<td align="right" nowrap>\\
'   Call cmImage menu_sep.png "" "" "" "" "" "" "menusep"
<div class="search">
'   Call formTextBox "Text" "$Text" 100 "" "" "" "searchText"
'   Call formSubmit "Search" "" "" "searchButton"
</div></td></tr></table>
' EndSub
''
' Sub commonColumn
'  Call menuColumn
' EndSub
''
' Sub sideColumn
' If $WorkSpace.IsAccessManage
<div class="sidemenu-operation">
'  Call cmLinkButton "カテゴリを設定する" "category20.png" "$Server?page=ManageTemplateCategory&wid=$WID"
</div>
' EndIf
 <table class="category">
  <tr><td><hr></td></tr>
  <tr><td nowrap>\\
' If $CTID
<div class="category-item selected">\\
'   Else
<div class="category-item">\\
' EndIf
' Call cmLink "(全テンプレート)" "category20.png" "$Server?page=$Page&wid=$WID"
</div></td></tr>
' $CategoryTree = $Command.Template.GetCategoryView $WID $CTID
$_CategoryTree
 </table>
'  Call categoryJS
' EndSub
''
' Sub mainColumn
' If $Text or ( $Text = "0" )
'  $Templates.SearchText = $Text
' Else
'  If $Templates.Count > 1
'   $NoOrder = 0
'  Else
'   $NoOrder = 1
'  EndIf
'  If $WorkSpace.Template.IsAccessModify
 <div class="data-operation active">\\
'   Call cmLinkButton "順番変更" "order20.png" "$Server?page=TemplateOrder&wid=$WID&ctid=$CTID" $NoOrder
</div>
'  EndIf
' EndIf
<table class="dataList" width="100%" border="0" cellspacing="0" cellpadding="4">
' Call viewTitle $CTID
' 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=TemplateView&wid=$WID&ctid=$CTID&tid=$Template.ID&head=$Head&text=$Encode"
 </td>
'  If ! $CTID
<td nowrap>$Template.Category.Name<br></td>
'  EndIf
 </tr>
' Next
' If $RowNum == 0
</table>
<div class="mailindex-separator">
'  If ! $Head
データはありません。
'  EndIf
</div>
<table class="dataList" width="100%" border="0" cellspacing="0" cellpadding="4">
' EndIf
' Call viewTitle $CTID
 </table>
 <table width="100%" border="0" cellspacing="0" cellpadding="4">
 <tr class="active"><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=$Encode&head=$Prev">&lt;&lt; 前の$Rows件へ</a>
'  Else
 <a href="$Server?page=$Page&wid=$WID&ctid=$CTID&text=$Encode">&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=$Encode&head=$Next">次の$Rows件へ &gt;&gt;</a>
'   Else
 <font color="#888888">| 次の$Rows件へ &gt;&gt;</font>
'   EndIf
 </div>
 </td></tr>
 </table>
' EndSub
''
' Call layout_list "" "" 0 mainColumn "" "" 1 sideColumn commonColumn
</form>
' Call cmFooter
</body>
</html>
''
' Sub viewTitle $argHideCategory
 <tr class="table-header"><td nowrap>名前</td>
' If ! $argHideCategory
<td nowrap>カテゴリ</td>
' EndIf
 </tr>
' EndSub