Is it possible to get the result of a remote sql query to output in excel/pdf format?

I've been trying the following program but it seems that it is ignoring the SQLOUT and PCHOLD and just displaying the result of the SELECT statement.

-*Remote FOCUS mainframe  
REMOTE DEST=MVS436

-MRNOEDIT BEGIN
-REMOTE BEGIN

SET SQLENGINE=DB2
SQL DB2
SELECT * FROM DSN.AMNAPPRV              
FETCH FIRST 5 ROWS ONLY;                                           
END
-RUN

TABLE FILE SQLOUT
PRINT *
ON TABLE PCHOLD
END
-RUN
-REMOTE END
-MRNOEDIT END

TABLE FILE HOLD
PRINT *
ON TABLE PCHOLD FORMAT EXL2K
END

This message has been edited. Last edited by: Mighty Max,

Try this:

REMOTE DEST=MVS436

-MRNOEDIT BEGIN
-REMOTE BEGIN

SET SQLENGINE=DB2
SQL
SELECT * FROM DSN.AMNAPPRV              
FETCH FIRST 5 ROWS ONLY;                                           

TABLEF
ON TABLE HOLD
END
-RUN
-REMOTE END
-MRNOEDIT END

TABLE FILE HOLD
PRINT *
ON TABLE PCHOLD FORMAT EXL2K
END

Dan,
I ran your code and got this error.

  
 HOLDING...
 NUMBER OF RECORDS IN TABLE=        5  LINES=      5
 (FOC205) THE DESCRIPTION CANNOT BE FOUND FOR FILE NAMED: HOLD
 BYPASSING TO END OF COMMAND

So it looked like the hold was working but webfocus could not find the master for the hold file.
Did some tinkering to the code and got it to work. Here is the code.

  
REMOTE DEST=MVS436

-MRNOEDIT BEGIN
-REMOTE BEGIN

SET SQLENGINE=DB2
SQL
SELECT * FROM DSN.AMNAPPRV              
FETCH FIRST 5 ROWS ONLY;                                           

TABLEF
ON TABLE HOLD
END
-RUN

TABLE FILE HOLD
PRINT *
ON TABLE PCHOLD
END
-RUN

-REMOTE END
-MRNOEDIT END

TABLE FILE HOLD
PRINT *
ON TABLE PCHOLD FORMAT EXL2K
END
-EXIT

Thanks for the help. I would have been completely lost without it.

I'm glad you got it working. You might also try changing the ON TABLE HOLD to ON TABLE PCHOLD (as in your initial post) to see if you can eliminate the second TABLE request.

REMOTE DEST=MVS436

-MRNOEDIT BEGIN
-REMOTE BEGIN

SET SQLENGINE=DB2
SQL
SELECT * FROM DSN.AMNAPPRV              
FETCH FIRST 5 ROWS ONLY;                                           

TABLEF
ON TABLE PCHOLD
END
-RUN

-REMOTE END
-MRNOEDIT END

TABLE FILE HOLD
PRINT *
ON TABLE PCHOLD FORMAT EXL2K
END