miércoles, 30 de marzo de 2011

Principiantes PL/I

Ahora que ya te habías hecho un experto en COBOL gracias al manual del Consultorio, resulta que a tu empresa se le ocurre cambiarte a un proyecto en PL/I.
¿¿¿Y ahora qué hago???

Que no cunda el pánico!! En el Consultorio Cobol estamos preparados para todo tipo de contratiempos. Con todos vosotros, el nuevo "manual de PL/I para principiantes"!

Manual de PL/I para principiantes

1. ¿Qué es PL/I?
  • Descripción del lenguaje de programación PL/I.
  • Diferencias principales con COBOL.

2. Esquema de un programa PL/I.
  • Esquema básico de un programa PL/I.
  • Declaración de variables en PL/I.

3. Proceso de un programa PL/I.
  • Informando variables: asignación de valores.
  • Inicializando variables: sentencia INIT.
  • Condiciones: IF/ELSE.
  • Bucles: DO WHILE, DO UNTIL, DO/TO.

4. Ficheros en PL/I.
  • Ficheros RECORD.
  • Ficheros STREAM.

5. Ejemplo 1: leer de SYSIN y escrbir en SYSPRINT (pl/i).
  • JCL que ejecuta un programa sin DB2.
  • Programa que realiza un GET de la SYSIN y un PUT de la información recibida para mostrarla por SYSPRINT.

Continuará...

2 comentarios:

Anónimo dijo...

Ante la falta de la tan buena IS NUMERIC, os dejo una función de PL/I que sirve evaluar si el valor que trae la variable se corresponde con lo esperado por su tipo.

VALID:
Esta función determina que el valor de la variable tiene un valor valido para el tipo de variable especificado.
Devuelve un valor bit, por lo que podemos evaluar directamente si TRUE o FALSE.
El formato de la función es:
VALID(variable)

Un ejemplo:

DECLARE INCOME PICTURE '$$$$$$V.$$';

DO I = 1 TO 2;
READ FILE(MASTER) INTO(INCOME);
IF VALID(INCOME) THEN;
PUT SKIP LIST('VALOR DE INCOME CORRECTO');

ELSE
PUT SKIP LIST('Invalid input:',INCOME);
END;

+INFO:http://www.kednos.com/pli/docs/reference_manual/6291pro_040.html

BUEN TRABAJO !!!!!

Tallian dijo...

Muchas gracias por la contribución!!