ADP Classic, formalmente conocido como ADP/400, es un Sistema de Desarrollo de Aplicaciones que incluye generadores de código RPG/400 (RPG III esencialmente) y de Cobol/400, el tipo de programación conocido como OPM.
Aunque ADP Classic genera código RPG/400 (sintaxis de RPG III), es posible ordenar a ADP que el código generado sea convertido a RPG IV, además cuando se hace ésto se permite también una gran funcionalidad como es tecleo directo de operaciones rpgfree dentro de los calculos ADP con SEU.
Tener en cuenta el tema del valor por defecto para la hoja H en programas rpgIV.
Aprovechando que se puede obtener código RPG IV (a través de la conversión de RPG III), es también posible integrar partes de código RPG IV en formato rpg-free.
Simplemente, editando con SEU los puntos de entrada y calculos, ahora podremos mezclar código tradicional ADP/RPG en formato RPG encolumnado RPG II y tambien rpgFree:
Ver
EXTFILE es una palabra clave (keyword) de RPG IV que permite evitar el uso de OVRDBF definiendo en la propia hoja F del fichero la biblioteca y nombre real (asi como el miembro con EXTMBR).
Para evitar el OPEN automático de RPG se debe definir el fichero con USROPN, que tambien puede indicarse en esta nueva extension para la keyword adicional de hoja F.
USROPEN (Opcion UC en File RPG III) se puede indicar en ADP Classic usando la op especial *EXF, que ahora ya puede usarse con este nuevo modo.
Para un control más completo existe tambien la key EXTDESC, que de forma similar permite indicar qué DDS se toman en tiempo de compilación. Por supuesto, tambien se puede indicar con esta extensión de ADP Classic.
El soporte de estas keywords dependen de la versión del operativo, parece que V5R4 y V6R1, probar en cada caso.
ADP Classic permite una extensión de linea(s) F adicionales con palabras clave, lo cual es una enorme capacidad.
En calculos internos (miembro xxx.@) se permite una nueva linea de control especial para indicar que se quiere insertar una hoja F especial (una extension), y además para más facilidad la linea puede ponerse en cualquier lugar, al principio, o al final generalmente.
Por ejemplo:
F*EXTK*CLIENTES EXTFILE(contenido)
El contenido puede ser
Tambien puede definirse qué miembro se puede usar, en lugar del *FIRST, con la keyword EXTMBR('NAME' o campo)
*las keywords admiten constantes o variables F*EXTK*CLIENTES EXTFILE('CLI3') EXTMBR(wMbr) USROPN F*EXTK*CLIENTES EXTFILE(wFile) EXTMBR(wMbr) USROPN ... y al inicio de calculos del pgm: C/free wFile = 'MIBIB/MIFILE; wMbr = 'MIMBR'; Open Clientes; .... Close Clientes; /end-free
Info adicional sobre EXTFILE, EXTDESC, etc
Se recomienda tener una dtaara con el contenido de la hoja H a usar en los programas creados con ADP Classic, ejemplos:
Si acaso buscar antes si hay algunas en el sistema:
CRTDTAARA (QGPL/RPGHSPEC) (*CHAR) (80) (' J /J')
Por defecto los programas se compilan en version *CURRENT (y/o la definida en el comando IBM o cambiada con CHGCMDDFT).
Pero se puede definir la version destino en general o por biblioteca, por ejemplo se está creando una aplicacion para un sistema con version mas antigua.
Se pueden tener perfiles que compilen en una version y otros en otras.
Paso 54 en ADP (o CALL cpi@pub/@RLS1) y puede definirse un valor por defecto general (*DFT) o por biblioteca.
Utilidades CPI@PUB Definir Control Release Compilaciones Biblioteca............ *DFT ------> o la bib que se quiera Release Destino....... V5R4M0 Biblioteca Objeto..... Biblioteca Base Datos.
Esta funcion es compatible tambien (si se tiene las Utilidades Power400) con las compilaciones desde pdm de UTP/Power como E (Editar+Compilar) C (Compilar) o PC (Compilar con Print) etc en PDM cuando se tiene cpi Power 400.
Los comandos de compilacion de IBM no traen por defecto los parametros para permitir debug con fuente.
Se recomienda para esto cambiar el valor por defecto de los comandos de compilacion (que obviamente son los que usa ADP al compilar).
Algunos comandos a cambiar (con CHGCMDDFT) serian, por ejemplo:
incluso:
Y un ejemplo de cambio de parametros por defecto para un comando:
Ver esta página: TrucosADP sobre Ayudas, pasos de Menu y uso de la Tecla de Atención que tienen mucha información en línea.
ADP Force1, una versión renovada de ADP Classic o ADP/400, es un Sistema de Desarrollo de Aplicaciones que incluye un generador de código RPG IV (también llamado RPG/ILE), así cómo soporte de las nomenclaturas nuevas cómo campos de 10 posiciones, etc.
Version beta, en desarrollo.
Pagina docum de ActionMenu.
Info en la Web: Action Bar & Pull Down Windows Menu
www.cpi.es