Programa en IPSF y REXX

Todo lo relacionado con TSO e ISPF.
Responder
Villa30
Usuario
Usuario
Mensajes: 10
Registrado: 04 Nov 2009, 08:32
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo

Programa en IPSF y REXX

Mensaje por Villa30 » 11 Nov 2009, 08:56

Hola,
Tengo el siguiente programa realizado en REXX:

ADDRESS ISPEXEC
"TBERASE TABLA1"
"LIBDEF ISPPLIB DATASET ID('MIARCHIVO.REXX.UTILS.PANELS')"
"TBCREATE TABLA1 NAMES(TSPDS)"
"TBADD TABLA1"
"TBTOP TABLA1"
"TBADD TABLA1"
"TBDISPL TABLA1 PANEL(TSREPORT)"
SAY TSPDS
"TBSCAN TABLA1 ARGLIST(TSPDS)"
SAY TSPDS
EXIT

Inserto 2 lineas a mi panel en REXX, pero cuando kiero ver la informacion q ingreso, siempre me muestra la primera linea que contiene un valor.
El problema mio es que cuando ingreso datos en las 2 lineas siempre me muestra lo que ingresa en la primera, hay alguna forma para solucionar esto?

Muchas Gracias.

mazinger

Re: Programa en IPSF y REXX

Mensaje por mazinger » 12 Nov 2009, 05:23

Hola,

con el tbscan te va a posicionar en la primera línea que cumpla el artgumento de búsqueda, si quieres que te muestre la siguiente línea debes realizar de nuevo la busqueda, por lo que en estos casos se suele usar una sentencia "do while" hasta que se termina la tabla.

Un saludo.

Responder