Call Transaction "MIGO" in display mode only

Question

Hi friends,
I have changed the standard the SAP standard program MB51 to a Customer Program 'ZMB51' based upon the user requirement.Iam able to get all the values (output)
Now my requirement is .... iam trying to call transaction "MIGO" when the user clicks on the Material Document Number (MBLNR) (as how in Standard program)
I ve used "ALV_GRID..." display. and given a callback_user_command also .... iam able to call the trasaction ...... but it is editable and not in the display mode ..........
Here my code :
FORM SY_UCOMM_FOR_MBLNR USING R_UCOMM LIKE SY-UCOMM RS_SELFIELD TYPE
SLIS_SELFIELD.
  IF RS_SELFIELD-FIELDNAME EQ 'MBLNR'.
  IF NOT RS_SELFIELD-VALUE IS INITIAL  AND
         RS_SELFIELD-VALUE NE SY-ULINE.
      CALL TRANSACTION 'MIGO'.
    ENDIF.
    IF R_UCOMM EQ SPACE.
    ENDIF.
  ENDIF.
ENDFORM.                    " SY_UCOMM_FOR_MBLNR
So ??????????????????
What is the remedy ????
Expecting ur answers....
Thanks in Advance
Cheers,
R.Kripa.

Answer 1

Hi ... it is solved ...
I ve changed the code as how it was in MB51 report.
Here is my code
FORM SY_UCOMM_FOR_MBLNR USING R_UCOMM LIKE SY-UCOMM RS_SELFIELD TYPE
SLIS_SELFIELD.
  CASE RS_SELFIELD-TABNAME.
    WHEN 'I_FINAL'.
      READ TABLE I_FINAL INDEX RS_SELFIELD-TABINDEX.
  ENDCASE.
  CHECK SY-SUBRC = 0 .
  IF R_UCOMM = '&IC1'.
    CHECK RS_SELFIELD-TABNAME = 'I_FINAL'.
    CASE RS_SELFIELD-FIELDNAME.
      WHEN 'MBLNR'.
        SET PARAMETER ID 'MBN' FIELD I_FINAL-MBLNR.
        SET PARAMETER ID 'POS' FIELD I_FINAL-ZEILE.
        SET PARAMETER ID 'MJA' FIELD I_FINAL-MJAHR.
    ENDCASE.
    IF SY-SUBRC = 0.
      SELECT SINGLE * FROM MKPF
                WHERE  MBLNR = I_FINAL-MBLNR
                  AND  MJAHR = I_FINAL-MJAHR.
      IF SY-SUBRC = 0.
MIGO_DIALOG is a funcion module to set the MIGO transaction
in Display mode.
        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             = I_FINAL-MBLNR
            I_MJAHR             = I_FINAL-MJAHR
            I_ZEILE             = I_FINAL-ZEILE.
      ENDIF.
    ENDIF.
  ENDIF.
But still if anyone knows how to call MIGo transaction i Display mode using 'CALL TRANSACTION 'MIGO''.
Thanks friends,
Cheers
R.Krpia.