FM get the project details

CALL FUNCTION 'BAPI_PS_INITIALIZATION'.

  CALL FUNCTION 'BAPI_BUS2001_GETDATA'
    EXPORTING
      I_PROJECT_DEFINITION = G_F_PROJECT_DEFINITION
    IMPORTING
      E_PROJECT_DEFINITION = G_R_PROJECT_DEFINITION
    TABLES
      ET_RETURN            = L_T_RETURN2.

  CLEAR G_F_ERROR.
  LOOP AT L_T_RETURN2 INTO G_R_RETURN."Error Type A E or X .
    IF G_R_RETURN-TYPE CA G_C_AEX.
      G_F_ERROR = G_C_X.
    ENDIF.
  ENDLOOP.