怎么定位到FORM上某一行，并控制此行是否可编辑？

zero310

现在有个summery的form，一出来就是一个表格，现在需要根据第一个字段的值来决定其是否可编辑。怎么才能定位到这一行然后再控制record的可编辑属性？

tianpan

Try below Sample Code:
-------------------------------

1. declare  
   
2.       number_of_records number;  
   
3.       where_am_i number;  
   
4. 
   
5.     begin  
   
6.       go_block('dept');  
   
7.         
   
8.       -- calculate last record number (to know the exit point)  
   
9.       last_record;  
   
10.       number_of_records := :system.cursor_record;  
    
11.         
    
12.       -- now duplicate checked records  
    
13.       first_record;  
    
14.       loop  
    
15.         exit when :system.cursor_record = number_of_records + 1;  
    
16.         
    
17.         if name_in('dept.first_item')= '03' then  
    
18.            SET_ITEM_INSTANCE_PROPERTY('<block_name>.<item_1_name>', CURRENT_RECORD, UPDATE_ALLOWED, PROPERTY_FALSE);
    
19.            SET_ITEM_INSTANCE_PROPERTY('<block_name>.<item_2_name>', CURRENT_RECORD, UPDATE_ALLOWED, PROPERTY_FALSE);
    
20.            ...
    
21.            SET_ITEM_INSTANCE_PROPERTY('<block_name>.<item_n_name>', CURRENT_RECORD, UPDATE_ALLOWED, PROPERTY_FALSE);
    
22.                
    
23.            -- go back and check another record  
    
24.            go_record (where_am_i + 1);  
    
25.         else  
    
26.            next_record;  
    
27.         end if;  
    
28.       end loop;  
    
29.     end;  

复制代码

zaorv

學習了，

zero310

tianpan 发表于 2012/12/25 18:57
Try below Sample Code:
-------------------------------

it works, thank you!

tianpan

zero310 发表于 2012/12/26 10:32
it works, thank you!

Gr8