怎么创建一个只读的职责?

tchen

除了下面的方法, 还有什么方法可以做到, 请教,谢谢

1. Identify the menu that is attached to the responsibility, for example GL super user.
2. Identify the form functions that are attached to this menu.
3. Now create a new form function exactly similar to the standard one but with the option
QUERY_ONLY="YES" in the location "Application"-->"function"-->"Form"-->"Parameter".
4. This makes the function read only.
5. Now create a new menu with these read-only functions and attach the menu to the new responsibility.

tchen

通过上面方法一旦设置了,进入职责之后很多FORM 知识提供查询. 不能做更新..
但是对于我们公司做AUDIT的人员来讲,他们说他们不相信这个只是查询, 如何向AUDIT 人证明这个职责不可以做更新: 各位有没有好的想法, 通过一些数据??

独孤彬

整1个让他们去折腾就是了。
如果能改，找Oracle去。

elisa

貌似并不是所有的功能都能通过with the option
QUERY_ONLY="YES" in the location "Application"-->"function"-->"Form"-->"Parameter".设置为只读吧？

tianpan

R12: How To create read only responsibility (Doc ID 1290228.1)

tianpan

怎么创建一个只读的职责?

Solution 1.创建QUERY_ONLY="YES"的Function，然后添加到只读职责中

Solution 2.创建只读的数据库用户

Solution 3.Custom.pll客户化，Sample Code：
BEGIN
  IF event_name = 'WHEN-NEW-FORM-INSTANCE' THEN
    IF FND_PROFILE.VALUE('USER_NAME')='<USER_NAME>' THEN
    BEGIN
      COPY('Entering app_form.query_only_mode.','global.frd_debug');
      COPY('YES', 'PARAMETER.QUERY_ONLY');
      APP_MENU2.SET_PROP('FILE.SAVE', ENABLED,PROPERTY_OFF);
      APP_MENU2.SET_PROP('FILE.ACCEPT', ENABLED,PROPERTY_OFF);
      formname := NAME_IN('system.current_form');
      blockname := GET_FORM_PROPERY(formname, FIRST_BLOCK);
      
      WHILE (blockname is not null) LOOP
      
      IF (GET_BLOCK_PROPERTY(blockname, BASE_TABLE) is not NULL) THEN
      
      SET_BLOCK_PROPERTY(blockname, INSERT_ALLOWED, PROPERTY_FALSE);
      SET_BLOCK_PROPERTY(blockname, UPDATE_ALLOWED, PROPERTY_FALSE);
      SET_BLOCK_PROPERTY(blockname, DELETE_ALLOWED, PROPERTY_FALSE);
      
      END IF;
      
      blockname := GET_BLOCK_PROPERTY(blockname, NEXTBLOCK);
   
    END LOOP;
  END query_only_mode;
END;

Metalink Note:1290228.1 - R12: How To create read only responsibility