RPGIV @ Work

A unique site for RPG and System i Lovers

Welcome!

Hi, this site will provide all what you need in System i and RPG developments.

My Name is Chamara Withanachchi, System i Expert and RPG Developer. And in the field for last 11 years.

I hope you will find lot of valuable information from this site

RPG Without *INLR Print E-mail
User Rating: / 0
PoorBest 
Written by Chamara Withanachchi   

The MAIN keyword indicates that this source program is for a linear-main module and contains a linear-main procedure, identified by the main_procedure_name parameter, which will be the program entry procedure for the module.


The main_procedure_name must be the name of a procedure defined in the source program. The linear-main procedure is intended to be called only through the program call interface and not as a bound procedure call; if you make a recursive call to the linear-main procedure, the call will be a dynamic program call.

     H MAIN(prcBLC)         

     D prcBLC          PR                  ExtPgm('THISPGM')    
                                                                
      /free                   
                              
          // prcBLC();        
                              
          // *InLR = *On;     
                              
      /end-free               

     P prcBLC          B                              
     D prcBLC          PI                             
                                                      
      /Free                                           
                                                      
          Your Business logic;

      /End-Free                   
                                  
     P prcBLC          E          


User Comments

Please login or register to add comments

<Previous   Next>