rpg-free en RPG IV

formato de escritura libre en Lenguaje IBM RPG IV

información provisional

rpg-free ha estado disponible desde la version v5r1, en 2002.

el formato libre mejora la productividad, facilita la enseñanza a profesionales nuevos ya los provinientes de lenguajes como Cobol, Java, Javascript, Visual Basic, etc. La escritura es más sencilla, sin encolumnados, y con facilidades para la indentación de codigo

las funciones incorporadas %bif mejora muchísimo más la capacidad de escribir sentencias en menos líneas de código.

las lineas tienen más espacio para escribir, se pueden escribir sentencias mas largas y anidadas.

en el mismo programa pueden coexistir sentencias fijas y libres

se pueden poner comentarios detras de las sentencias, tal como en java o javascript.

los programadores que todavía usen RPG III pueden convertir esos programas a RPG IV (una funcion de IBM está incluida en el sistema) y comenzar a introducir sentencias en rpg-free

el codigo indentado, con sangría, es más fácil de escribir y entender:

       read n43mvk1;         
       dow not %EOF(n43mvk1);
         exsr srDetalle;     
         read n43mvk1;       
       enddo;                
				....
      BegSr srDetalle;		//detalle de cada movimiento              
        if NMVENT = 81;              
          if NMVCTA = 1200719;					       
             b = 1;                 	  
             endif;                      
          EndIf;
        EndIf;
      EndSr;                    			 

los nombres pueden escribirse en minusculas o mayusculas, de forma que puede escribirse cliCod en lugar de CLICOD, igual con subrutinas y operaciones.

las asignaciones y operaciones de calculos son mas sencillas, tal como
arPVP = (arPcos * 11) / 100;

como las lineas tienen mas anchura es mas facil teclear ciertas funciones como

          cmd = 'OVRDBF FILE(N43MVK1) TOFILE(CPICEFXXX/N43MVK1)'; 
          qCmdExC(cmd : %len(cmd));
          cwAddFldT('Fecha':%char(SysDate) + '  '+Time4e +' ui:'+UserId +
               ' cu:'+@CurUser +' pu:'+cwpUser);                              					                               

todas las operaciones de ficheros han sido mejoradas para soportar rpg-free

en los manuales de IBM (ver enlaces a RPG abajo), y en cada versión, vienen explicadas tanto el formato fijo como el formato free de las operaciones.


RPG   ::   rpg-free   ::   %bifs   ::   CPI Software   ::   Contacto