SAP ABAP - Custom Report AR Sales Revenue
REPORT zsdr003 . INCLUDE zsdr003_01 . INCLUDE zsdr003_02 . INCLUDE zsdr003_03 . INITIALIZATION . PERFORM get_parameter . START-OF-SELECTION . "Check Company Code Authorization AUTHORITY-CHECK OBJECT 'F_BKPF_BUK' ID 'BUKRS' FIELD p_bukrs ID 'ACTVT' FIELD '03' . IF sy - subrc = 0 . PERFORM get_data . ELSE . str_msg = |No Authorization for company code { p_bukrs }| . MESSAGE str_msg TYPE 'S' DISPLAY LIKE 'E' . ENDIF . END-OF-SELECTION . CLEAR i_layout . PERFORM f_layout_init USING i_layout . PERFORM f_eventtab_build USING i_events[] . i_variant - report = sy - repid . PERFORM f_print_control . PERFORM f_build_header_list . PERFORM f_build_fieldcat . PERFORM f_print_alv . Include ZSDR003_01. *&---------------------------------------------------------------------* *& Include ZSDR003_01 *&-----------------------