'encoding UTF-8 Do not remove or change this line! '************************************************************************** '* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. '* '* Copyright 2008 by Sun Microsystems, Inc. '* '* OpenOffice.org - a multi-platform office productivity suite '* '* $RCSfile: w_updt.bas,v $ '* '* $Revision: 1.1 $ '* '* last change: $Author: fredrikh $ $Date: 2008-06-18 08:16:45 $ '* '* This file is part of OpenOffice.org. '* '* OpenOffice.org is free software: you can redistribute it and/or modify '* it under the terms of the GNU Lesser General Public License version 3 '* only, as published by the Free Software Foundation. '* '* OpenOffice.org is distributed in the hope that it will be useful, '* but WITHOUT ANY WARRANTY; without even the implied warranty of '* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the '* GNU Lesser General Public License version 3 for more details '* (a copy is included in the LICENSE file that accompanied this code). '* '* You should have received a copy of the GNU Lesser General Public License '* version 3 along with OpenOffice.org. If not, see '* '* for a copy of the LGPLv3 License. '* '/************************************************************************ '* '* owner : fredrik.haegg@sun.com '* '* short description : Ressource-Test Writer Document '* '\****************************************************************** sub main use "writer\tools\includes\w_tools.inc" ' global subroutines for Writer-application use "writer\tools\includes\w_tool1.inc" ' global subroutines for Writer-application use "writer\tools\includes\w_tool2.inc" ' global subroutines for Writer-application use "writer\required\includes\w_001_.inc" use "writer\required\includes\w_001a_.inc" use "writer\required\includes\w_002_.inc" use "writer\required\includes\w_003_.inc" use "writer\required\includes\w_004_.inc" use "writer\required\includes\w_005_.inc" use "writer\required\includes\w_005b_.inc" use "writer\required\includes\w_006_.inc" use "writer\required\includes\w_007_.inc" use "writer\required\includes\w_008_.inc" use "writer\required\includes\w_009_.inc" use "writer\required\includes\w_010_.inc" use "writer\required\includes\w_010_1.inc" use "writer\required\includes\w_011_.inc" use "writer\required\includes\w_020_.inc" Printlog "******* Ressource-Test Writer Document *******" Call hStatusIn ( "writer", "w_updt.bas","Writer Update-Test" ) Call w_001_ ' Menu File Call w_001a_ ' Menu File Call w_002_ ' Menu Edit Call w_003_ ' Menu View Call w_004_ ' Menu Insert Call w_005_ ' Menu Format Call w_005b_ ' Menu Format (2) Call w_006_ ' Menu Table Call w_007_ ' Menu Tools Call w_008_ ' Menu Window Call w_009_ ' Menu Help Call w_010_ ' Objectbar Call w_010_1 ' Objectbar. Part 2 Call w_011_ ' Rest of Objectbar Call w_020_ ' Toolbar Call hStatusOut end sub sub LoadIncludeFiles use "global\system\includes\master.inc" use "global\system\includes\gvariabl.inc" use "global\required\includes\g_001.inc" use "global\required\includes\g_option.inc" ' global subroutines for Tools / Options use "global\tools\includes\optional\t_xml_filter1.inc" ' global routines for XML-functionality gApplication = "WRITER" GetUseFiles () end sub