SQL> connect apps@ofac 
Verbonden. 
SQL> select * from v$version; 

BANNER 
-------------------------------------------------------------------------------- 
Oracle Database 11g Enterprise Edition Release 11.2.0.3.0 - 64bit Production 
PL/SQL Release 11.2.0.3.0 - Production 
CORE	11.2.0.3.0	Production 
TNS for 64-bit Windows: Version 11.2.0.3.0 - Production 
NLSRTL Version 11.2.0.3.0 - Production 

SQL> begin 
2 mo_global.init('PO'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> SELECT 1 
2 FROM po_line_locations PLL, 
3 po_distributions POD 
4 WHERE PLL.po_header_id = 1542538 
5 AND PLL.line_location_id = POD.line_location_id (+) 
6 FOR UPDATE NOWAIT; 

1 
---------- 
1 
1 
1 
1 
1 

SQL> connect system@ofac 
Verbonden. 
SQL> begin 
2 dbms_fga.add_policy(object_schema=>'PO',object_name=>'PO_DISTRIBUTIONS_ALL',policy_name=>'PO_DISTRIBUTIONS_ALL1',statement_types=>'SELECT,INSERT,UPDATE,DELETE'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> begin 
2 dbms_fga.add_policy(object_schema=>'PO',object_name=>'PO_DISTRIBUTIONS_ALL',policy_name=>'PO_DISTRIBUTIONS_ALL2',statement_types=>'INSERT,UPDATE,DELETE'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> connect apps@ofac 
Verbonden. 
SQL> begin 
2 mo_global.init('PO'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> SELECT 1 
2 FROM po_line_locations PLL, 
3 po_distributions POD 
4 WHERE PLL.po_header_id = 1542538 
5 AND PLL.line_location_id = POD.line_location_id (+) 
6 FOR UPDATE NOWAIT; 
po_distributions POD 
* 
FOUT in regel 3: 
.ORA-02014: Kan FOR UPDATE niet kiezen uit view met DISTINCT, GROUP BY, etc. 

SQL> connect system@ofac 
Verbonden. 
SQL> begin 
2 dbms_fga.drop_policy(object_schema=> 'PO',object_name=>'PO_DISTRIBUTIONS_ALL',policy_name=>'PO_DISTRIBUTIONS_ALL1'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> connect apps@ofac 
Verbonden. 
SQL> 
SQL> begin 
2 mo_global.init('PO'); 
3 end; 
4 / 

PL/SQL-procedure is geslaagd. 

SQL> 
SQL> SELECT 1 
2 FROM po_line_locations PLL, 
3 po_distributions POD 
4 WHERE PLL.po_header_id = 1542538 
5 AND PLL.line_location_id = POD.line_location_id (+) 
6 FOR UPDATE NOWAIT; 

1 
---------- 
1 
1 
1 
1 
1 

SQL> spool off;