<ROW>
  <TABLESPACE_T>
    <VERS_MAJOR>1</VERS_MAJOR>
    <VERS_MINOR>0 </VERS_MINOR>
  </TABLESPACE_T>
</ROW>

<ROWSET>
 <ROW>
  <TABLESPACE_T>
    <VERS_MAJOR>1</VERS_MAJOR>
    <VERS_MINOR>0 </VERS_MINOR>
  </TABLESPACE_T>
 </ROW>
</ROWSET>

SQL> CREATE OR REPLACE PROCEDURE SYS.Database_Import2
  2      AUTHID CURRENT_USER
  3  AS
  4     V_Objtype VARCHAR2(200);
  5     V_Cnt NUMBER := 1;
  6     V_Xml XMLTYPE;
  7     V_Xml1 XMLTYPE;
  8  BEGIN
  9    FOR I IN ( SELECT Rowid, Obj_Id, Repos FROM sys.DDI_REPOS_T WHERE OBJ_ID <25 ORDER BY Obj_Id)
 LOOP
 10       SELECT Obj_Tp_Nm INTO V_Objtype FROM DDI_OBJ_TP_T WHERE Obj_Tp_Id IN (SELECT Obj_Tp_Id FRO
M DDI_OBJ_DEF_T WHERE Obj_Id = I.Obj_Id);
 11       DBMS_OUTPUT.PUT_LINE('Object type is ' || V_Objtype); 
 12              LOOP
 13                 SELECT EXTRACT (I.REPOS, 'ROWSET/ROW['||V_CNT ||']') INTO V_XML FROM DUAL;
 14                 EXIT WHEN V_XML IS NULL; 
 15                 V_XML1 := <ROWSET>||V_XML||</ROWSET> ;
 16                 INSERT INTO ABC VALUES (I.OBJ_ID, V_XML1); 
 17                V_CNT := V_CNT+1; 
 18               END LOOP;
 19               V_cnt := 1;
 20    END LOOP;
 21  END;
 22  /

Warning: Procedure created with compilation errors.

SQL> show errors
Errors for PROCEDURE SYS.DATABASE_IMPORT2:

LINE/COL ERROR
-------- -----------------------------------------------------------------
15/26    PLS-00103: Encountered the symbol "<" when expecting one of the
         following:
         ( - + case mod new not null <an identifier>
         <a double-quoted delimited-identifier> <a bind variable> avg
         count current exists max min prior sql stddev sum variance
         execute forall merge time timestamp interval date
         <a string literal with character set specification>
         <a number> <a single-quoted SQL string> pipe
         <an alternatively-quoted string literal with character set
         specification>
         <an alternatively-quoted S

PLS-00306: wrong number or types of arguments in call to '||'

ERROR line 15, col 35, ending_line 15, ending_col 35, Found '>', Expecting: ;   -or-   OR   -or-   AND   -or-   ||   -or-   /   -or-   **   -or-   (+)   -or-   %  .  [   -or-   :  @  CASE  CONNECT_BY_ROOT  decimal number  EXISTS  FALSE  float  integer  NEW  PRIOR  SQL  TRUE   -or-   (  *  +  -  AT  CONTINUE  CURSOR  DAY  identifier  MOD  MODEL  MULTISET  NOT  NULL  REM  string  THE  WHEN  YEAR

SELECT XMLELEMENT
("ROWSET",
  XMLType('
  <ROW>
    <TABLESPACE_T>
      <VERS_MAJOR>1</VERS_MAJOR>
      <VERS_MINOR>0 </VERS_MINOR>
    </TABLESPACE_T>
  </ROW>')
 )xmlstr FROM dual;

XMLSTR
----------------------
<ROWSET>
  <ROW>
    <TABLESPACE_T>
      <VERS_MAJOR>1</VERS_MAJOR>
      <VERS_MINOR>0 </VERS_MINOR>
    </TABLESPACE_T>
  </ROW>
</ROWSET>