¿ 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
Convertir mayusculas-minusculas

Categoría :Programación
Autor : Yamile Caicedo
Título : Convertir mayusculas-minusculas

Descripción del truco:
He visto codigos muy largos para esto, les envio uno mas sencillo en RPG/ILE

* AUTHOR : YAMILE CAICEDO | * FECHA : 2006 / 07/ 07 | * DESCRIPCION : Utilitario convierte mayusculas a minusculas | *---------------------------------------------------------------| * *------------------------------------------------Formato de Fecha H DATEDIT(*YMD) H*--------------------------------------------------------------------- DUP C CONST(\'ABCDEFGHIJKLMNOPQRSTUVWXYZ\') DLO C CONST(\'abcdefghijklmnopqrstuvwxyz\') D*--------------------------------------------------------------------- C *ENTRY PLIST C PARM PPARM1 60 C PARM PPARM2 60 C PARM PTICON 1 C*--------------------------------------------------------------------- C* PROGRAMA PRINCIPAL C*--------------------------------------------------------------------- C* IF (1) C IF (PTICON = \'1\') C EXSR CONMAY C* ELSE (1) C ELSE C EXSR CONMIN C* ENDIF (1) C ENDIF C EVAL *INLR = *ON C*--------------------------------------------------------------------- C* CONMAY: Convierta a mayusculas C*--------------------------------------------------------------------- C CONMAY BEGSR C LO:UP XLATE PPARM1 PPARM2 C ENDSR C*--------------------------------------------------------------------- C* CONMIN: Convierta a minusculas C*--------------------------------------------------------------------- C CONMIN BEGSR C UP:LO XLATE PPARM1 PPARM2 C ENDSR

Código en formato texto
Fecha Julio 2006

Tienes algún truco que quieras compartir con todos los profesionales de Recursos iSeries AS400?.Envianoslo y si resulta seleccionado te enviaremos un vale de Amazon por valor de 50$

Comentarios de usuarios

Nombre:
Mail:
Comentario:
 

Subir a la parte superior de la web

Dossiers técnicos iSeries y AS400
- Dossier de seguridad
- Alta disponibilidad.
¿Buscas trabajo ?
Inscríbete en nuestra lista laboral y recibirás las ofertas de trabajo en tu buzón de correo electrónico.
Nuestros links preferidos
- Tendencias tecnologías de la información
Expertos en materías relacionadas con las 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. Software gratuito para el iSeries AS400
- Utilidades para el iSeries AS400 realizadas por profesionales
- Documentos. Trucos e ideas para resolver tus problemas
- Manuales. 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