1Attribute VB_Name = "Preparation" 2'/************************************************************************* 3' * 4' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 5' 6' Copyright 2000, 2010 Oracle and/or its affiliates. 7' 8' OpenOffice.org - a multi-platform office productivity suite 9' 10' This file is part of OpenOffice.org. 11' 12' OpenOffice.org is free software: you can redistribute it and/or modify 13' it under the terms of the GNU Lesser General Public License version 3 14' only, as published by the Free Software Foundation. 15' 16' OpenOffice.org is distributed in the hope that it will be useful, 17' but WITHOUT ANY WARRANTY; without even the implied warranty of 18' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 19' GNU Lesser General Public License version 3 for more details 20' (a copy is included in the LICENSE file that accompanied this code). 21' 22' You should have received a copy of the GNU Lesser General Public License 23' version 3 along with OpenOffice.org. If not, see 24' <http://www.openoffice.org/license.html> 25' for a copy of the LGPLv3 License. 26' 27' ************************************************************************/ 28 29Option Explicit 30 31'Stub for Word Prepare H&F 32Function Prepare_HeaderFooter_GraphicFrames(docAnalysis As DocumentAnalysis, myIssue As IssueInfo, _ 33 var As Variant, currDoc As Workbook) As Boolean 34 Prepare_HeaderFooter_GraphicFrames = False 35End Function 36 37Function Prepare_WorkbookVersion() As Boolean 38 39 ' ************************************************************************** 40 ' Because the workbook version is changed when the workbook is being saved, 41 ' the actual preparation for this issue is done in the sub DoAnalyze of 42 ' the class module MigrationAnalyser when the prepared workbook is saved. 43 ' The reason for having this function is more for documentation/structural 44 ' purposes rather than actually needing the function. 45 ' ************************************************************************** 46 47 Prepare_WorkbookVersion = True 48 49End Function 50 51 52