plsql run concurent WIP Move Transaction Manager

Hai,

How to call API WICTMS by plsql script,

I try this script but the concurent not running

---

DECLARE

l_responsibility_id     NUMBER;

l_application_id        NUMBER;

l_user_id               NUMBER;

l_request_id            NUMBER;

BEGIN

  --

  SELECT DISTINCT fr.responsibility_id,

    frx.application_id

     INTO l_responsibility_id,

    l_application_id

     FROM apps.fnd_responsibility frx,

    apps.fnd_responsibility_tl fr

    WHERE fr.responsibility_id = frx.responsibility_id

  AND LOWER (fr.responsibility_name) LIKE LOWER('WIP');

  --

   SELECT user_id INTO l_user_id FROM fnd_user WHERE user_name = 'MII';

  --

  --To set environment context.

  --

  apps.fnd_global.apps_initialize (l_user_id,l_responsibility_id,l_application_id);