KB Article 10469

Contact Tech Support

 Email Tech Support
 (250) 655-1766
 [7:30 - 5:00 PST]
Your Meeting ID will be Provided by a Rep.
Tech Support
Tech Support Home
Software Updates
Knowledge Base Search
Recent KB Articles
Product FAQs
Code Samples
Tech Blog
System Requirements
Installation Instructions
Support Testimonials
Contact us to...
Create a Ticket
Request a Free Demo
Suggest a New Feature
Submit Feedback
Upload a Large File
Other Services
Software Training
Professional Services

How can you send a message to a user?

Product: ProGen Plus Type: How to

Your SNDMSG action is not breaking correctly because the message spans multiple lines. The compiler generates error *RNF5377.

To work around this, you can build your command string in free-format RPG, then run it by calling the program QCMDEXC. Here is sample code:

D QCMD##          S            500A                     
D QCLN##          S             15P 5 INZ(500)          
     EVAL QCMD## = 'SNDMSG MSG('' msg '') TOUSR(MYUSER)';
C                   CALL      'QCMDEXC'                 
C                   PARM                    QCMD##      
C                   PARM                    QCLN##     

Use the USRSRC (US) action within the actions editor to add the above statements.
The free-format code must start and end with the compiler tags /free and /end-free. The /free tag must start in position 9 of the user source code.

Rate This Article

Did this example help you to achieve your goal?
 Yes  No  Don't Know

Enter additional comments below.   If you want to hear back from us, include your contact information.

Email Address:
Please enable JavaScript in order to rate this page.