2007 Aug 02 2:29 AM
Hi,
the user requirement is when the list of sales orders is displayed using transaction VA05, if he selects a single record and presses an icon it should take him to the screen VA03.
There is no user exit for this.CAn anyone let me know how can we achieve this?
Thanks,
keerthi.
Hi,
the user requirement is when the list of sales orders is displayed using transaction VA05, if he selects a single record and presses an icon it should take him to the screen VA03.
There is no user exit for this.CAn anyone let me know how can we achieve this?
Thanks,
keerthi.
2007 Aug 02 2:51 AM
Hi Keerthi,
If you searched for all exits and BADi and nothing is there then you need to modify the standard code to achieve your functioanlity.
Regards,
Atish
2007 Aug 02 3:26 AM
You need to copy complete SAPMV75A Program to ZSAPMV75A
You need to modify below include
RVREUSE_FORMS -> Include Program
IF NOT PS_SD_ALV-GRID_DISPLAY IS INITIAL.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
MV75ANEU_USER_COMMAND -> include program
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
RS_SELFIELD TYPE SLIS_SELFIELD.
SY-UCOMM = R_UCOMM.
READ TABLE POSTAB INDEX RS_SELFIELD-TABINDEX.
IF SY-SUBRC = 0.
DUMMY = '1'.
ELSE.
CLEAR DUMMY.
ENDIF.
STATICS: GRUP_FLAG.
STATICS: SAVE_LAYOUT LIKE GS_SD_ALV-LAYOUT.
*
IMPORT LV_REPID FROM MEMORY ID LV_INDX_KEY.
IF NOT LV_TRVOG IS INITIAL.
VBCOM-TRVOG = LV_TRVOG.
ENDIF.
*
CASE R_UCOMM.
here you need to use user command to get interactive option to va03
WHEN 'GRUP'.
PERFORM ALV_FCODE_GRUP USING GRUP_FLAG
R_UCOMM
RS_SELFIELD.
EXIT.
WHEN '&OUP'.
GRUP_OK = 'X'.
PERFORM ALV_FCODE_OUP USING GRUP_FLAG
R_UCOMM
RS_SELFIELD.
CLEAR GRUP_OK.
EXIT.
WHEN 'ANZE'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_OKCODE_AEND USING SPACE.
WHEN 'AEND'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_OKCODE_AEND USING 'X'.
WHEN 'AKDK'.
PERFORM OKCODE_AKDK.
WHEN 'AUSW'.
PERFORM OKCODE_AUSW.
WHEN 'BACK'.
PERFORM OKCODE_BACK.
WHEN 'BELF'.
PERFORM OKCODE_BELF.
WHEN 'BELG'.
PERFORM OKCODE_BELG.
WHEN 'BELS'.
PERFORM OKCODE_BELS.
WHEN 'DARS'.
PERFORM DARSTELLUNG_ANZEIGEN.
WHEN 'DYWF'.
PERFORM OKCODE_DYWF.
WHEN 'DYWI'.
PERFORM OKCODE_DYWI.
WHEN 'F15'.
PERFORM OKCODE_EF15.
WHEN 'EF17'.
PERFORM OKCODE_EF17.
WHEN 'KUST'.
PERFORM OKCODE_KUST.
WHEN 'LIAK'.
PERFORM ALV_OKCODE_LIAK USING R_UCOMM
RS_SELFIELD.
WHEN 'LIZW'.
PERFORM OKCODE_LIZW.
WHEN 'MABE'.
Massenbearbeitung zur Erzeugung von Folgebelegen
PERFORM MASSENBEARBEITUNG_AUFRUFEN.
perform okcode_mabe.
WHEN 'MASS'.
PERFORM OKCODE_MASS.
WHEN 'MAST'.
PERFORM OKCODE_MAST.
Massenänderung: Neues Material
WHEN 'MMAT'.
PERFORM OKCODE_MMAT.
Massenänderung: Markierung in allen Sätzen zurücknehmen
WHEN 'MMDL'.
PERFORM OKCODE_MMDL.
Massenänderung: alle Sätze werden markiert
WHEN 'MMRK'.
PERFORM OKCODE_MMRK.
Massenänderung: Neue Preisfindung
WHEN 'MPRF'.
PERFORM OKCODE_MPRF.
WHEN 'MPRX'.
PERFORM OKCODE_MPRF.
Massenänderung: Neues Werk
WHEN 'MWAE'.
PERFORM OKCODE_MWAE.
WHEN 'MWRK'.
PERFORM OKCODE_MWRK.
WHEN 'ORGI'.
PERFORM OKCODE_ORGI.
WHEN 'PANS'.
PERFORM OKCODE_PANS.
WHEN 'SORT'.
PERFORM OKCODE_SORT.
WHEN 'SPAL'.
PERFORM OKCODE_SPAL.
WHEN 'SPLT'.
PERFORM OKCODE_SPLT.
WHEN 'STUF'.
PERFORM OKCODE_STUF.
WHEN 'SUCH'.
PERFORM OKCODE_SUCH.
WHEN 'SUMM'.
PERFORM OKCODE_SUMM.
WHEN 'SUTI'.
PERFORM OKCODE_SUTI.
WHEN 'SUVO'.
PERFORM OKCODE_SUVO.
WHEN 'SUZU'.
PERFORM OKCODE_SUZU.
WHEN 'UEBL'.
PERFORM OKCODE_UEBL.
WHEN 'UNIB'.
PERFORM OKCODE_UNIB.
WHEN 'UNIF'.
PERFORM OKCODE_UNIF.
WHEN 'UNIH'.
PERFORM OKCODE_UNIH.
WHEN '&IC1'.
PERFORM ALV_STANDARD_DETAIL USING RS_SELFIELD.
WHEN '&ERW'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_STANDARD_FCODES USING VBCOM-ZUART
VBCOM-NAME_DAZU
VBCOM-STAT_DAZU.
WHEN '&OLX'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_STANDARD_FCODES USING VBCOM-ZUART
VBCOM-NAME_DAZU
VBCOM-STAT_DAZU.
WHEN '&OL0'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_STANDARD_FCODES USING VBCOM-ZUART
VBCOM-NAME_DAZU
VBCOM-STAT_DAZU.
WHEN '&OAD'.
RS_SELFIELD-REFRESH = 'X'.
PERFORM ALV_STANDARD_FCODES USING VBCOM-ZUART
VBCOM-NAME_DAZU
VBCOM-STAT_DAZU.
WHEN 'SUMV'.
PERFORM ALV_OKCODE_SUMV USING VBCOM-ZUART
VBCOM-NAME_DAZU
VBCOM-STAT_DAZU.
WHEN OTHERS.
PERFORM USER_OKCODE.
ENDCASE.
------ Bildtitel setzen ----------------------------------------------
PERFORM BILDTITEL_SETZEN USING TRVOG ANZGR VBCOM-ZUART.
ENDFORM.
Thanks
Seshu
| User | Count |
|---|---|
| 4 | |
| 2 | |
| 2 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |