CONSTANTS:
  lc_stack_loc(20)    TYPE c    VALUE '(SAPMV45A)TVAK-FPART'.
 
*Field Symbols.
FIELD-SYMBOLS:
  <fs_stackvalue>                TYPE ANY.
 
*If we have been able to read the required data
*from ABAP stack, proceed.
ASSIGN (lc_stack_loc) TO <fs_stackvalue>.
 
IF sy-subrc EQ 0
AND <fs_stackvalue> IS NOT INITIAL.
 
* Write the value read from ABAP stack.
  WRITE <fs_stackvalue>.
 
ENDIF.
 
 
Serkan AKKAVAK
Computer Engineer
serkurumsal@yandex.com