source: cats/ISOcat/trunk/mod-ISOcat-access-data/access/group_recommendation.acc @ 5650

<accessor debug="false">
        <name>ISOcat.access.data.group.recommendation</name>
        <descr>This group recommends a DC</descr>
        <param mandatory="true">
                <name>id</name>
                <descr>the group id</descr>
                <type canonical="true">string</type>
        </param>
        <param mandatory="true">
                <name>dc</name>
                <descr>the DC id</descr>
                <type canonical="true">string</type>
        </param>
        <idoc>
                <instr>
                        <type>sloot.xquery</type>
                        <operator>
                                <sql>
                                        SELECT
                                                *
                                        FROM
                                                core_recommendation
                                        WHERE
                                                "group" = {string($group)}
                                        AND
                                                "dc" = {string($dc)}
                                        ;
                                </sql>
                        </operator>
                        <group>var:id</group>
                        <dc>var:dc</dc>
                        <target>var:sql</target>
                </instr>
                <accessor-debug>
                        <instr>
                                <type>log</type>
                                <operand>var:sql</operand>
                        </instr>
                </accessor-debug>
                <if>
                        <cond>
                                <instr>
                                        <type>isocat.sqlBooleanQuery</type>
                                        <operand>var:sql</operand>
                                        <target>this:cond</target>
                                </instr>
                        </cond>
                        <then>
                                <!-- the recommendation already exists: noop -->
                                <instr>
                                        <type>copy</type>
                                        <operand>
                                                <null/>
                                        </operand>
                                        <target>var:void</target>
                                </instr>
                        </then>
                        <else>
                                <!-- add the recommendation -->
                                <instr>
                                        <type>sloot.xquery</type>
                                        <operator>
                                                <sql>
                                                        INSERT INTO
                                                                core_recommendation
                                                                ("group","dc")
                                                        VALUES
                                                                ({string($group)},{string($dc)})
                                                        ;
                                                </sql>
                                        </operator>
                                        <group>var:id</group>
                                        <dc>var:dc</dc>
                                        <target>var:sql</target>
                                </instr>
                                <accessor-debug>
                                        <instr>
                                                <type>log</type>
                                                <operand>var:sql</operand>
                                        </instr>
                                </accessor-debug>
                                <instr>
                                        <type>isocat.sqlUpdate</type>
                                        <operand>var:sql</operand>
                                        <target>var:res</target>
                                </instr>
                                <!-- touch the updated DC -->
                                <instr>
                                        <type>ISOcat.access.data.dc.touch</type>
                                        <dc>var:dc</dc>
                                        <check>
                                                <b>f</b>
                                        </check>
                                        <target>var:void</target>
                                </instr>
                            <!-- invalidate the recommenders list -->
                            <instr>
                                <type>sloot.cutGoldenThread</type>
                                <param>
                                    <string>goldenthread:/recommenders/</string>
                                </param>
                            </instr>
                        </else>
                </if>
                <instr>
                        <type>copy</type>
                        <operand>
                                <null/>
                        </operand>
                        <target>this:response</target>
                </instr>
        </idoc>
        <exception>
                <debug/>
                <trace>ffcpl:/trace/group_recommendation.exception.xml</trace>
                <throw/>
        </exception>
        <response>
                <debug>ffcpl:/trace/group_recommendation.response.xml</debug>
                <mime>application/xml</mime>
        </response>
</accessor>