如何设计和使用自定义的权限对象(自定义权限检查函数)

在sap扩展中用户往往都需要使用自己的权限对象，为了达到次目的，请按下列步骤建立和维护权限对象

1、Create an Anthorization Field（SU20）创建权限对象字段（存储在AUTHX表中）

2、Create an Authorization Object（SU21) 创建权限对象 
创建权限对象类别（存储在TOBCT表中）
点击对象类别创建权限对象（存储在TOBJ表中），生成SAP_ALL

3、Assign an Authorization Object to an Object Class(SU02或PFCG)

4、权限赋值关系图

                        user  master record
                        /  ............................../
            auth. profile              Composite auth. profile
              /................./                      /                  /
             /                   /                    /                    /
  Authorization                                            Auth. Profile
     /                                                               /................./          

5、Call "Authorith-Check" in Program  to Check Authorization.

这是我编写针对具体权限对象替代Authorith-Check的函数

form zcustcheckauth using  value(z_vkbur) like vbak-vkbur
                     z_return type i.
data: wa_ust12 like ust12.
data: bgetsubfile(1) type c.
data: begin of db_file occurs 10,
         profile like ust04-profile,
         typ     like usr10-typ,
      end of db_file.

data: begin of mid_db_file occurs 10,
         profile like