¿ Quieres imprimir esta página ? Volver a la página principal de Recursos iSeries AS400 ¿ Necesitas ayuda ? En pruebas
System i5 iSeries AS400 Recursos. Compartiendo generamos conocimiento
Novedades en Recursos iSeries AS400
Noticias tecnológicas

Utilidades iSeries AS400.
Identador de programas nativos RPG

Les envio la utileria para identar programas RPG nativo.
Cuando se ejecuta el programa, no es necesario que el miembro a identar este compilado.

Antes que nada, necesitas crear los siguientes miembros en el AS/400.

  • CLPIND. Este programa recibe los datos desde el PDM (Dar opcion IN)
  • RPGIND. Una vez que el programa CLPIND checa el tipo RPG, ejecuta al programa RPGIND, el cual toma el miembro para identarlo.
  • CLPRTV. El programa RPGIND utiliza al programa CLPRTV, el cual obtiene los nombres de los archivos que se utilizan

Por ultimo hay que crear dentro del PDM la siguiente instruccion:
STRPDM opcion 3. Pulsar F16 para trabajar con las opciones definidas por el usuario.
Pulsar ahora, F6=Crear.
Opcion : IN
Mandato: CALL PGM(QGPL/CLPIND) PARM(&L &F &N &T)

Probar con cualquier programa RPG desde el PDM dando la opcion IN.

Ver programa CLPIND
Ver programa RPGIND
Ver programa CLPRTV


Enviada por Fidel Reyes
Agosto 2004

Comentarios de usuarios

Nombre:
Mail:
Comentario:
 

 

NUESTRA COMUNIDAD EN
ÚNETE Y.... ¡¡ PARTICIPA !!
Dossiers técnicos iSeries y AS400
- Seguridad
- Alta disponibilidad.
Nuestros links favoritos
- Tendencias tecnologías de la información
Expertos en tecnologías de la información, nos dan su punto de vista sobre las tendencias actuales y futuras
- Los últimos anuncios sobre hardware-software para iSeries AS400 realizados por IBM
- Freeware y shareware para el iSeries AS400
- Utilidades para el iSeries AS400 realizadas por profesionales
- Documentos. Trucos e ideas para resolver tus problemas
- Los manuales y links más interesantes del iSeries AS400

  Links patrocinados
  •  
  •  

[ Soy nuevo |   Profesionales |   AS qué |   Empresas |    Foros |   Recomiéndanos |    Productos ]
 
Recursos iSeries AS400. Es una web de: PUBLICACIONES HELP400, S.L. CIF:B-60-202827 Gran Vía de les Corts Catalanes, núm. 715, Entresuelo – 3ª - Barcelona - Tel.+34.932.310.049