1 files changed, 0 insertions, 123 deletions
diff --git a/qadevOOo/tests/basic/ifc/awt/XDateField/awt_XDateField.xba b/qadevOOo/tests/basic/ifc/awt/XDateField/awt_XDateField.xba
deleted file mode 100644
index c6b2d9589415..000000000000
--- a/qadevOOo/tests/basic/ifc/awt/XDateField/awt_XDateField.xba
+++ /dev/null
@@ -1,123 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
-<script:module xmlns:script="http://openoffice.org/2000/script" script:name="awt_XDateField" script:language="StarBasic">
-
-
-'*************************************************************************
-'
-' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
-' 
-' Copyright 2000, 2010 Oracle and/or its affiliates.
-'
-' OpenOffice.org - a multi-platform office productivity suite
-'
-' 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
-' <http://www.openoffice.org/license.html>
-' for a copy of the LGPLv3 License.
-'
-'*************************************************************************
-'*************************************************************************
-
-
-
-
-
-Sub RunTest()
-
-'*************************************************************************
-' INTERFACE: 
-' com.sun.star.awt.XDateField
-'*************************************************************************
-On Error Goto ErrHndl
-    Dim bOK As Boolean
-
-
-    Test.StartMethod("setDate()")
-    bOK = true
-    oObj.setDate(5087)
-    Test.StartMethod("getDate()")
-    bOK = bOK AND (oObj.getDate() = 5087)
-    Test.MethodTested("setDate()", bOK)
-    Test.MethodTested("getDate()", bOK)
-
-    Test.StartMethod("setMin()")
-    bOK = true
-    oObj.setMin(4978)
-    Test.StartMethod("getMin()")
-    bOK = bOK AND (oObj.getMin() = 4978)
-    Test.MethodTested("setMin()", bOK)
-    Test.MethodTested("getMin()", bOK)
-
-    Test.StartMethod("setMax()")
-    bOK = true
-    oObj.setMax(27856)
-    Test.StartMethod("getMax()")
-    bOK = bOK AND (oObj.getMax() = 27856)
-    Test.MethodTested("setMax()", bOK)
-    Test.MethodTested("getMax()", bOK)
-
-    Test.StartMethod("setFirst()")
-    bOK = true
-    oObj.setFirst(5118)
-    Test.StartMethod("getFirst()")
-    bOK = bOK AND (oObj.getfirst() = 5118)
-    Test.MethodTested("setFirst()", bOK)
-    Test.MethodTested("getFirst()", bOK)
-
-    Test.StartMethod("setLast()")
-    bOK = true
-    oObj.setLast(23450)
-    Test.StartMethod("getLast()")
-    bOK = bOK AND (oObj.getLast() = 23450)
-    Test.MethodTested("setLast()", bOK)
-    Test.MethodTested("getLast()", bOK)
-
-    Test.StartMethod("setLongFormat()")
-    bOK = true
-    oObj.setLongFormat(true)
-    Test.StartMethod("isLongFormat()")
-    bOK = bOK AND oObj.isLongFormat()
-    oObj.setLongFormat(false)
-    bOK = bOK AND NOT oObj.isLongFormat()
-    Test.MethodTested("setLongFormat()", bOK)
-    Test.MethodTested("isLongFormat()", bOK)
-
-    Test.StartMethod("isEmpty()")
-    bOK = true
-    oObj.setDate(6321)
-    bOK = bOK AND NOT oObj.isEmpty()
-    Test.StartMethod("setEmpty()")
-    oObj.setEmpty()
-    Test.MethodTested("setEmpty()", bOK)
-    Test.MethodTested("isEmpty()", bOK)
-
-    Test.StartMethod("setStrictFormat()")
-    bOK = true
-    oObj.setStrictFormat(true)
-    Test.StartMethod("isStrictFormat()")
-    bOK = bOK AND oObj.isStrictFormat()
-    oObj.setStrictFormat(false)
-    bOK = bOK AND NOT oObj.isStrictFormat()
-    Test.MethodTested("setStrictFormat()", bOK)
-    Test.MethodTested("isStrictFormat()", bOK)
-
-Exit Sub
-ErrHndl:
-    Test.Exception()
-    bOK = false
-    resume next
-End Sub
-</script:module>