|
|
Line 1: |
Line 1: |
| __NOTOC__<hide> | | __NOTOC__<hide> |
| <let name=including val="1" /> | | <let name=including val="1" /> |
|
| |
| <func listMedia iRespKey>
| |
| <let name=respMedia>[</let>
| |
|
| |
| <let name=sqlRespKey copy=iRespKey ucfirst />
| |
| <let name=sqlRespKey self with="_"> </let>
| |
|
| |
| <let name=sqlMedia>(cl_to='</let>
| |
| <let name=sqlMedia append copy=sqlRespKey />
| |
| <let name=sqlMedia append>') AND (page_namespace=6)</let>
| |
| <for table="qryW3_Titles_Catgs" where=$sqlMedia hide>
| |
| <let name=med_title val="@row.page_title" />
| |
|
| |
| <let name=respMedia append> [[:media:</let>
| |
| <let name=respMedia append copy=med_title />
| |
| <let name=respMedia append>|</let>
| |
| <let name=respMedia append copy=med_title />
| |
| <let name=respMedia append>]]</let>
| |
| </for>
| |
| <let name=respMedia append> ]</let>
| |
| </func>
| |
|
| |
| <func xmltag contents>
| |
| <let name=out chr=60 />
| |
| <let name=out append copy=contents />
| |
| <let name=out append chr=62 />
| |
| <echo><get name=out raw /></echo>
| |
| </func>
| |
|
| |
| </hide> | | </hide> |
| {| | | {| |
Line 37: |
Line 8: |
| <hide> | | <hide> |
| <let name=including val="1" /> | | <let name=including val="1" /> |
| <let name=idx /> | | <call CollectArticles /> |
| <for table="qryW3_Titles_Catgs" where="(cl_to='Data/target') AND (page_title LIKE 'Targets/%')">
| |
| <let name=tpg_title val="@row.page_title" />
| |
| <let name=idx inc />
| |
| <load page=$tpg_title />
| |
| | |
| <let name=title_link val="[[" />
| |
| <let name=title_link append copy=tpg_title />
| |
| <let name=title_link append>|</let>
| |
| <let name=title_link append copy=title />
| |
| <let name=title_link append val="]]" />
| |
| | |
| <let name=tmp>{{PAGESINCATEGORY:</let>
| |
| <let name=tmp append copy=keyname />
| |
| <let name=tmp append val="}}" />
| |
| <let name=resp_qty copy=tmp parse />
| |
| | |
| <let name=resp_url>/PsyCrit:Code/show/responses?target=</let>
| |
| <let name=resp_url append copy=keyname />
| |
| | |
| <if comp=$resp_qty with=1>
| |
| <let name=resp_desc>view response</let>
| |
| </if><else>
| |
| <let name=resp_desc>view</let>
| |
| <let name=resp_desc append copy=resp_qty />
| |
| <let name=resp_desc append> responses</let>
| |
| </else>
| |
| <let name=resp_link chr=60 />
| |
| <let name=resp_link append>a title="</let>
| |
| <if flag=resp_qty>
| |
| <let name=resp_link append copy=resp_desc />
| |
| </if><else>
| |
| <let name=resp_link append>add a response</let>
| |
| </else>
| |
| <let name=resp_link append>" href="</let>
| |
| <let name=resp_link append copy=resp_url />
| |
| <let name=resp_link append>"</let>
| |
| <let name=resp_link append chr=62 />
| |
| <if flag=resp_qty>
| |
| <let name=resp_link append copy=resp_qty />
| |
| </if><else>
| |
| <let name=resp_link append>+</let>
| |
| </else>
| |
| <let name=resp_link append chr=60 />
| |
| <let name=resp_link append>/a</let>
| |
| <let name=resp_link append chr=62 />
| |
| | |
| <let name=resp_txt val="[" />
| |
| <let name=resp_txt append copy=resp_link />
| |
| <let name=resp_txt append val="]" />
| |
| | |
| <let name=arrKey copy=author />
| |
| <let name=arrKey append copy=year />
| |
| <let name=outParse>
| |
| * '''</let>
| |
| <let name=outParse append copy=author />
| |
| <let name=outParse append>''' (</let>
| |
| <let name=outParse append copy=year />
| |
| <let name=outParse append>) ''</let>
| |
| <let name=outParse append copy=title_link />
| |
| <let name=outParse append>'' </let>
| |
| <let name=out index=$arrKey append copy=outParse parse />
| |
| <let name=out index=$arrKey append copy=resp_txt />
| |
| </for>
| |
| <let name=out sort />
| |
| </hide><for array=out index=idx hide> | | </hide><for array=out index=idx hide> |
| <echo><get name=out index=$idx raw /></echo> | | <echo><get name=out index=$idx raw /></echo> |