Re: Exporting to Excel

You can write your own custom made programs in RPG+JavaPOI or buy commercial
products.

But for simple spool you can copy to xls in one step with some CLPs that use
SQL2POI or SQL2JXL like this one :

=====
dsplib qgpl *print

dltf spool
monmsg cpf0000 exec(rcvmsg msgtype(*last))

crtpf spool rcdlen(132)
cpysplf QPDSPLIB  spool splnbr(*last)

SQL2JXL ('select +
           substr(spool,  2, 10) as [Object\name], +
           substr(spool, 21, 8 ) as [Obj\type], +
           substr(spool, 30, 10) as [Attribute], +
           substr(spool, 44, 10) as [Owner], +
           decimal((substr(spool, 60, 7)), 7, 0) as [Size] +
          from spool +
          where substr(spool, 65, 1) >= "0"') +
        TOXLS('/home/costagliol/spool.xls') +
        SHEETNAME(SAVF) COLHDRS(*fldnam) +
        FREEZE(*YES) TRANBIN(*YES) JDEBUG(*YES)


----- Original Message ----- 
From: "Douglas W. Palme" <dpalme@xxxxxxxxxxx>
To: "RPG Group" <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, May 27, 2005 2:11 PM
Subject: Exporting to Excel


> Some of our users are wanting their reports exported to excel......I am
sure
> I am not the first to have this request, so I would like to hear how
others
> have accomplished this.
>
> Thanks....
>
> Douglas
>
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>