SELECT DISTINCT "Tapes"."TNAME" AS "Tapes" FROM "Movies" "Movies", "Tapes" "Tapes" WHERE "Tapes"."TID" NOT IN ( SELECT DISTINCT "Movies"."TID" FROM "Movies" )ID" FROM "Movies" )
Table
TNAMEL'
TLENGTH
Primary key of the table
TNAMEL'
TLENGTH.Genres
ENGLISH.Movies
_Actors
s"."GNAME" = :Genre
Standard
Standard
"Genre
Table
Tape running time
Name of the tape
.Movies1c
ENGLISH.Movies_Actorsrx
ENGTH(
MDIRECTOR
ID of this relation's actor
andard
rs"."AID" AND "Actors"."ANAME" = :Actor
ROUP B
Space
Movies
ENGLISH.Movies
Tapes
SELECT "Tapes"."TNAME" AS "Tape", "Tapes"."TLENGTH" - SUM( "Movies"."MLENGTH" ) AS "Space" FROM "Movies" "Movies", "Tapes" "T
ID of this relation's movie
Primary key of the table
"CLENGTH"es
ENGLISH.CassettesZ
Short profile of actor
Actor's name
GNAME(
GTEXT
Primary key of the table
ISH.Genres
ENGLISH.Tapes
ENGLISH.Tapes
apes" WHERE "Tapes"."TID" = "Movies"."TID" GROUP BY "Tapes"."TNA
Table
Table
Short Description of the Genre
Genre Name
this A
Table
Movies
Actors
ENGLISH.Actors
Movies_Actors
ENGLISH.Movies_Actors
Movies
ENGLISH.
SELECT "Movies"."MNAME" AS "Movies" FROM "Actors" "Actors", "
Movies
ENGLISH.Movies
Genres
SELECT "Movies"."MNAME" AS "Movie" FROM "Movies" "Movies", "Genres" "Genres" WHERE "Movies"."GID" = "Genres"."GID" AND "Genre
Version=0x0004;Video Collection
TID#
MNAME
MYEAR
MTEXTo
MIMAGE
MLENGTH(
MDIRECTOR
Movies
ENGLISH.Movies
Actors
andard
Movie Tapes
Movies of a genre
The actor's movies
Table
) ) )
Movie
MNAME
Movies
ENGLISH.MoviesZ
s"."AID" AND "Actors"."ANAME" = 'Tom Cruise'
nres."
Table
ANAME
ATEXT
Primary key of the table
Table
ISH.Actors
ENGLISH.Actors
ENGLISH.Genres
LISH.GenresZ
MNAME
Movies
ENGLISH.MoviesZ
Table
Empty Tapes
Movies of One Genre
Movies with thisME", "Tapes"."TID", "Tapes"."TLENGTH"settes"."CID", "Cassettes".
"Movies"."TID" GROUP BY "Tapes"."TNAENGLISH.Actors
Movies_Actors
ENGLISH.Movies_Actors
ANAME
Actors
ENGLISH.Act
Table
Year in which the movie was made
Movies
ANAME
Actors
ENGLISH.ActorsZ
MNAME
Movies
ENGLISH.MoviesZ
ovies"Movies_Actors" "Movies_Actors", "Movies" "Movies" WHERE "Movies"."MID" = "Movies_Actors"."MID" AND "Movies_Actors"."AID" = "Acto
NGLISH.Tapes
Tapes.TLENGTH - Sum( Movies.MLENGTH )
Tapes
ENGLISH.TapesZ
TLENGTH
Tapes
ENGLISH.TapesZ
TNAME
Tapes
ENGLISH.TapesZ
Movie Graphic
Movie title
[HH]:MM:SS,00
ENGLISH.Tapes
ENGLISH.ActorsE
ENGLISH.Genres
ENGLISH.Moviesc
ENGLISH.Movies_Actors
ENGLISH.Tapes
ENGLISH.ActorsE
ENGLISH.Genres
ID of the movie genre
"Tapes" "Tapes" WHERE "Tapes"."TID" NOT IN ( SELECT DISTIN
ID of the tape this movie is recorded on
Table
SELECT "Movies"."MNAME" AS "Movie" FROM "Movies" "Movies", "A
Actor
Movies with Tom Cruise
Space on Recorded TapesA
Primary key of the table
ctors" "Actors", "Movies_Actors" "Movies_Actors" WHERE "Movies_A
TNAME
Tapes
ENGLISH.TapesZ
ttesZ
ctors"."MID" = "Movies"."MID" AND "Actors"."AID" = "Movies_ActorENGLISH.Genres
GNAME
Genres
Short description of movie
"Cassettes"."CNAME" AS "Cassette", "Cassettes"."CLENGT
Director of the movie
OUP BY "Cassettes"."CNAME", "Cassettes"."CID", "Cassettes".
Movie length
ENGLISH.Moviesc
ENGLISH.Movies_Actors
def/System
TT.MM.JJ
def/System
NNNNT. MMMM JJJJ
MMMM
System
T. MMM JJ
StarWriter 5.0
SfxDocumentInfo
Peter Thielmann %
Tom Verbeek
uK
Info 0
Info 1
Info 2
Info 3
Standard
LIBIMBEDDED
LIBIMBEDDED
SW5HDR
notenzeichen
Outline0
SBX sb
Standard
StarBASIC
SBX AR
SBX AR
SBX AR
SBX bm
Database
XOutdevItemPool
EditEngineItemPool
JoeMn
Heaven
Controls
FM01!
StarWriter 5.0
SfxDocumentInfo
Peter Thielmann V
Tom Verbeek
uK
Left aligned 1
Info 0
Info 1
Info 2
Info 3
Standard
LIBIMBEDDED
LIBIMBEDDED
SW5HDR
Footnote Symbol
Outline0
SBX sb
Standard
StarBASIC
SBX AR
SBX AR
SBX AR
2c%bqq
HelmetCondensed
NormalX
Times New Roman;Times
, 6')
Footnote Symbol
Footnote Symbol
Standard
Standard
Header
Heading
Header
Footer
Heading
Footer
group_0
Standard
group_0
group_1
Standard
group_1
group_2
Standard
group_2
group_3
Standard
group_3
Text body
Standard
Text body
Table Contents
Text body
Table Contents
Table Heading
Table Contents
Table Heading
content_1
group_1
content_1
content_2
group_2
content_2
content_3
group_3
content_3
content_0
group_0
content_0
Heading
Standard
Text body
List
Text body
Caption
Standard
Caption
Index
Standard
Index
Signature
Standard
Signature
Header left
Heading
Header left
Footer left
Heading
Footer left
Tom Verbeek
Peter Thielmann
Left aligned 1
StarWriter 5.0
SfxDocumentInfo
Peter Thielmann %
Tom Verbeek
uK
Info 0
Info 1
Info 2
Info 3
Standard
LIBIMBEDDED
LIBIMBEDDED
SW5HDR
notenzeichen
Outline0
SBX sb
Standard
StarBASIC
SBX AR
SBX AR
SBX AR
SBX bm
DatabaseD
XOutdevItemPool
EditEngineItemPool
JoeMn
Heaven
Controls
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
FM01!
Controlsg
stardiv.one.form.component.Form
stardiv.one.form.component.Edit
stardiv.one.form.control.Edit
TextBox 1
MNAME
'stardiv.one.form.component.ImageControl
%stardiv.one.form.control.ImageControl
ImageControl 4
MIMAGE
stardiv.one.form.component.Form
stardiv.one.form.component.Grid
Grid1
%com.sun.star.form.component.TextField
stardiv.one.form.control.Edit
Spalte1
ANAME
Actors
stardiv.one.form.control.Grid
Actors of the Film
Video Collection
Select "A"."ANAME" from Movies M, Actors A, Movies_Actors MA where "M"."MID" = "MA"."MID" and "MA"."AID" = "A"."AID" and "M"."MID" = :ActFilm
ActFilm
stardiv.one.form.component.Edit
stardiv.one.form.control.Edit
TextBox2
MYEAR
$stardiv.one.form.component.FixedText
Label4
stardiv.one.form.component.Edit
stardiv.one.form.control.Edit
TextBox3
MDIRECTOR
$stardiv.one.form.component.FixedText
Director
Label5
$stardiv.one.form.component.FixedText
Length in Min.
Label3
stardiv.one.form.component.Edit
stardiv.one.form.control.Edit
TextBox1
MLENGTH
"stardiv.one.form.component.ListBox
stardiv.one.form.control.ListBox
ListBox1
0Select "GNAME", "GID" from Genres order by GNAME
$stardiv.one.form.component.FixedText
Genre
Label1
"stardiv.one.form.component.ListBox
stardiv.one.form.control.ListBox
ListBox2
/Select "TNAME", "TID" from Tapes order by TNAME
$stardiv.one.form.component.FixedText
Label2
stardiv.one.form.component.Edit
stardiv.one.form.control.Edit
TextBox 3
MTEXT
$stardiv.one.form.component.FixedText
Short Description
Label6
Standard
Video Collection
Movies
XRowSetApproveListener
approveRowChange
StarBasic
Standard.Database.autoIncrement
StarBASICModule
SBX AR
SBX em
autoIncrement
evt @
SBX AR
SBX AR
DatabaseSC
REM ***** BASIC *****
Function autoIncrement(evt as Object) as Boolean
Dim oConn, oSource, oStmt, oCursor as Object
Dim MaxValue as Integer
If evt.Action <> 1 Then
autoIncrement = True
Exit Function
End If
oSource = evt.Source.Model
oConn = oSource.ActiveConnection
oStmt = oConn.createStatement()
oCursor = oStmt.executeQuery("select max(MID) from Movies")