|
Thanks for your help but it didn't work.
It add's the error RNF7535 The type and attributes of parameter 7 do not
match those of the prototype.
Thanks anyway
_____________________________________
H.P.J. Perquin
Ontwikkelaar AS/400
Boal Beheer B.V.
De Hondert Margen 12
2678 AC De Lier
Tel. +31 (0)174 527297, Fax +31 (0)174 527264
Panieklijn
Tel. +31 (0)612854010
"Barton, Mike" <Mike.Barton@xxxxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09-03-2005 16:36
Please respond to RPG programming on the AS400 / iSeries
To: "'RPG programming on the AS400 / iSeries'"
<rpg400-l@xxxxxxxxxxxx>
cc:
Subject: RE: Help I keep getting RNF5343
Hi
this is apparantly one of the commonest errors
when using API's and regularly crops up on this list :)
Where u have defined the fields as 4B 0, try defining them
as 10i 0.
HTH
Mike
-----Original Message-----
From: a.perquin@xxxxxxxxxxxxx [mailto:a.perquin@xxxxxxxxxxxxx]
Sent: 09 March 2005 15:12
To: rpg400-l@xxxxxxxxxxxx
Subject: Help I keep getting RNF5343
Hello can some one please tell me what i'm doing wrong? I keep getting
RNF5343 on my compiler listing.
*=========================================================================
* Array declaraties
*=========================================================================
DAAdres S 10A Dim(100)
DPSndMsg PR ExtPgm('QEzSndMg')
D PMessageType 10 Const I) *INFO of *INQ
D PDeliveryMode 10 Const I) *BREAK *NORMAL
D PMessageText 512 Const I) Message text
D PMessageLength 4B 0 Const I) Message length
D PToUsers 10 Const I) Profile *All *AllAct
D PNumberOfUsers 4B 0 Const I) Number of users
D PMessageSend 4B 0 O) 0=No 1=One or more
D PFuncReq 4B 0 O) -4=F3 -8=F12 0=no display
D PErrorCode 100 O) DApiError
*=========================================================================
* Variabelen declaratie
*=========================================================================
D AdresCounter S 3 0 Inz(0)
D PMessageText S 512A
D PMessageSend S 4B 0
D PFuncReq S 4B 0
###########################################
This message has been scanned by F-Secure Anti-Virus for Microsoft
Exchange.
For more information, connect to http://www.F-Secure.com/
**********************************************************************
This communication and the information it contains: - (a) Is intended for
the person(s) or organisation(s) named above and for no other person(s) or
organisation(s). Access to this mail by anyone else is unauthorised. (b)
Is confidential, and may be legally privileged or otherwise protected in
law. Unauthorised use, circulation, copying or disclosure of any part of
this communication may be unlawful. (c) May be susceptible to
interference, and should not be assumed that it has come in its original
form and/or from the stated sender or PinkRoccade UK accepts no
responsibility for information, errors or omissions in this e-mail or use
or misuse thereof or any act done or omitted to be done in connection with
this communication. If you are not the intended recipient, please inform
postmaster@xxxxxxxxxxxxxxxxx immediately and delete it and all copies from
your system.
www.pinkroccade.co.uk
**********************************************************************
--
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.