DECLARE
   IN_ROWID_TABLE           CHAR(14);
   IN_USER_NAME             VARCHAR2(50);
   IN_MATCH_SET_NAME        VARCHAR2(200);
   OUT_ERROR_MSG            VARCHAR2(1024);
   RC                       NUMBER;
BEGIN
   IN_ROWID_TABLE           := NULL;
   IN_USER_NAME             := NULL;
   IN_MATCH_SET_NAME        := NULL;
   OUT_ERROR_MSG            := NULL;
   RC                       := NULL;
   IN_JOB_GRP_CTRL          := NULL;
   IN_JOB_GRP_ITEM          := NULL;
   CMXMA.EXTERNAL_MATCH (IN_ROWID_TABLE, IN_USER_NAME, IN_MATCH_SET_NAME, OUT_ERROR_MSG, RC, IN_JOB_GRP_CTRL, IN_JOB_GRP_ITEM);
   DBMS_OUTPUT.PUT_LINE ('OUT_ERROR_MESSAGE = ' || OUT_ERROR_MSG); 
   DBMS_OUTPUT.PUT_LINE ('RC = ' || TO_CHAR(RC));
   IF RC < 0 THEN
      ROLLBACK;  
   ELSE
      COMMIT;
   END IF; 
END;