merge the formfield patch from ooo-build
[ooovba.git] / testautomation / graphics / optional / g_load_save.bas
blob67fa20dec4976d52fbf57af8c4d818bb836ef0ab
1 'encoding UTF-8 Do not remove or change this line!
2 '**************************************************************************
3 '* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 '*
5 '* Copyright 2008 by Sun Microsystems, Inc.
6 '*
7 '* OpenOffice.org - a multi-platform office productivity suite
8 '*
9 '* $RCSfile: g_load_save.bas,v $
11 '* $Revision: 1.1 $
13 '* last change: $Author: jsi $ $Date: 2008-06-16 10:42:37 $
15 '* This file is part of OpenOffice.org.
17 '* OpenOffice.org is free software: you can redistribute it and/or modify
18 '* it under the terms of the GNU Lesser General Public License version 3
19 '* only, as published by the Free Software Foundation.
21 '* OpenOffice.org is distributed in the hope that it will be useful,
22 '* but WITHOUT ANY WARRANTY; without even the implied warranty of
23 '* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 '* GNU Lesser General Public License version 3 for more details
25 '* (a copy is included in the LICENSE file that accompanied this code).
27 '* You should have received a copy of the GNU Lesser General Public License
28 '* version 3 along with OpenOffice.org. If not, see
29 '* <http://www.openoffice.org/license.html>
30 '* for a copy of the LGPLv3 License.
32 '/************************************************************************
34 '* Owner : wolfram.garten@sun.com
36 '* short description : Graphics Function: Load and Save
38 '\******************************************************************
40 public glLocale (15*20) as string
41 public q as integer
42 public ExtensionString as String
44 sub main
45 PrintLog "------------------------- g_load_save test -------------------------"
46 Call hStatusIn ( "Graphics","g_load_save.bas")
48 use "graphics\tools\id_tools.inc"
49 use "graphics\tools\id_tools_2.inc"
50 use "graphics\optional\includes\global\g_load_save.inc"
52 hSetLocaleStrings ( gTesttoolPath + "graphics\tools\locale_1.txt" , glLocale () )
54 PrintLog "-------------------------" + gApplication + "-------------------"
55 Call tFileOpenSaveEtc
56 Call tFileProperties
57 Call tFilePassword52
58 Call tFileOpenImport
59 Call tTestDXF255CharBug
60 Call tDeletedTemplate
61 call tSaveLoadLayoutEmpty
62 call tSaveLoadLayoutOLE
63 call tSaveLoadLayoutText
64 call tSaveLoadLayoutOutline
65 call tSaveLoadLayoutPicture
66 call tSaveLoadLayoutChart
67 call tSaveLoadLayoutSpreadsheet
69 gApplication = "IMPRESS"
70 PrintLog "-------------------------" + gApplication + "-------------------"
71 Call tFileOpenSaveEtc
72 Call tFileProperties
73 Call tFilePassword52
74 Call tFileOpenImport
75 Call tTestDXF255CharBug
76 Call tDeletedTemplate
77 call tSaveLoadLayoutEmpty
78 call tSaveLoadLayoutOLE
79 call tSaveLoadLayoutText
80 call tSaveLoadLayoutOutline
81 call tSaveLoadLayoutPicture
82 call tSaveLoadLayoutChart
83 call tSaveLoadLayoutSpreadsheet
85 Call hStatusOut
86 end sub
88 sub LoadIncludeFiles
89 use "global\system\includes\master.inc"
90 use "global\system\includes\gvariabl.inc"
91 Call GetUseFiles
92 gApplication = "DRAW"
93 end sub