AW: AW: problem with calling QUSLMBR

we are at V5R4 here with sec lvl 40 

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im 
Auftrag von Knezevic, Mihael
Gesendet: Montag, 12. März 2007 15:47
An: RPG programming on the AS400 / iSeries
Betreff: AW: AW: problem with calling QUSLMBR

i've let that part out. copyBookMember has the name of an existing source 
member. 

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces+mihael.knezevic=rossmann.de@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces+mihael.knezevic=rossmann.de@xxxxxxxxxxxx] Im Auftrag 
von Peter.Colpaert@xxxxxxxxx
Gesendet: Montag, 12. März 2007 15:38
An: RPG programming on the AS400 / iSeries
Betreff: Re: AW: problem with calling QUSLMBR

Mihael,

is it possible that copyBookMember still contains something from a 
previous call?

I noticed that you don't initalize the variable.

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we.  Futile is resistance, assimilated will you be.
-----



"Knezevic, Mihael" <Mihael.Knezevic@xxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
12/03/2007 15:34
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
AW: problem with calling QUSLMBR






<code>

     D listFileMembers...
     D                 PR                  extpgm('QUSLMBR')
     D  userspace                    20A   const
     D  format                        8A   const
     D  filename                     20A   const
     D  member                       10A   const
     D  ovrProcessing                 1A   const
     D  error                       265A   const options(*varsize : 
*nopass)

<snip>

     D copyBook        S             32A
     D copyBookLib     S             10A   inz('*LIBL')
     D copyBookFile    S             10A   inz('QCPYSRC')
     D copyBookMember  S             10A

<snip>

       listFileMembers(usName + usLib :
                       'MBRL0310' :
                       copyBookFile + copyBookLib :
                       copyBookMember :
                       '0' :
                       apiErrDs);
</code>