|
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>
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.