"buffer too small for string or missing null byte" inserting CR in excel

Question

I have created a Crystal Report based on below stored procedure.
DELIMITER $$
DROP PROCEDURE IF EXISTS `ww_test`.`PRD_Data_sp` $$
CREATE PROCEDURE `ww_test`.`PRD_Data_sp` (in cyear int, in cmonth int, in groupby varchar(20), in Inv_type varchar(4))
BEGIN
  select
          CASE WHEN groupby='Date' THEN  (p.FKDAT)
               WHEN groupby='SalesOrg' THEN  CONCAT(p.VKORG,'_',p.VTWEG)
          END ,
          sum(p.QTYSAM),
          sum(p.CASESSOLD),
          sum(p.SOLDDOL)
          from ww_test.prd_data p
          where (month(p.FKDAT)=cmonth and year(p.FKDAT)=cyear) and
                 ((p.FKART) is null or not(p.FKART in ("FAZ","ZMBB","FAS",Inv_Type))) and
                 ((p.AUART) is null or not(p.AUART in ("ZMBB")))
          Group by
              CASE WHEN groupby='Date' THEN  (p.FKDAT)
                   WHEN groupby='SalesOrg' THEN  CONCAT(p.VKORG,'_',p.VTWEG)
              END
          Order by
              CASE WHEN groupby='Date' THEN  (p.FKDAT)
                   WHEN groupby='SalesOrg' THEN  CONCAT(p.VKORG,'_',p.VTWEG)
              END;
END $$
DELIMITER ;
I have used Add Command to create report based on this.
call ww_test.prd_data_sp({?Year},{?Month},{?GroupBy},{?InvType});
I am able to refresh the report in crystal and as well in Infoview without any problem.
But when i try to insert this report in Excel using Live Office it gives me error. I able to insert other crystal reports without any problem.
An error occurred while opening the report. The report does not exist; you have insufficient rights to open the report; or you cannot make a connection to the BusinessObjects Web Service. (LO 02010)
Failed to open report (LO 26619)
Cannot open report document 
Buffer too small for string or missing null byte.
can anyone suggest where i am going wrong? Any input is appreciated.
Crystal Reports 2008
Live Office XI 3.1
BOEdge XI 3.1
Xcelsius 2008
Thanks ,
Madhavi

Answer 1

With the CurrentValue method
Crpt.ParamFields[3].CurrentValue := memo1.Text;
Is there another solution ?