Export Excell error

kmkaot

Can anybody help me with following code as I am getting error



IF (Row=1) AND (Txtexporttoexcel) THEN
BEGIN

EnterCell(Row,1,'PRODUCT',TRUE,FALSE,FALSE);
EnterCell(Row,2,'DESCRIPTION',TRUE,FALSE,FALSE);
EnterCell(Row,3,'UOM',TRUE,FALSE,FALSE);
EnterCell(Row,4,'GROUP',TRUE,FALSE,FALSE);
EnterCell(Row,5,'OPG.STOCK',TRUE,FALSE,FALSE);
EnterCell(Row,6,'INCREASE ',TRUE,FALSE,FALSE);
EnterCell(Row,7,'AUH SALEE',TRUE,FALSE,FALSE);
EnterCell(Row,8,'DXB SALE ',TRUE,FALSE,FALSE);
EnterCell(Row,9,'TRANSIT ',TRUE,FALSE,FALSE);
EnterCell(Row,10,'STOCK QTY',TRUE,FALSE,FALSE);
EnterCell(Row,11,'UNIT COST',TRUE,FALSE,FALSE);
EnterCell(Row,12,'STK VALUE',TRUE,FALSE,FALSE);


END;
Row+=1;

Savatage

Looks like you want those to be your column headings.

Is that the only code you have created so far?
How do you know the error is for that bit of code?

kmkaot

The error is focusing on the code I have given.

Warm Regards
KMK

Savatage

Is your EnterCell like this?


EnterCell(RowNo : Integer;ColumnNo : Integer;CellValue : Text[250];Bold : Boolean;Italic : Boolean;UnderLine : Boolean) : Text[250]
TempExcelBuffer.INIT;
TempExcelBuffer.VALIDATE("Row No.",RowNo);
TempExcelBuffer.VALIDATE("Column No.",ColumnNo);
TempExcelBuffer."Cell Value as Text" := CellValue;
TempExcelBuffer.Formula := '';
TempExcelBuffer.Bold := Bold;
TempExcelBuffer.Italic := Italic;
TempExcelBuffer.Underline := UnderLine;
TempExcelBuffer.INSERT;

postsaurav

Hey KVM,

Excel Buffer have one new field from NAV 2013 Onward.

For Upgrading Reports with Export to Excel Refer to Below Post -

Export to Excel with Add Column -
http://saurav-nav.blogspot.in/2014/01/nav-2013-r2-export-to-excel-report.html

Export To Excel With Enter Cell Refer Below -
http://saurav-nav.blogspot.in/2014/01/nav-2013-r2-export-to-excel-report-with.html

Let me know if any issues.