--- /dev/null
+<service-logic\r
+ xmlns='http://www.onap.org/sdnc/svclogic'\r
+ xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xsi:schemaLocation='http://www.onap.org/sdnc/svclogic ./svclogic.xsd' module='GENERIC-RESOURCE-API' version='${project.version}'>\r
+ <method rpc='pnf-topology-operation-unassign' mode='sync'>\r
+ <block atomic="true">\r
+ <switch test='`$pnf-topology-operation-input.request-information.request-action`'>\r
+ <outcome value='DeletePnfInstance'>\r
+ <block></block>\r
+ </outcome>\r
+ <outcome value='Other'>\r
+ <return status='failure'>\r
+ <parameter name='ack-final' value='Y'/>\r
+ <parameter name="error-code" value="500" />\r
+ <parameter name="error-message" value="If svc-action is 'unassign' then request-action must be 'DeletePnfInstance'" />\r
+ </return>\r
+ </outcome>\r
+ </switch>\r
+ <switch test='`$service-data.pnfs.pnf_length`'>\r
+ <outcome value=''>\r
+ <return status='success'>\r
+ <parameter name="ack-final-indicator" value="Y" />\r
+ <parameter name="error-code" value="200" />\r
+ </return>\r
+ </outcome>\r
+ <outcome value='Other'>\r
+ <block atomic="true">\r
+ <for index='idx' start='0' end='`$service-data.pnfs.pnf_length`' >\r
+ <switch test='`$service-data.pnfs.pnf[$idx].pnf-id == $pnf-topology-operation-input.pnf-details.pnf-id`' >\r
+ <outcome value='true'>\r
+ <set>\r
+ <parameter name='pnf-index' value='`$idx`' />\r
+ </set>\r
+ </outcome>\r
+ </switch>\r
+ </for>\r
+ <switch test='`$pnf-index`'>\r
+ <outcome value=''>\r
+ <return status='success'>\r
+ <parameter name="ack-final-indicator" value="Y" />\r
+ <parameter name="error-code" value="200" />\r
+ </return>\r
+ </outcome>\r
+ <outcome value='Other'>\r
+ <block atomic="true">\r
+ <call module='GENERIC-RESOURCE-API' rpc='self-serve-pnf-unassign' mode='sync' >\r
+ <outcome value='success'>\r
+ <switch test='`$service-data.pnfs.pnf_length`'>\r
+ <outcome value='1'>\r
+ <set>\r
+ <parameter name="service-data.pnfs." value=""/>\r
+ </set>\r
+ </outcome>\r
+ <outcome value='Other'>\r
+ <block atomic="true">\r
+ <for index='idx' start='`$pnf-index + 1`' end='`$service-data.pnfs.pnf_length`' >\r
+ <block>\r
+ <set>\r
+ <parameter name="$tmpidx" value="`$idx - 1`"/>\r
+ </set>\r
+ <set>\r
+ <parameter name="service-data.pnfs.pnf[$tmpidx]." value="" />\r
+ </set>\r
+ <set>\r
+ <parameter name="service-data.pnfs.pnf[$tmpidx]." value="$service-data.pnfs.pnf[$idx]." />\r
+ </set>\r
+ </block>\r
+ </for>\r
+ <set>\r
+ <parameter name="service-data.pnfs.pnf[$service-data.pnfs.pnf_length - 1]." value=""/>\r
+ </set>\r
+ <set>\r
+ <parameter name="service-data.pnfs.pnf_length" value="`$service-data.pnfs.pnf_length - 1`"/>\r
+ </set>\r
+ </block>\r
+ </outcome>\r
+ </switch>\r
+ </outcome>\r
+ <outcome value='failure'>\r
+ <return status='failure'>\r
+ <parameter name='error-code' value='500' />\r
+ <parameter name='error-message' value="`'Encountered error while unassigning self-serve pnf resources with error: '+ $error-message`" />\r
+ </return>\r
+ </outcome>\r
+ </call>\r
+ </block>\r
+ </outcome>\r
+ </switch>\r
+ </block>\r
+ </outcome>\r
+ </switch>\r
+ </block>\r
+ </method>\r
+</service-logic>
\ No newline at end of file