> -----Mensaje original----- > De: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] En nombre de Matt > Biondi Milner > Enviado el: sábado, 04 de noviembre de 2006 9:00 > Para: forum.help400@combios.es > Asunto: [SPAM] Problema al presentar mensajes en un subfichero. > > Hola, > > Tengo un pequeño problema con un subfichero y no se muy bien > como solucionarlo. Es la primera vez que utilizo mensajes > tipo SFLMSGID y no consigo mostrarlos en la linea 24 de mi > pantalla. He aqui el codigo que estoy utilizando. Tendria que > añadir el keep en el subfichero de control? En principio, el > indicador de mostrar subfichero lo tengo activado, asi que no > veo que ese sea el problema. > > Alguien me podria orientar? >
Si se quiere mostrar un error, esta línea > WRITE FOOTF3F5 no debería de mostrarse. > EXFMT CTL1 > . > . > CUSTOM CHAIN CLIENTES > IF *IN99 > EVAL *in32 = *ON > ENDIF > > .y vuelvo al principio y muestro el subfichero. > > He aqui las DDS > > A R CTL1 SFLCTL(S1) > A CF04(04 'Lista') > A CF08(08 'Ejecutar') > A ROLLUP(85 'Rollup') > A CSRLOC(LC CC) > A OVERLAY > A 81 SFLDSP > A 82 SFLDSPCTL > A 85 SFLEND > A SFLSIZ(0006) > A SFLPAG(0001) > A 32 SFLMSGID(A00001 *LIBL/ERROR1 3- > A 2) > A 41 SFLMSGID(A00030 *LIBL/ERROR1 4- > A 1) > A 42 SFLMSGID(A00030 *LIBL/ERROR1 4- > A 2) > A 43 SFLMSGID(A00030 *LIBL/ERROR1 4- > A 3) > A 11 SFLMSGID(A00030 *LIBL/ERROR1 1- > A 1) > A 12 SFLMSGID(A00030 *LIBL/ERROR1) > A 33 SFLMSGID(A00038 *LIBL/ERROR1) > A 35 SFLMSGID(A00038 *LIBL/ERROR1) > A 37 SFLMSGID(A00038 *LIBL/ERROR1) > A 23 SFLMSGID(A00038 *LIBL/ERROR1) > A 21 SFLMSGID(A00038 *LIBL/ERROR1) > A 16 SFLMSGID(A00039 *LIBL/ERROR1) > A 17 SFLMSGID(A00040 *LIBL/ERROR1) > A 53 SFLMSGID(A00065 *LIBL/ERROR1) > A RRN1 4S 0H SFLRCDNBR > A LC 3S 0H > A CC 3S 0H > A 1 2'GESTION' > A COLOR(BLU) > A ZZMIL 14A O 1 12DSPATR(RI) > A DSPATR(HI) > A*N60 DSPATR(ND) > A LIBVENSTK 20A O 1 32COLOR(WHT) > A DSPATR(UL) > A 1 73DATE > A EDTCDE(Y) > A COLOR(BLU) > A 2 2'GESTION' > A COLOR(BLU) > A 2 73TIME > A COLOR(BLU) > A LIBCLIEN 12A O 4 2COLOR(WHT) > A WCODCLI 6Y 0B 4 15EDTCDE(4) > A N81 DSPATR(UL) > A 30 > AO 51 > AO 40 DSPATR(RI) > A 30 > AO 40 > AO 51 > AO 50 DSPATR(PC) > A 81 DSPATR(PR) > A 30 ERRMSGID(A00002 *LIBL/ERROR1 3- > A 0) > A 40 ERRMSGID(A00024 *LIBL/ERROR1 4- > A 0) > A 50 ERRMSGID(A00006 *LIBL/ERROR1 5- > A 0) > A 51 ERRMSGID(A00007 *LIBL/ERROR1 5- > A 1) > A CODCOM 6Y 0B 4 22EDTCDE(4) > A N81 DSPATR(UL) > A 30 > AO 40 DSPATR(RI) > A 81 DSPATR(PR) > A WCLINOM 30A O 4 29 > A LIBQTESTK 10A O 4 60COLOR(WHT) > A QTESTOK 8Y 0O 4 71EDTCDE(2) > A WRSCLI 30A O 5 22 > A LIBQTEDEM 10A O 5 60COLOR(WHT) > A QTEDEM 8Y 0O 5 71EDTCDE(2) > A 59 DSPATR(RI) > A 59 ERRMSGID(A017 *LIBL/CASS) > A 59 COLOR(RED) > A 59 DSPATR(PC) > A WFACAD1 30A O 6 22 > A LIN8 55A O 8 1DSPATR(HI) > A CDTVA 1Y 0O 8 66DSPATR(UL) > A EDTCDE(4) > A 39 DSPATR(RI) > A 39 ERRMSGID(A00003 *LIBL/ERROR1 3- > A 9) > A XTAUX 4Y 2O 8 68EDTCDE(2) > A DSPATR(UL) > A LIBADRES 15A O 5 2COLOR(WHT) > A N81 DSPATR(ND) > A LIBRAISON 15A O 6 2COLOR(WHT) > A N81 DSPATR(ND) > A WFACVIL 20A O 7 22 > A LIBTVASTK 8A O 8 57COLOR(WHT) > > A R FOOTF3F5 > A OVERLAY > A LIBF3 12A O 23 4COLOR(WHT) > A LIBF5 15A O 23 25COLOR(WHT) > > > --------------------------------------------------------- > Juega y llévate una PS2 two: > http://juegos.ya.com/consolas_y_pc/2005/09/concurso-ps2.html > Ya.com ADSL 24h + Llamadas Nacionales y Locales 24h + > Llamadas a MÓVILES. > Desde 19,95 EUR/mes+IVA. http://acceso.ya.com/ADSLllamadas/1mbvoz/ > > __________________________________________________ > Forum.HELP400 es un servicio más de NEWS/400. > © Publicaciones Help400, S.L. - Todos los derechos reservados > http://www.help400.es > _____________________________________________________ > > Para darte de baja visita la siguente URL: > http://coyote.combios.es/mailman/listinfo/forum.help400 > > __________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400