declare
  obj t_doc_fetch_properties := t_doc_fetch_properties(null,null,null,null,null,null,null,null,null);
  object_list t_string_list := t_string_list();
begin
  documents.register_user(5056,2);

  object_list.extend; 
  object_list(1) := 'USER';
  object_list.extend; 
  object_list(2) := 'SYSTEM_USER';
  object_list.extend; 
  object_list(3) := 'PAGEHANDLER';


  obj.object_list := object_list;
  obj.job_num := 1322474;

  obj.out_file_name := 'Portal.xml';
  pkg_xml_repl.DOC_FETCH_PROPERTIES(obj);
end;
