‎2007 Nov 19 7:03 AM
Hi,
How to check whether the block changed mannually or through code in VA02 transaction kindly help very very urgent
Thanks in Advance
‎2007 Nov 19 7:16 AM
‎2007 Nov 19 7:16 AM
‎2007 Nov 19 7:29 AM
Hi,
In VA02..check the following path..
ENVIRONMENT -> CHANGES
Press F8..you will see the changes done for the document..
Or You can change thorgh code as..
PARAMETERS: P_VBELN LIKE VBAK-VBELN.
DATA: T_CDHDR LIKE CDHDR OCCURS 0 WITH HEADER LINE.
DATA: T_CDPOS LIKE CDPOS OCCURS 0 WITH HEADER LINE.
CONVERT TO INTERNAL ..
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
INPUT = P_VBELN
IMPORTING
OUTPUT = P_VBELN.
SELECT * FROM CDHDR
INTO TABLE T_CDHDR
WHERE OBJECTCLAS = 'VERKBELEG'
AND OBJECTID = P_VBELN.
IF NOT T_CDHDR[] IS INITIAL.
SELECT * FROM CDPOS
INTO TABLE T_CDPOS
FOR ALL ENTRIES IN T_CDHDR
WHERE OBJECTCLAS = T_CDHDR-OBJECTCLAS
AND OBJECTID = T_CDHDR-OBJECTID
AND CHANGENR = T_CDHDR-CHANGENR
AND TABNAME = 'VBAK'
AND FNAME = 'FAKSK'
AND CHNGIND = 'U'
AND VALUE_NEW = SPACE.
IF SY-SUBRC = 0.
READ TABLE T_CDPOS INDEX 1.
IF SY-SUBRC = 0.
READ TABLE T_CDHDR WITH KEY CHANGENR = T_CDPOS-CHANGENR.
IF SY-SUBRC = 0.
WRITE: / 'USER NAME CHANGED BILBLOCK - ', T_CDHDR-USERNAME.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
Regards