VA03隐藏价格字段显示的问题

cyn303868

hi，你这个问题最后怎么解决了，我们现在也有这种需求呢

zhangyao_800

我们也有同样的需求，跪求。
另，所谓的取消FICO权限具体如何操作？

sapbob

我做过类似屏蔽VPRS在VA03的显示权限，通过权限对象检查实现的。

代码供参考：
1. 创建Include程序ZZAUTH01

AUTHORITY-CHECK OBJECT 'Z_KONH_KLS'
         ID 'ZKALSM' FIELD KOMK-KALSM
         ID 'ZSTUNR' FIELD KOMV-STUNR
         ID 'ACTVT' DUMMY.
IF SY-SUBRC NE 0.
*    MESSAGE E609(VH).
    IF KOMV-KSCHL = 'VPRS'.
       SCREEN-ACTIVE = 0.
       endif.
ENDIF.

2.插入
form userexit_field_modific_leer.
INCLUDE ZZAUTH01.
endform.                               " USEREXIT_FIELD_MODIFIC_LEER
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFIC_KZWI
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modific_kzwi.
INCLUDE ZZAUTH01.
endform.                               " USEREXIT_FIELD_MODIFIC_KZWI
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFIC_KOPF
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modific_kopf.
INCLUDE ZZAUTH01.
endform.                               " USEREXIT_FIELD_MODIFIC_KOPF
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_FIELD_MODIFICATION
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_field_modification.
INCLUDE ZZAUTH01.
endform.                               " USEREXIT_FIELD_MODIFICATION
*&---------------------------------------------------------------------*
*&      Form  USEREXIT_PRICING_CHECK
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
form userexit_pricing_check.
INCLUDE ZZAUTH01.
endform.                               " USEREXIT_PRICING_CHECK

rijkard

sapbob 发表于 2011-1-10 15:13
我做过类似屏蔽VPRS在VA03的显示权限，通过权限对象检查实现的。

代码供参考：

请问此代码对哪些T-Code起作用？

我在一个已经有类似代码的系统里debug时发现只有VA02能到达断点，VA01/VA03/VF01/VF02/VF03都不能到达断点，但我们的需求是对所有这些TCode都要隐藏VPRS....

补：挺奇怪的，我自己双击设的断点，是有时候能到有时候不能到。不过通过写了个break-point在代码里来看，至少VA02/03，VF02/03是都起作用的，VA01/VF01没试。