SAP FI模块增强

FI凭证修改FB02/XD01创建客户/XK01创建供应商等标准TCODE有自己 authority_bukrs检查，如果

需要使用自定义的权限检查。可以在标准权限检查处加 ENHANCEMENT

* 财务：客户公司代码级权限检查 
    PERFORM SUB_AUTH_CHECK_FB02 IN PROGRAM ZFI1002_E_FB02 IF FOUND USING a05-bukrs . 

*&---------------------------------------------------------------------*
*& Report ZFI1002_E_FB02
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZFI1002_E_FB02.
*&---------------------------------------------------------------------*
*&      Form  SUB_AUTH_CHECK_FB02
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_BUKRS  text
*----------------------------------------------------------------------*
FORM SUB_AUTH_CHECK_FB02  USING    P_BUKRS.
  CHECK SY-TCODE = 'FB02' OR SY-TCODE = 'FB03'.
  CHECK P_BUKRS IS NOT INITIAL.

  IF CL_WCF_SWITCH_CHECK=>IS_SWITCH_ACTIVE( 'ZVK_AUTH_FI' ) EQ 'X' .   "财务开关是否打开

    CALL METHOD ZCL_ORG_COMMON=>LOAD
      EXPORTING
        IV_UNAME = SY-UNAME.

    IF P_BUKRS NOT IN ZCL_ORG_COMMON=>GR_XMGS.
      MESSAGE E001(00) WITH '没有公司代码' P_BUKRS '的权限'.
    ENDIF.
  ENDIF.
ENDFORM.