abrir recepcion de mat o servicio

[caralbgro]

hola gente tengo este problema a ver si me pueden ayudar
tengo un listado de control donde en unos de los campos debo indicar el nro de doc del movimiento (entrada de mercaderia o servicio) no puedo abrir el doc coloco lo sig:

FORM USER_COMMAND USING L_UCOMM LIKE SY-UCOMM
L_SELFIELD TYPE SLIS_SELFIELD.

COMMIT WORK.

CASE L_UCOMM.
WHEN '&IC1'. " Doble click
CHECK NOT L_SELFIELD-value IS INITIAL.
READ TABLE t_salida INDEX L_SELFIELD-tabindex.
CASE L_SELFIELD-FIELDNAME.
WHEN 'LFBNR'.
* SET PARAMETER ID 'MBN' FIELD L_SELFIELD-value.
* CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
ENDCASE.
ENDCASE.
L_SELFIELD-refresh = 'X'.
ENDFORM.

que me está faltando???

gracias!!!

[DavidXD_XD]

Hola, ahi mencionas el nro del documento de movimiento, pues eso se ve en la MIGO y en el codigo que colocas hay una llamada a la ME23N, ahi visualizamos solicitudes y pedidos de Ordenes de Compra ... con cual de los 2 deseas trabajar?

[caralbgro]

gracias pero la verdad no se con cual me aconsejas?

me podes decir con cual lo prodria abrir

Hola, ahi mencionas el nro del documento de movimiento, pues eso se ve en la MIGO y en el codigo que colocas hay una llamada a la ME23N, ahi visualizamos solicitudes y pedidos de Ordenes de Compra ... con cual de los 2 deseas trabajar?

[DavidXD_XD]

Aver, si es un numero de documento de material se visualiza en la MIGO, para poder ver la MIGO dando doble click sobre el listado que tienes yo hago esto ...

[COLOR="Blue"]* Leo el registro de la tabla interna de mi listado[/COLOR]
    READ TABLE gcl_bapi->gt_log ASSIGNING <fs> INDEX e_row.
    IF sy-subrc = 0.
      IF <fs>-mblnr IS INITIAL.
[COLOR="Blue"]* Si el campo de numero de documento de material es vacio, mostrar mensaje[/COLOR]
        MESSAGE S000 WITH text-t15.
      ELSE.
        SET PARAMETER ID 'MBN' FIELD <fs>-mblnr.
        SET PARAMETER ID 'MJA' FIELD <fs>-mjahr.
        SET PARAMETER ID 'POS' FIELD '0001'.
[COLOR="Blue"]* Ojo, ahi mando el numero de documento de material <fs>-mblnr, el ejercicio
* <fs>-mjahr y la posicion, si la tienes la pones es el campo zeile, en mi caso
* como solo generaba una posicion colocaba como fijo el 001[/COLOR]
        CALL FUNCTION 'MIGO_DIALOG'
            EXPORTING
                i_action            = 'A04'
                i_refdoc            = 'R02'
                i_notree            = 'X'
                i_no_auth_check     = ' '
                i_deadend           = 'X'
                i_skip_first_screen = 'X'
                i_okcode            = 'OK_GO'
                i_mblnr             = <fs>-mblnr
                i_mjahr             = <fs>-mjahr
                i_zeile             = '0001'.
      ENDIF.
    ENDIF.

Nos comentas como te fue ^^

[caralbgro]

Grrcias Chango!!!!

Puse lo siguiente

SET PARAMETER ID 'MBN' FIELD t_salida-lfbnr.
SET PARAMETER ID 'MJA' FIELD t_salida-GJAHR.
.

CALL FUNCTION 'MIGO_DIALOG'
EXPORTING
i_action = 'A04'
i_refdoc = 'R02'
i_notree = 'X'
i_deadend = 'X'
i_skip_first_screen = 'X'
i_okcode = 'OK_GO'
i_mblnr = t_salida-lfbnr
i_mjahr = t_salida-GJAHR.

IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.


y PERFECTO LO ABRIO!!!!!!

Te debo una muñeco!!!!!

Aver, si es un numero de documento de material se visualiza en la MIGO, para poder ver la MIGO dando doble click sobre el listado que tienes yo hago esto ...

[COLOR="Blue"]* Leo el registro de la tabla interna de mi listado[/COLOR]
    READ TABLE gcl_bapi->gt_log ASSIGNING <fs> INDEX e_row.
    IF sy-subrc = 0.
      IF <fs>-mblnr IS INITIAL.
[COLOR="Blue"]* Si el campo de numero de documento de material es vacio, mostrar mensaje[/COLOR]
        MESSAGE S000 WITH text-t15.
      ELSE.
        SET PARAMETER ID 'MBN' FIELD <fs>-mblnr.
        SET PARAMETER ID 'MJA' FIELD <fs>-mjahr.
        SET PARAMETER ID 'POS' FIELD '0001'.
[COLOR="Blue"]* Ojo, ahi mando el numero de documento de material <fs>-mblnr, el ejercicio
* <fs>-mjahr y la posicion, si la tienes la pones es el campo zeile, en mi caso
* como solo generaba una posicion colocaba como fijo el 001[/COLOR]
        CALL FUNCTION 'MIGO_DIALOG'
            EXPORTING
                i_action            = 'A04'
                i_refdoc            = 'R02'
                i_notree            = 'X'
                i_no_auth_check     = ' '
                i_deadend           = 'X'
                i_skip_first_screen = 'X'
                i_okcode            = 'OK_GO'
                i_mblnr             = <fs>-mblnr
                i_mjahr             = <fs>-mjahr
                i_zeile             = '0001'.
      ENDIF.
    ENDIF.

Nos comentas como te fue ^^