VA01/VA02/VA03 销售订单根据定价和步骤校验权限隐藏价格

最新推荐文章于 2024-05-01 19:17:00 发布
最新推荐文章于 2024-05-01 19:17:00 发布
阅读量107 收藏 3
点赞数
文章标签： java 前端 javascript 服务器 linux
原文链接：https://mp.weixin.qq.com/s?__biz=MzU1MDAzMDY3MQ==&mid=2247495283&idx=1&sn=d005b095dcea59ab1523c1e0df16c20f&chksm=fa91e9ac79370322963399b63de6ae8ad40f2802c9d601bb12d2dae28c48d4ee777cb0994640&scene=126&sessionid=0
版权

之前发表了通过自定义权限对用户隐藏所有价格信息，本文档是通过定价和步骤校验权限隐藏部分价格

斌将军，公众号：斌将军VA01/VA02/VA03/VA05 销售订单根据权限隐藏价格

1、业务需求

针对用户使用销售订单时，根据定价和步骤顺序，判断是否有权限，没有权限时隐藏销售订单抬头和行项目的部分价格数据

要限制的定价和步骤在spro中的位置

e81c0ff75a7d8db201207d6e862cedb7.png

限制的步骤

ffb0756ea3d83deb23f423ca3bf55bf1.png

2、增强实现

2.1权限对象

创建带有定价和步骤的权限对象

a211daa26f610ce64dcff64adcccec9b.png

分配权限给需要的用户，也可用权限和代码反向控制

2.2、隐藏抬头和行项目价格

隐藏抬头和行项目表格中的净值和净价字段

89d7bbf44e196ef563ef8695fc856b32.png

在程序MV45AFZZ→USEREXIT_FIELD_MODIFICATION中写隐式增强

"--------------------@斌将军--------------------
FORM userexit_field_modification.


* CASE SCREEN-GROUP3.
*   WHEN '900'.
*     IF VBAK-VBTYP NE IF_SD_DOC_CATEGORY=>INQUIRY.
*       SCREEN-ACTIVE = 0.
*     ENDIF.
* ENDCASE.


* CASE SCREEN-NAME.
*   WHEN 'VBAK-VBELN'.
*     SCREEN-ACTIVE = 0.
* ENDCASE.


"
*$*$-Start: (1)-------------------------------------
ENHANCEMENT 1  ZSD007_VA01_PRICE.    "active version
CALL FUNCTION 'ZXX01_USER_EXITS'
  EXPORTING
    i_encode = 'SD007'
  EXCEPTIONS
    close    = 1
    OTHERS   = 2.
IF sy-subrc = 0.
  IF screen-name = 'KOMV-KBETR'
      OR screen-name = 'VBAK-NETWR'"抬头 净值
      OR screen-name = 'VBAK-WAERK'"抬头 货币
      OR screen-name = 'VBAP-NETPR'"项目 净价
      OR screen-name = 'VBAP-NETWR'."项目 净值


    AUTHORITY-CHECK OBJECT 'Z_KONH_KLS'
  ID 'ZKALSM' FIELD vbak-kalsm
  ID 'ZSTUNR' DUMMY
  ID 'ACTVT' DUMMY.
    IF sy-subrc <> 0.
      screen-active = 0.
      MODIFY SCREEN.
    ENDIF.
  ENDIF.
ENDIF.
ENDENHANCEMENT.
*$*$-End:   (1)---------------------------------------------------------------------------------$*$*
ENDFORM.
"--------------------@斌将军--------------------

效果如下

2960eed962fb7c4d84a3133958e6d62c.png

2.3、隐藏条件页签价格

还需要隐藏抬头和行项目的条件页签中的价格数据

ddb97a733091f2c5448fac899f2a23e3.png

在程序中定义变量

cadc53428f64cae69002ff51a0be3836.png

在出口处引用自定义代码

"--------------------@斌将军--------------------
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFIC_LEER
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modific_leer.
"
*$*$-Start: (1)--------------------------------------
ENHANCEMENT 1  ZSD007_SALES_PRICE.    "active version
 INCLUDE ZSD007_SALES_PRICE01.
ENDENHANCEMENT.
*$*$-End:   (1)-------------------------------------


endform.                               
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFIC_KZWI
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modific_kzwi.
"
*$*$-Start: (2)--------------------------------------
ENHANCEMENT 2  ZSD007_SALES_PRICE.    "active version
INCLUDE ZSD007_SALES_PRICE01.
ENDENHANCEMENT.
*$*$-End:   (2)--------------------------------------


endform.                               
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFIC_KOPF
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modific_kopf.
"
*$*$-Start: (3)-------------------------------------
ENHANCEMENT 3  ZSD007_SALES_PRICE.    "active version
INCLUDE ZSD007_SALES_PRICE01.
ENDENHANCEMENT.
*$*$-End:   (3)--------------------------------------


endform.                               
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFICATION
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modification.
"
*$*$-Start: (4)---------------------------------------
ENHANCEMENT 4  ZSD007_SALES_PRICE.    "active version
INCLUDE ZSD007_SALES_PRICE01.
ENDENHANCEMENT.
*$*$-End:   (4)---------------------------------------


endform.                              
"--------------------@斌将军--------------------

ZSD007_SALES_PRICE01

bf297cbdd2cff2473f71f0b185d28dae.png

 代码如下

"--------------------@斌将军--------------------
IF screen-name = 'FCODE'.
    CLEAR:old_komk.
    auth_subrc = 4.
  ENDIF.


  IF screen-name = 'RV61A-SELKZ'
      OR screen-name = 'KOMV-KAWRT'
      OR screen-name = 'RV61A-AWEIN'
      OR screen-name = 'KOMV-KBETR'
      OR screen-name = 'RV61A-KOEIN'
      OR screen-name = 'KOMV-KPEIN'
      OR screen-name = 'KOMV-KMEIN'
      OR screen-name = 'KOMV-KWERT'
      OR screen-name = 'KOMV-KUMZA'
      OR screen-name = 'RV61A-MEINS'
      OR screen-name = 'KOMV-KUMNE'
*      OR screen-name = 'KOMP-NETWR' "净值
*      OR screen-name = 'KOMK-WAERK' "货币
*      OR screen-name = 'KOMP-MWSBP' "税收
      OR screen-name = 'RV61A-KMEI1'.
"增强开关
    CALL FUNCTION 'ZXX01_USER_EXITS'
      EXPORTING
        i_encode = 'SD007'
      EXCEPTIONS
        close    = 1
        OTHERS   = 2.
    IF sy-subrc = 0.
      IF komk-kalsm NE old_komk-kalsm 
      OR komv-stunr NE old_komv-stunr.


        AUTHORITY-CHECK OBJECT 'Z_KONH_KLS'
         ID 'ZKALSM' FIELD komk-kalsm
         ID 'ZSTUNR' FIELD komv-stunr
         ID 'ACTVT' DUMMY.


        auth_subrc = sy-subrc.


        old_komk = komk.
        old_komv = komv.
      ENDIF.


      IF auth_subrc <> 0.
        screen-active = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
  ENDIF.
"--------------------@斌将军--------------------

效果如下

这种方法做完之后，在页签跳转之后，再回到条件页签，此处的价格就又会出现，所以需要再写下边的增强

330a1bb18a9149f121e013bb9bc70b31.png

在程序LV69AF01→TCTRL_KONDITIONEN_INIT中写隐式增强

"--------------------@斌将军--------------------
FORM tctrl_konditionen_init.
  DATA: da_tfill LIKE sy-tabix.


* Refresh table control if screen number has changed
  STATICS: last_dynnr TYPE dynnr.
  IF sy-dynnr NE last_dynnr AND gf_called_by_lord IS INITIAL.
    last_dynnr = sy-dynnr.
    REFRESH CONTROL 'tctrl_konditionen' FROM SCREEN sy-dynnr.
  ENDIF.


  DESCRIBE TABLE xkomv LINES da_tfill.


......




"""""""""""""""""""""""""""""""""""""""""""""""""""""""
*$*$-Start: (1)----------------------------------------
ENHANCEMENT 6  ZSD007_SALES_PRICE.    "active version
"增强开关
CALL FUNCTION 'ZXX01_USER_EXITS'
  EXPORTING
    i_encode = 'SD007'
  EXCEPTIONS
    close    = 1
    OTHERS   = 2.
IF sy-subrc = 0.
  LOOP AT SCREEN.
    IF screen-name = 'KOMP-NETWR' "净值
          OR screen-name = 'KOMK-WAERK' "货币
          OR screen-name = 'KOMP-MWSBP'. "税收.
      AUTHORITY-CHECK OBJECT 'Z_KONH_KLS'
       ID 'ZKALSM' FIELD komk-kalsm
       ID 'ZSTUNR' DUMMY
       ID 'ACTVT' DUMMY.
      IF sy-subrc <> 0.
        screen-active = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
  ENDLOOP.
ENDIF.
ENDENHANCEMENT.
ENDFORM.                    "tctrl_konditionen_init
"--------------------@斌将军--------------------

到此，通过定价和步骤隐藏部分价格的增强就实现了

SAP_森林木
关注
  • 0
    点赞
  • 踩
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
mysql 安装密码校验插件validate_password.docx
08-12
mysql 安装密码校验插件validate_password
VA01销售订单增强MV45AFZZ注意点
热门推荐
少年休闲海
07-06 1万+
销售订单的增强比较古老，大部分都是预留了Perform，一种简单查看增强的方法：SPRO--销售和分销--系统修正--用户出口，可见SAP在销售模块预留了很多增强。 CASE： 需求：VA01、VA02订单保存时，需要做一个check的增强 方法：我们确定增强在Include MV45AFZZ中 注意检查的增强用的是USEREXIT_SAVE_DOCUMENT_PREPARE，而不
VA01/VA02/VA03 销售订单根据定价和步骤校验权限隐藏价格（二）
BinGeneral的博客
12-25 943
之前发表过相关文章《》，本篇文章对上一篇文章做补充说明。第一篇文章是通过拥有权限，则隐藏价格的模式，即对需要隐藏价格的用户，配置权限对象，使其通过权限校验，然后隐藏价格；没有配置权限对象的用户，权限校验不通过，则不隐藏价格。此处存在两个问题：（如果项目忽略这两个问题，则还可以参照第一篇文章的方式实现）1.对于自定义权限对象，如果将其添加到SAP_ALL中，会导致拥有SAP_ALL权限的用户，也校验通过，并且看不到价格。（主要问题）
SAP ERP系统SD模块常用增强之一：VA01/VA02创建或修改SO的输入检查
weixin_40672823的博客
02-13 4551
本文通过一个例子详细介绍SD模块常用增强之一：销售订单保存前检查的增强。
VA01/VA02/VA03 销售订单根据定价和步骤校验权限隐藏价格（一）
BinGeneral的博客
10-19 497
针对用户使用销售订单时，根据定价和步骤顺序，判断是否有权限，没有权限时隐藏销售订单抬头和行项目的部分价格数据要限制的定价和步骤在spro中的位置限制的步骤。
User Exit
ConanHsueh的专栏
07-27 6094
User Exit,Customer Exit,Badi,SMOD,CMOD
hibernate-validator数据校验jar集合
11-14
包含hibernate-valdator等用于数据校验所需要的基本jar包。
hibernate的校验框架validate后端验证
08-04
后端验证所需的jar包，maven官网下载的，很实用，我自己验证过没有错误，如有问题，欢迎私信，一起讨论学习
springmvc校验器validation的所有配套jar包
08-03
springmvc校验器validation的所有配套jar包，有3个jar包
hibernate-validator-6.0.13.Final
12-20
hibernate validator 是JRS 303的一个参考实现,可以帮助我们完成数据的校验和格式化.Hibernate Validator 提供了 JSR 303 规范中所有内置 constraint 的实现，除此之外还有一些附加的 constraint
VA01/VA02/VA03/VA05 销售订单根据权限隐藏价格
BinGeneral的博客
09-11 306
针对用户使用销售订单时，判断是否有权限，没有权限时隐藏销售订单抬头和行项目的价格相关字段。
VA01销售订单行项目回车校验增强
only_oy的博客
04-03 418
目的：输入物料后回车默认带出对应工厂，或校验某些字段。2.根据字段找到对应的屏幕号和程序名。1.根据料号选择所对应的屏幕。3.调试找到对应赋值代码处。
sap 流程图 退货销售订单_销售订单_退货型
weixin_31939387的博客
01-14 3684
一．业务描述在销售流程完成后，如果货物有损坏或缺陷的情况发生，经投诉及协商后向客户退货，可用销售凭证的一种退货订单(Returns)类型进行处理。退货订单可参照销售订单或发票生成，后续需创建退货交货单，并需要出具退货贷记凭证。由于涉及交货，故退货订单需要生成计划行。退货(Returns)的凭证类型为G2，如果在中文界面未出现类型“G2”则请查看《维护销售凭证的语言键》。退货订单与贷项、借项订单流程...
查找va02的增强
qq_42427590的博客
07-02 205
查找va02的增强 1、在T-CODE中输入SPRO，后点击上方的SAP Reference IMG 2、选择销售与分销–系统修正–用户出口–销售中的 User Exit 3、点击销售中的User Exit里的任意一项最左边的图标（实施指南活动文档） 4、在SE38中输入MV45AFZZ找到自己需要编辑的地方 ...
【ABAP】VA01、VA02、VA03销售订单增强MV45AFZZ注意点
程卓的博客
01-14 1499
需求：VA01、VA02、VA03订单保存时，需要做一个check的增强 方法：注意检查的增强用的是USEREXIT_SAVE_DOCUMENT_PREPARE，而不是USEREXIT_SAVE_DOCUMENT（保存检查不通过会跳号） 注意使用隐式增强，不要直接修改源码（会引发其他不可预知的错误） ...
java方法重写（重点讲），方法重载
weixin_46281068的博客
04-27 1091
一、方法重载定义：一个类中，出现多个方法的名称相同，但是它们的形参列表是不同的，那么这些方法就称为方法重载了。注意：一个类中，只要一些方法的名称相同、形参列表不同，那么它们就是方法重载了，其它的都不管（如:修饰符，返回值类型是否一样都无所谓）。形参列表不同指的是:形参的个数、类型、顺序不同，不关心形参的名称。应用场景：开发中我们经常需要为处理一类业务，提供多种解决方案，此时用方法重载来设计是很专业的。
Day25-Java基础之常用类1
m0_46053885的博客
04-27 988
同时我们发现Math类中的方法都是静态的，因此在使用的时候我们可以直接通过类名去调用。对于计算机而言，其实是没有数据类型的概念的，都是0101010101，数据类型是编程语言自己规定的，所以在实际存储的时候，先把具体的数字变成二进制，每32个bit为一组，存储在数组中。比较内存地址值一般情况下是没有意义的，我们希望比较的是对象的属性，如果两个对象的属性相同，我们认为就是同一个对象；如果我们的数据是一个浮点类型的数据，有的时候计算机并不会将这个数据完全转换成一个二进制数据，而是将这个将其转换成一个无限的。
Spring Cloud——LoadBalancer
最新发布
????
05-01 821
这里只是简单的讲解了一下LoadBalancer如何使用，因为实际上我们使用的不是很多，主要还是使用OpenFeign。
d15(136-148)-勇敢开始Java，咖啡拯救人生
m0_73459387的博客
04-28 1000
对象哈希值的特点：同一个对象调用hashCode()返回的哈希值相同；HashMap的键依赖hashCode方法和equals方法保证键的唯一，存储自定义类型的对象时，重写这两个方法。实际上，Set系列集合的底层就是基于Map实现的，只是Set集合中的元素要键数据，不要值数据。当12个位置都占满时就会扩容，大约扩容为原来的二倍，再把原数组数据转移到新数组。使用迭代器遍历集合时，又同时在删除集合中的数据，程序就会出现并发修改异常的错误。基于哈希表实现，每个键值对额外多了一个双链表的机制，记录元素顺序（保证。
abap SO保存前做校验
05-13
3. 在 VA01、VA02、VA03 等事务代码的用户退出函数中，调用上述函数进行校验，若校验结果为错误，则阻止 SO 的保存。 以下是一个简单的示例代码： ``` TYPES: BEGIN OF ty_so_check_result, error TYPE i, ...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值