NAS OLE automation error

kryanker

Hello anyone,

I had customized a function in NAV5.0 to automate an scheduled reporting email which attached with the excel file generated by the report. I was using NAV standard Excel Buffer table and a customize SaveAs functions to Save the generated excel file. Which was as following function codes and calling:

Function at Excel Buffer table:
SaveExcelFile(FileName : Text[250])

IF FILE.EXISTS(FileName+'.xls') THEN
  IF ERASE(FileName+'.xls') THEN;
XlWrkSht.SaveAs(FileName+'.xls');
XlApp.Quit;

Calling at report
Report - OnPostReport()

IF PrinttoExcel THEN BEGIN
  TempExcelBuffer.CreateBook;
  TempExcelBuffer.CreateSheet('<SheetName>','','',USERID);
  TempExcelBuffer.SaveExcelFile(FileName);
END;

It was running fine if I manually trigger this function.
:? But, when I set it as NAS schedule job it always return me an error as below:

This message is for C/AL programmers:

An exception was raised in method SaveAs. The OLE control or Automation server has returned error (HRESULT) -2147352567.
The component did not provide the exception description.

even I had tried to re-register the office custom control and restart the NAS, the problem is still there.
:roll:
Any idea what's the problem I facing?

Thank you.

ara3n

make sure the NAS user has rights to write to the directory where you are saving. Just to test it give NAS user local admin rights.

kryanker

:? i had already using admin as the NAS user.

garak

It's running fine also if you run the function on the NAS machine :?: Or comes there the same error?
did u try to debug the NAS? Can u save in the directory, when u loged in in Windows with the NAS account and work with excel?

kryanker

It is running fine if I run the function manually on the NAS machine. The error I get is from the Job Queue Log Entries, it appear error on the Log status.

kine

Where is the NAS installed? Isn't it on Terminal server?

kryanker

The problem solved...

I use another Save function from workbook automation instead of worksheet SaveAs function, the NAS job was success. But just the excel file can not save as other format. :?

IF FILE.EXISTS(FileName+'.xlsx') THEN
  IF ERASE(FileName+'.xlsx') THEN;
XlWrkBk.SaveCopyAs(FileName+'.xlsx');
XlWrkBk.Close(FALSE);
XlApp.Quit;
CLEAR(XlApp);

kriki

[Topic moved from 'SQL General' forum to 'NAV/Navision' forum]