SBO程序控件,仅允许用户将帐单更新至/发送至地址

2020-08-20 13:06发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


嗨社区

我需要允许一些用户能够将帐单更新/添加到地址并运送到地址。 他们也不能添加新的BP。

据我了解,我需要将价值与历史进行比较。

这是我编写的用于阻止OCRD更新所有选项的代码,因此它应允许CRD1更新。

如果(@object_type ='2')和(@transaction_type IN('A','U'))

BEGIN如果存在

(选择T1.CardCode

来自OCRD T1

在t2.cardcode = t1.cardcode和t2.loginstanc =(从acrd中选择max(logInstanc)并在其中cardcode = @ list_of_cols_val_tab_del的情况下选择acrd内连接)

其中T1.Cardcode = @ list_of_cols_val_tab_del和t1.usersign2 = '71'和

-----在这里,我禁止其他所有选项

(t1.cardname <> t2.cardname或t1.cardtype <> t2.cardtype或isull(t1.cardfname,1)<> isnull(t2.cardfname,0)或t1.groupcode <> t2.groupcode或 t1.currency <> isnull(t2.currency,0)或isull(t1.lictradnum,1)<> isnull(t2.lictradnum,0)或isull(t1.phone1,1)<> isnull(t2.phone1,0 )或isull(t1.phone2,1)<> isnull(t2.phone2,0)或isull(t1.cellular,1)<> isnull(t2.cellular,0)或isull(t1.fax,1)<> isnull(t2.fax,0)或isnull(t1.e_mail,1)<> isnull(t2.e_mail,0)或isull(t1.intrntsite,1)<> isnull(t2.intrntsite,0)或isull(t1 .shiptype,1)<> isnull(t2.shiptype,0)或isull(t1.password,1)<> isnull(t2.password,0)或isull(t1.projectcod,1)<> isnull(t2.projectcod ,0)或isull(t1.industryc,1)<> isnull(t2.industryc,0)或isull(t1.cmpprivate,1)<> isnull(t2.cmpprivate,0)或isull(t1.addid,1) <> isnull(t2.addid,0)或isull(t1.notes,1)<> isnull(t2.notes,0)或isull(t1.validfrom,1)<> isnull(t2.validfrom,0)或isull (t1.validto,1)<> isnull(t2.validto,0)或isull(t1.deferrtax,1)<> isnull(t2.deferrtax,0)或isull(t1.vatstatus ,1)<> isnull(t2.vatstatus,0)或isull(t1.groupnum,1)<> isnull(t2.groupnum,0)或isull(t1.intrstrate,1)<> isnull(t2.intrstrate,0 )或isull(t1.listnum,1)<> isnull(t2.listnum,0)或isull(t1.discount,1)<> isnull(t2.discount,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isnull(t1.debtline,1)<> isnull(t2.debtline,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isull(t1 .dunterm,1)<> isnull(t2.dunterm,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isull(t1.housbnkcry,1)<> isnull(t2.housbnkcry ,0)或isull(t1.housebank,1)<> isnull(t2.housebank,0)或isull(t1.housbnkact,1)<> isnull(t2.housbnkact,0)或isull(t1.hsbnkiban,1) <> isnull(t2.hsbnkiban,0)或isull(t1.debpayacct,1)<> isnull(t2.debpayacct,0)))

开始SET @error = 30 SET @error_message ='不允许您进行此更改'结束

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


嗨社区

我需要允许一些用户能够将帐单更新/添加到地址并运送到地址。 他们也不能添加新的BP。

据我了解,我需要将价值与历史进行比较。

这是我编写的用于阻止OCRD更新所有选项的代码,因此它应允许CRD1更新。

如果(@object_type ='2')和(@transaction_type IN('A','U'))

BEGIN如果存在

(选择T1.CardCode

来自OCRD T1

在t2.cardcode = t1.cardcode和t2.loginstanc =(从acrd中选择max(logInstanc)并在其中cardcode = @ list_of_cols_val_tab_del的情况下选择acrd内连接)

其中T1.Cardcode = @ list_of_cols_val_tab_del和t1.usersign2 = '71'和

-----在这里,我禁止其他所有选项

(t1.cardname <> t2.cardname或t1.cardtype <> t2.cardtype或isull(t1.cardfname,1)<> isnull(t2.cardfname,0)或t1.groupcode <> t2.groupcode或 t1.currency <> isnull(t2.currency,0)或isull(t1.lictradnum,1)<> isnull(t2.lictradnum,0)或isull(t1.phone1,1)<> isnull(t2.phone1,0 )或isull(t1.phone2,1)<> isnull(t2.phone2,0)或isull(t1.cellular,1)<> isnull(t2.cellular,0)或isull(t1.fax,1)<> isnull(t2.fax,0)或isnull(t1.e_mail,1)<> isnull(t2.e_mail,0)或isull(t1.intrntsite,1)<> isnull(t2.intrntsite,0)或isull(t1 .shiptype,1)<> isnull(t2.shiptype,0)或isull(t1.password,1)<> isnull(t2.password,0)或isull(t1.projectcod,1)<> isnull(t2.projectcod ,0)或isull(t1.industryc,1)<> isnull(t2.industryc,0)或isull(t1.cmpprivate,1)<> isnull(t2.cmpprivate,0)或isull(t1.addid,1) <> isnull(t2.addid,0)或isull(t1.notes,1)<> isnull(t2.notes,0)或isull(t1.validfrom,1)<> isnull(t2.validfrom,0)或isull (t1.validto,1)<> isnull(t2.validto,0)或isull(t1.deferrtax,1)<> isnull(t2.deferrtax,0)或isull(t1.vatstatus ,1)<> isnull(t2.vatstatus,0)或isull(t1.groupnum,1)<> isnull(t2.groupnum,0)或isull(t1.intrstrate,1)<> isnull(t2.intrstrate,0 )或isull(t1.listnum,1)<> isnull(t2.listnum,0)或isull(t1.discount,1)<> isnull(t2.discount,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isnull(t1.debtline,1)<> isnull(t2.debtline,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isull(t1 .dunterm,1)<> isnull(t2.dunterm,0)或isull(t1.creditline,1)<> isnull(t2.creditline,0)或isull(t1.housbnkcry,1)<> isnull(t2.housbnkcry ,0)或isull(t1.housebank,1)<> isnull(t2.housebank,0)或isull(t1.housbnkact,1)<> isnull(t2.housbnkact,0)或isull(t1.hsbnkiban,1) <> isnull(t2.hsbnkiban,0)或isull(t1.debpayacct,1)<> isnull(t2.debpayacct,0)))

开始SET @error = 30 SET @error_message ='不允许您进行此更改'结束

付费偷看设置
发送
1条回答
haha101010
1楼 · 2020-08-20 14:06.采纳回答

嗨,

您是否尝试过使用标准授权添加和更新BP?

问候,

Nagarajan

一周热门 更多>