RE: Definition not found for internally defined procedure -- RPG400-L

× 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.

Don't procedure definitions need to be with the global variables?

-----Original Message-----
From: Rick.Chevalier@xxxxxxxxxxxxxxx
[mailto:Rick.Chevalier@xxxxxxxxxxxxxxx]
Sent: Thursday, July 22, 2004 11:26 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Definition not found for internally defined procedure


Barbara,

The copy member is at the beginning followed by the internal prototypes.

Here is the complete prototype definition section:
      *-------------------------------------------------------
      * Entry parameter definition                            
      *-------------------------------------------------------
     d LS4140R         pr                  ExtPgm('LS4140R')  

      *------------------------------------------------------
      * External procedure prototypes                        
      *------------------------------------------------------
                                                             
      // Create a user space                                 
      /Define CRTSPC                                         
                                                             
      // Retrieve message information                        
      /Define QMHRTVM                                        
                                                             
      // C quick sort function                               
      /Define QUICKSORT                                      
                                                             
      // Include defined prototypes                          
      /Include QSRCLS,LSMODPR                                
                                                             
      // Remove prototype definitions                        
      /Undefine CRTSPC                                       
      /Undefine QMHRTVM                                      
      /Undefine QUICKSORT                                    
                                                             
      // Print history transactions                          

<snip>

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.