RE: Question on exporting to Excel from the iSeries

Interestingly enough we were working on something similar today and
found the "MS Excel XML Spreadsheet" in File Transfer From iSeries.

Creates an XML file format that can be directly imported to Excel that
looks like below. 

You could create the file transfer and save it, then run from the AS/400
side to create stream file and then send it. 

I am using V5R4 Client Access. Not sure if this available in earlier
Client Access releases but sure makes it easy. 

<?xml version="1.0"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:html="http://www.w3.org/TR/REC-html40";>
<DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">
<Author>IBM iSeries Access for Windows</Author>
</DocumentProperties>
<ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel">
</ExcelWorkbook>
<Worksheet ss:Name="Sheet1">
<Table>
 <Row>
  <Cell><Data ss:Type="String">CRNUMB</Data></Cell>
  <Cell><Data ss:Type="String">CRDATE</Data></Cell>
  <Cell><Data ss:Type="String">CRDUED</Data></Cell>
  <Cell><Data ss:Type="String">CRCMPD</Data></Cell>
  <Cell><Data ss:Type="String">CRITNO</Data></Cell>
  <Cell><Data ss:Type="String">CRITDS</Data></Cell>
  <Cell><Data ss:Type="String">CRPONO</Data></Cell>
  <Cell><Data ss:Type="String">CRSERH</Data></Cell>
  <Cell><Data ss:Type="String">CRDISC</Data></Cell>
  <Cell><Data ss:Type="String">CRRADP</Data></Cell>
  <Cell><Data ss:Type="String">CRDISD</Data></Cell>
  <Cell><Data ss:Type="String">CRCARC</Data></Cell>
  <Cell><Data ss:Type="String">CRVNDN</Data></Cell>
  <Cell><Data ss:Type="String">CRADDR</Data></Cell>
  <Cell><Data ss:Type="String">CRCTYS</Data></Cell>
  <Cell><Data ss:Type="String">CRINIT</Data></Cell>
  <Cell><Data ss:Type="String">CREFFE</Data></Cell>
  <Cell><Data ss:Type="String">CRIRRN</Data></Cell>
  <Cell><Data ss:Type="String">CRREMK</Data></Cell>
  <Cell><Data ss:Type="String">CRSIMI</Data></Cell>
  <Cell><Data ss:Type="String">CRPEND</Data></Cell>
  <Cell><Data ss:Type="String">CRVNUM</Data></Cell>
  <Cell><Data ss:Type="String">CRCRTDT</Data></Cell>
  <Cell><Data ss:Type="String">CRCRTUS</Data></Cell>
  <Cell><Data ss:Type="String">CRCHGDT</Data></Cell>
  <Cell><Data ss:Type="String">CRCHGUS</Data></Cell>
 </Row>
 <Row>
  <Cell><Data ss:Type="String">1</Data></Cell>
  <Cell><Data ss:Type="Number">1070225</Data></Cell>
  <Cell><Data ss:Type="Number">1070225</Data></Cell>
  <Cell><Data ss:Type="Number">1070225</Data></Cell>
  <Cell><Data ss:Type="String">123</Data></Cell>
  <Cell><Data ss:Type="String">X132</Data></Cell>
  <Cell><Data ss:Type="String">X133</Data></Cell>
  <Cell><Data ss:Type="String">X134</Data></Cell>
  <Cell><Data ss:Type="String">XXXX</Data></Cell>
  <Cell><Data ss:Type="String">Y</Data></Cell>
  <Cell><Data ss:Type="String">NOW IS THE TIME &quot;FOR ALL GOOD
MEN&quot; TO &quot;COME&quot; TO THE AID.
9679879874949879849/7967498749874987987498749874987489749874984984984984
9849849849849849849849848949849849849849+8497498465411984984984944984984
89498498488949848949849849841984964849849+849846464654SDFSDFASFASFASDFAS
FASFSFASFSDFASFASFSDFFASDFSDFASDFSDFSAFASFASFDASDFASFAFAASDFASDFDDSF</Da
ta></Cell>
  <Cell ss:Index="13"><Data ss:Type="String">DFALKSFDJ</Data></Cell>
  <Cell ss:Index="23"><Data ss:Type="Number">0</Data></Cell>
  <Cell ss:Index="25"><Data ss:Type="Number">0</Data></Cell>
  <Cell><Data ss:Type="String">QSECOFR</Data></Cell>
 </Row>
 <Row>
  <Cell><Data ss:Type="String">2</Data></Cell>
  <Cell><Data ss:Type="Number">0</Data></Cell>
  <Cell><Data ss:Type="Number">0</Data></Cell>
  <Cell><Data ss:Type="Number">0</Data></Cell>
  <Cell><Data ss:Type="String">JDSFJALKF</Data></Cell>
  <Cell><Data ss:Type="String">LSJADFLAJ</Data></Cell>
  <Cell><Data ss:Type="String">ALKJFLAJSD</Data></Cell>
  <Cell><Data ss:Type="String">LAKJFLADJ</Data></Cell>
  <Cell><Data ss:Type="String">LAJSF</Data></Cell>
  <Cell><Data ss:Type="String">Y</Data></Cell>
  <Cell><Data ss:Type="String">LASJFLAKSDFJ</Data></Cell>
  <Cell><Data ss:Type="String">JL;JSFLAKJF</Data></Cell>
  <Cell><Data ss:Type="String">ALSJDFLASFJ</Data></Cell>
  <Cell><Data ss:Type="String">ALSJFDALSDFJ7</Data></Cell>
  <Cell><Data ss:Type="String">ASLFJSADLSAFJ</Data></Cell>
  <Cell><Data ss:Type="String">ALJLFKJSDFLJ</Data></Cell>
  <Cell><Data ss:Type="String">LAAJDLFKJ</Data></Cell>
  <Cell><Data ss:Type="String">ALJLASJFDL</Data></Cell>
  <Cell><Data ss:Type="String">ALJFLASJFSAL</Data></Cell>
  <Cell><Data ss:Type="String">LAJFLSDFJ</Data></Cell>
  <Cell><Data ss:Type="String">N</Data></Cell>
  <Cell><Data ss:Type="String">134</Data></Cell>
  <Cell><Data ss:Type="Number">1070225</Data></Cell>
  <Cell><Data ss:Type="String">QSECOFR</Data></Cell>
  <Cell><Data ss:Type="Number">1070212</Data></Cell>
  <Cell><Data ss:Type="String">ALANC</Data></Cell>
 </Row>
</Table>
</Worksheet>
</Workbook>