在when_new_record_instance触发器中写上如下的语句就可以实现:
DECLARE tp_nm   VARCHAR2(30);BEGIN
tp_nm := GET_CANVAS_PROPERTY('画布名称', topmost_tab_page); 
  IF tp_nm='标签页一名称' THEN
    GO_ITEM('数据块1.字段名');
ELSIF tp_nm= '标签页二名称' THEN
  GO_ITEM('数据块2.字段名'); 
END IF; EXCEPTION
when others then 
message('错误,请和系统管理员联系');
END;