-----Mensaje original-----
De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] En nombre de Matt Biondi Milner
Enviado el: lunes, 07 de agosto de 2006 10:38
Para: [email protected]
Asunto: Subfichero dentro de una ventana.
Hola,
Estoy intentando mostrar un subfichero dentro de una ventana. Para
mostrar el pie del subfichero dentro de la ventana, he declarado la
siguiente DDS:
A R SW SFL
A WOPT 1A B 3 2VALUES(' ' 'X')
A WYEAR 4S 0O 3 5
A WVN 9S 2O 3 12
A R SC SFLCTL(SW)
A N88 ROLLUP
A N42 SFLDSP
A N41 SFLDSPCTL
A 41 SFLCLR
A 90 SFLEND(*SCRBAR *MORE)
A SFLSIZ(0008)
A SFLPAG(0007)
A WINDOW(7 30 14 30 *NOMSGLIN
A WDWBORDER((*DSPATR RI) (*CH
A '))
A USRRSTDSP
A RRN2 4S 0H SFLRCDNBR
A 2 5'YEAR'
A COLOR(YLW)
A 2 12'VALUE'
A COLOR(YLW)
A R SCW
A WINDOW(SC)
A OVERLAY
A 13 2'F03:Exit'
A 1 10'X=Select'
A 1 2'Option:'
Y en el programa RPG , muestro el subfichero de la siguiente manera:
FScreen CF E WORKSTN
SFILE(SW:RRN2)
C WRITE SC
C EXFMT SCW
C READ SC
Me parece muy extraño este READ SC a continuación de EXFMT, ¿qué pretendes conseguir con ello? La instrucción EXFMT muestra y lee el contenido del registro especificado.
Anteriormente, esto me funcionaba, pero cambiando de version, a la 5.2,
no puedo mostrar el subfichero que previamente he cargado. Me da un
error de sesion cuando hago el READ, pero sin embargo el rango esta bien
cargado (RRN2) , aunque los datos no se muestran en pantalla.
¿Este programa te funcionaba tal cual en versiones anteriores?
Un saludo,
Javier Mora
Dpto. Informática
Dialsur S.A.U.
