Efectivamente, este era el problema que quería transmitir y que quería
indagar posibles soluciones según vuestras experiencias.
No solo debo contemplar mis cambios, sino los de otros usuarios que están
adicionando o modificando registros y, además, no quiero perder el
posicionamiento en la página y registro que estoy modificando.
Por ello, estoy intentando probar los ejemplos que vais contemplando para
ver si responden a esta problemática.
----- Original Message -----
From: "Juan Ramón Garcia" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Tuesday, July 19, 2005 8:48 AM
Subject: Re: Programa subficheros
Hola Juan:
Pero.... si recargas el subfichero, entiendo que el cursor se quedará en
la
misma línea en la que estaba y puede no corresponder al registro real que
se ha modificado, me explico:
El problema de Juan Antonio es recargar el subfichero con los cambios que
el usuario haya podido hacer más los cambios que otros usuarios hayan
hecho, supongamos que estamos presentando en pantalla 18 registros y el
que
hemos seleccionado ocupa la 7ª línea, si al recargar el subfichero nos
posicionamos "tal cual" en esa línea y se han añadido o suprimido
registros, es muy posible que el registro que estábamos tratando ya no
ocupe el 7º lugar y el posicionamiento sea erróneo. Creo que la única
solución es el posicionamiento manual, comparando en la rutina de carga
del
SFL el dato que identifica a nuestro registro.
Un saludo.
Juanra
----- Original Message -----
From: Juan Gutierrez Ruiz
To: [email protected]
Sent: Monday, July 18, 2005 8:59 PM
Subject: Re: Programa subficheros
0037.00 A
SFLCSRRRN(&LINEA) <----------------------------------
0038.00 A N55 SFLDSP
0039.00 A N55 SFLDSPCTL
0040.00 A 55 SFLCLR
0041.00 A N55
SFLEND(*MORE)
0042.00 A 81
SFLMSGID(EMA0021 *LIBL/QUSERMSG 81)
0043.00 A 87
SFLMSGID(EMA8894 *LIBL/QUSERMSG 87 -
0046.00 A WPOSC 4S 0H SFLRCDNBR(CURSOR)
0047.00 A LINEA 5S 0H
<-----------------------------
CON ESTOS PARAMETROS TE MANTIENE EN EL REGISTRO QUE SELECCIONAS CUANDO LA
DAS LA OPCION 2 CAMBIO VA Y EJECUTA EL PROGRAMA DE CAMBIOS REGRESA AL
SUBFILE Y TE MANTEIENE EL CURSOR Y EL REGISTRO SLECCIONADO , SI TE
INTERESA
TE ENVIO UN PROGRAMA RPG Y LA DDS EN TEXTO PARA QUE LO VEAS, SALUDOS
----- Original Message -----
From: "Juan Ramón Garcia" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Monday, July 18, 2005 11:47 AM
Subject: Re: Programa subficheros
Hola Juan Antonio:
Yo lo que hago, independientemente de que cargue el sub-fichero pantalla
a
pantalla o todos los registros, es guardarme en memoria un dato que me
identifique el registro que estaba visualizando (por ejemplo el nº de
expediente, albarán, etc.), en la rutina de carga del subfichero si ese
campo no está vacio lo comparo con el campo correspondiente del registro
que estoy cargando y si coincide fuerzo ese nº de registro al campo que
especifico en SFLRCDNBR(CURSOR), si cuando salgo de la rutina de carga el
valor de ese campo es 0 le fuerzo 1 para evitar que de error.
Un saludo.
Juanra
----- Original Message -----
From: Juan Antonio
To: [email protected]
Sent: Monday, July 18, 2005 5:18 PM
Subject: Re: Programa subficheros
Mi consulta iba encaminada a que cuando se recarga el subfichero,
necesito,
además de presentar los registros modificados en mi proceso y en el de
otros usuarios que hubieran accedido, el dejar el cursor en el registro
que
había seleccionado y no perder este posicionamiento.
Gracias.
__________________________________________________
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
