CLOB error?

Question

When I run the Dbms_Xmlgen below, I get error:
"ORA-06502: PL/SQL: numeric or value error
ORA-06512: at line 71"
where line 71 is "Utl_File.Put_Line(l_Output, RESULT);" which I assume it is something to do with size/CLOB?
I have googled it and try to make changes, but could not get it to work.
The SQL statement works by itself.
Any suggestion?
Thanks
DECLARE
  l_Output    Utl_File.File_Type;
  p_Filename  VARCHAR2(50);
  Qryctx      Dbms_Xmlgen.Ctxhandle;
  RESULT      CLOB;
  Output_Date VARCHAR2(16);
BEGIN
  Output_Date := Substr(SYSDATE, 9, 2) || Substr(SYSDATE, 6, 2) ||
                 Substr(SYSDATE, 3, 2);               
  p_Filename  := 'listings.xml';
  l_Output    := Utl_File.Fopen('testing', p_Filename, 'w');
  Utl_File.Put(l_Output, '<?xml version="1.0" encoding="utf-8" ?> ');
  Qryctx := Dbms_Xmlgen.Newcontext('SELECT DISTINCT Evt.Event_Id Detail_Id,
                Tools_Pkg.Get_Parent_Programme_Detail_Id(Evt.Event_Id) Container_Id,
                Ch.Channel_Name,
                Tools_Pkg.Get_Time_Display_2(Evt.Start_Time, 1, 0) Start_Time,
                Tools_Pkg.Pad_To_Length(Uktv_Tools_Pkg.Bill_Time_Formatter(Evt.Original_Start_Time,
                                                                                1),
                                             8) Billed_Time,
                Tools_Pkg.Get_Time_Display_2((Evt.Start_Time + Evt.Duration),
                                             1,
                                             0) End_Time,
                To_Char(Evt.On_Date, ''DD/MM/YY'') Date,
                p.Promo_Name Original_Name,
                '''' Playlist_Name,
                0 Program_Id,
                0 Episode_Id,
                '''' Listing_Title,
                Tools_Pkg.Get_Time_Display_2(Evt.Duration, 1, 0) Duration,
                Pt.Playlist_Name House_Number,
                Ch.Channel_Id,
                '''' Application_Id,
                '''' Videoplusid,
                Otw.Owt,
                '''' Subtitled,
                '''' Signed,
                '''' Ad,
                c.Description Event_Type
  FROM Event                     Evt,
       Event_Technical_Data      Etd,
       Promo_Timing              Pt,
       Promo_Type                Ptype,
       Promo                     p,
       Additional_Fields_Channel Afc,
       Channel                   Ch,
       Event_Otw                 Otw,
       Codesc                    c
WHERE Evt.Event_Technical_Data_Id = Etd.Event_Technical_Data_Id
       AND Etd.Promo_Timing_Id = Pt.Promo_Timing_Id
       AND Pt.Promo_Type_Id = Ptype.Promo_Type_Id
       AND Ptype.Promo_Id = p.Promo_Id
       AND Evt.Channel_Id = Afc.Channel_Id
       AND Evt.On_Date >= ''01/jun/07''
       AND Evt.On_Date <= ''01/jun/07''
       AND Evt.Channel_Id = 3868
       AND Evt.Day_Type_Id = 1307000
       AND Evt.Kind_Code = 1094006 --c_Type_Promo
       AND Ch.Channel_Id = Afc.Channel_Id
       AND Evt.Detail_Id = Otw.Event_Id(+)
       AND p.Promo_Category_Code = c.Code
ORDER BY Date, Channel_Id, Start_Time');
  -- Set the row header to be TEST
  Dbms_Xmlgen.Setrowtag(Qryctx, 'TEST');
  -- Get the result
  RESULT := Dbms_Xmlgen.Getxml(Qryctx);
  Utl_File.Put_Line(l_Output, RESULT);
  Utl_File.Fclose(l_Output);
  --Close context
  Dbms_Xmlgen.Closecontext(Qryctx);
END;

Answer 1

Which is why I said to you in your other thread (Re: Creating XML documents that you would be better to use the DBMS_XMLDOM package to output everything in one go.
If you insist on using UTL_FILE then you are going to have to chop up your CLOB into pieces and output it bit by bit as there is a 32K limit on each piece you output with UTL_FILE.