× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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
**********************************************************************


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.