ARCHIVOS DE IMPRESORAS AS400 – REPORTES EN AS400 - PARTE 7

ARCHIVOS DE IMPRESORAS AS400 – REPORTES EN AS400

PARTE 7

Ahora procederemos a insertar una nueva línea, para eso en la línea 0013.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen:

Una vez definida la letra pulsar la tecla de función F4,

Teniendo así:

Ahora en Operación pondremos ENDIF, teniendo así

Ahora presionar la tecla ENTER,

Al hacerlo tendrás así:

Ahora procederemos a insertar una nueva línea, para eso en la línea 0014.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen:

Una vez definida la letra pulsar la tecla de función F4,

Teniendo así:

Nota:

Toda lectura (READ, READP, READE) deben tener un indicador en el EQ (Igual), el número de indicador puede ser un número cualquiera comprendido entre 01 y 99.

Ahora en Operación pondremos READ, en el Factor 2 pondremos REGMA y en el INDICADOR EQ colocamos el número 40, teniendo así:

Ahora presionar la tecla ENTER,

Al hacerlo tendrás así:

Ahora procederemos a insertar una nueva línea, para eso en la línea 0015.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen:

Una vez definida la letra pulsar la tecla de función F4,

Teniendo así:

Ahora en N01 pondremos indicador 20, en Operación pondremos WRITE y en el Factor 2 pondremos TITULO, teniendo así:

Ahora presionar la tecla ENTER,

Al hacerlo tendrás así:

NOTA:

La otra forma de representar esta linea de código seria:

Ahora procederemos a insertar una nueva línea, para eso en la línea 0016.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen:

Una vez definida la letra pulsar la tecla de función F4,

Teniendo así:

Ahora en Operación pondremos ENDDO, teniendo así:

Ahora presionar la tecla ENTER,

Al hacerlo tendrás así:

Ahora procederemos a insertar una nueva línea, para eso en la línea 0017.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen:

Una vez definida la letra pulsar la tecla de función F4,

Teniendo así:

Ahora en Operación pondremos WRITE y en Factor 2 pondremos PIE, teniendo así:

Ahora presionar la tecla ENTER,

Al hacerlo tendrás así:

Ahora procederemos a insertar una nueva línea, para eso en la línea 0018.00 definimos la letra I (mandato para Insertar línea), teniendo así:

Una vez definido el mandato presionar la tecla ENTER,

Teniendo así:

Ahora vamos a definir la hoja C mediante la cual realizaremos la lógica de nuestro programa, definir la letra C, debe de estar así como en la imagen: