rpgfree

rpg-free en RPG IV
formato de escritura libre en Lenguaje IBM RPG IV
información provisional

rpgfree 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 mejoran 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 visual basic, javascript y otros:

• alfa = %char(numero); //convierte numero a cadena quitando ceros a izqda

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 Fichero;         
    dow not %EOF(Fichero);
      ExSr srDetalle;     
      Read Fichero;       
    enddo;                
    
    BegSr srDetalle;		//detalle de cada movimiento
      if Campo1 = 81;              
        if Campo2 = 1200719;					       
           b = 1;
           temp = %trim(cliDir) + ', ' + %char(cliDP) + ' ' + %trim(cliPob)
           endif;                      
        Else;
           ......
        EndIf;
      EndIf;
    EndSr;
    

• para sumar/restar a un campo no hace falta repetirlo: contador += 1;

• Cambios recientes Articulo de IBM Ene2014 sobre soporte de lineas H, F, D y P con rpgfree.
  • Nota: The additional free-form RPG support provides free-form programming for H, F, D and P specs and is intended to make RPG programming easier for both existing RPG programmers and to those trying to learn RPG. The required software to enable the new support is 7.1 RPG Compiler PTF SI51094 and IBM® DB2® PTF Group SF99701 Level 26
• RPG, Lenguaje de Programacion para IBM i (as400)
• RPG %bif