Pasar datos de un listado a otro

Colapsar
X
 
  • Tiempo
  • Mostrar
Limpiar Todo
nuevos mensajes
  • manu_lolo27
    Member
    • mar
    • 90

    #1

    Pasar datos de un listado a otro

    Buenas a todos, a ver si me echan una mano please,

    Tengo 2 programas Z que muestran un listado de Ordenes de Mantenimiento los 2, en el primero llamemosle ZPRIMER_PROGRAMA muestra un listado de Ordenes selecciono algunas Ordenes de este listado y voy al menu Entorno/Lista de etiquetas (Esto es Z y ya esta echo) lo q no es cuando pulsa esta opcion, el programa con la tabla interna de ordenes tiene que llamar al otro programa que tiene una pantalla de selección con un parametro Orden, las ordenes seleccionadas del programa ZPRIMER_PROGRAMA deberia pasarselas a este parametro y luego pulsar F8 (la pantalla de seleccion del segundo programa no se debe de mostrar) para que me muestre el segundo listado....

    Creo que no es dificil pero nunca lo hice :/

    Muchas gracias a todos
  • manu_lolo27
    Member
    • mar
    • 90

    #2
    Buenas de nuevo....

    Sabia que no era dificil

    Ya lo tengo, lo dejo por aqui, por si alguien algun dia tiene que hacerlo


    refresh r_aufnr_aux[].
    clear r_aufnr_aux.
    LOOP AT object_tab WHERE selected = 'X'.
    * Cargar las ordenes seleccionadas en el select-option del reporte
    r_aufnr_aux-sign = 'I'.
    r_aufnr_aux-option = 'EQ'.
    r_aufnr_aux-low = object_tab-aufnr. "object_tab-aufnr. XIN1033 S-2008-02910
    APPEND r_aufnr_aux.
    CLEAR r_aufnr_aux.
    endloop.

    IF NOT r_aufnr_aux[] IS INITIAL.
    SUBMIT ZILDR007 WITH so_AUFNR IN r_aufnr_aux AND RETURN.
    ELSE.
    * No se ha seleccionado ninguna orden válida.
    MESSAGE s000(ih) WITH text-e04.
    ENDIF.


    Saludos
    Manuel.

    Comentario

    Trabajando...