PHP test script: MUSIC

Testing:
$db = mpe_dbopen("MUSIC.DATA","MGR",1)

Opened OK

Testing:
mpe_dbfind($db, "SELECTIONS", "ALBUMCODE", 2001)

Found

Testing:
mpe_dbget($db, "SELECTIONS", DBGET_MODE_CHAINED_READ) and
mpe_dbresult_assoc($db, "SELECTIONS");

ALBUMCODE	SELECTIONNAME	COMPOSERNAME	TIMING	PERFORMERS
2001	Der Saenger	Franz Schubert	21:12:00	Berlin Philharmonic
2001	Fruehlingslied	Franz Schubert	04:21:00	Berlin Philharmonic
2001	Fruehlingslaube	Franz Schubert	05:45:00	Berlin Philharmonic
2001	Vor Meiner Wiege	Franz Schubert	03:11:00	Berlin Philharmonic
2001	Drang in die Ferne	Franz Schubert	06:03:00	Berlin Philharmonic
2001	Der Musensohn	Franz Schubert	04:22:00	Berlin Philharmonic
2001	Viola	Franz Schubert	19:48:00	Berlin Philharmonic

Testing:
mpe_dbget($db, "Composers", DBGET_MODE_SERIAL_READ) and
mpe_dbresult_assoc($db, "Composers");

COMPOSERNAME	BIRTH	DEATH	BIRTHPLACE
Franz Liszt	1811	1886	Hungary
Franz Schubert	1797	1828	Austria
Amadeus Mozart	1756	1791	Austria
Claude Debussy	1862	1918	France
Edvard Grieg	1843	1907	Norway
Jean Sibelius	1865	1957	Finland
Ludwig Beethoven	1770	1827	Germany

Testing:
mpe_dbget($db, "albums", DBGET_MODE_CALCULATED_READ, 2003) and
mpe_dbresult_item($db, "albums", field names);

ALBUMCODE	ALBUMTITLE	MEDIUM	ALBUMCOST	RECORDINGCO	DATERECORDED	MFGCODE	COMMENT
2003	Celia Bartoli	cd	1599	London Records	1994	2894434522

Testing:
mpe_dbinfo_entry_count($db, "SELECTIONS")

Records = 13

Testing:
mpe_dbinfo_list_sets($db) and
mpe_dbinfo_list_items($db,setname)

Set	Item	Type
ALBUMS	ALBUMCODE	I2
	ALBUMTITLE	X40
	MEDIUM	X2
	ALBUMCOST	P8
	RECORDINGCO	X16
	DATERECORDED	X16
	MFGCODE	X40
	COMMENT	X80
COMPOSERS	COMPOSERNAME	X16
	BIRTH	X16
	DEATH	X16
	BIRTHPLACE	X40
	COMMENT	X80
SELECTIONS-A	SELECTIONNAME	X40
SELECTIONS	ALBUMCODE	I2
	SELECTIONNAME	X40
	COMPOSERNAME	X16
	TIMING	X16
	PERFORMERS	X40
	COMMENT	X80
LOG	ALBUMCODE	I2
	SELECTIONNAME	X40
	STARTTIME	X16
	ENDTIME	X16
	ANNOUNCER	X40
TESTSET	J1	J1
	J2	J2
	J4	J4
	E2	E2
	E4	E4
	I4	I4
	R2	R2
	R4	R4
	Z2	Z2
	Z4	Z4
	Z6	Z6
	Z12	Z12
	K2	4K2
	P20	P20
	P4	P4

Testing:
mpe_dbput($db,"COMPOSERS",array("COMPOSERNAME" => "John Lennon","BIRTH" => "1940","DEATH" => "1980"))

Success

Testing:
mpe_dbupdate($db,"COMPOSERS","John Lennon",array("BIRTHPLACE" => "Liverpool", "COMMENT" => "Beatle"))

Success

Testing:
mpe_dbget_serial($db, "Composers", "BirthPlace")

Records found = 8

ComposerName	BirthPlace
Franz Liszt	Hungary
Franz Schubert	Austria
Amadeus Mozart	Austria
John Lennon	Liverpool
Claude Debussy	France
Edvard Grieg	Norway
Jean Sibelius	Finland
Ludwig Beethoven	Germany

Testing:
mpe_dbdelete($db,"COMPOSERS","John Lennon")

Success

Testing:
mpe_dbget_serial_back($db, "Albums", NULL, 100)

Records found = 7

2007	2007	Piano Sonatas	ca	459	Philips	1963	2894229702
2006	2006	Famous Grieg Pieces	ca	499	D. Grammophon	1983	2894272042
2005	2005	Complete Hungarian Rapsodies	cd	1599	Philips	1993	2894383712
2004	2004	Granada	cd	1599	D. Grammophon	1984	2894457772
2003	2003	Celia Bartoli	cd	1599	London Records	1994	2894434522
2002	2002	Mad About Beethoven	cd	1049	D. Grammophon	1993	2894391482
2001	2001	Franz Schubert: Lieder	cd	1049	Atlantic	1983	2894438272

Testing:
mpe_dbget_chain($db, "Selections", "ComposerName", "Franz Schubert", array("SelectionName","Performers"), 100)

Records found = 7

1	Der Saenger	Berlin Philharmonic
2	Fruehlingslied	Berlin Philharmonic
3	Fruehlingslaube	Berlin Philharmonic
4	Vor Meiner Wiege	Berlin Philharmonic
5	Drang in die Ferne	Berlin Philharmonic
6	Der Musensohn	Berlin Philharmonic
7	Viola	Berlin Philharmonic

Testing:
mpe_dbget_chain_back($db, "Selections", "AlbumCode", 2001, "SelectionName")

Records found = 7

7	Viola
6	Der Musensohn
5	Drang in die Ferne
4	Vor Meiner Wiege
3	Fruehlingslaube
2	Fruehlingslied
1	Der Saenger

Testing:
mpe_dbget_chain($db, "Albums", "AlbumCode", 2003, "", 100)

Records found = 1

2003

Celia Bartoli

1599

London Records

1994

2894434522

Testing:
mpe_dblookup($db, "Albums", "AlbumCode", 2003, "")

ALBUMCODE	2003
ALBUMTITLE	Celia Bartoli
MEDIUM	cd
ALBUMCOST	1599
RECORDINGCO	London Records
DATERECORDED	1994
MFGCODE	2894434522
COMMENT

Testing:
mpe_dblookup($db, "Selections", "AlbumCode", 2003, array("ComposerName","Performers","SelectionName"))

COMPOSERNAME	Amadeus Mozart
PERFORMERS	Vienna Chamber Orchestra
SELECTIONNAME	Temeraril

Testing weird data types: The hard way

J1	J2	J4	E2	E4	I4	R2	R4	Z2	Z4	Z6	Z12	4K2				P20	P4
-1	-1	1	-1	-1	1	-1	-1	-1	-1	-1	-1	1	16	256	4096	-1	-1
2	2	2	2	2	2	2	2	2	2	2	2	2	0	0	0	2	2
4	4	4	4	4	4	4	4	4	4	4	4	4	0	0	0	0	0
8	8	8	8	8	8	8	8	8	8	8	8	8	0	0	0	0	0
16	16	16	16	16	16	16	16	16	16	16	16	16	0	0	0	16	16
32	32	32	32	32	32	32	32	32	32	32	32	32	0	0	0	0	0
64	64	64	64	64	64	64	64	64	64	64	64	64	0	0	0	-1234567890123456789	64
128	128	128	128	128	128	128	128	99	128	128	128	128	0	0	0	0	0
256	256	256	256	256	256	256	256	88	256	256	256	256	0	0	0	256	256
512	512	512	512	512	512	512	512	77	512	512	512	512	0	0	0	-512	-512
1024	1024	1024	1024	1024	1024	1024	1024	66	1024	1024	1024	1024	1024	1024	1024	1024	999

Testing weird data types: The easy way

Records found = 11

J1	J2	J4	E2	E4	I4	R2	R4	Z2	Z4	Z6	Z12	4K2				P20	P4
-1	-1	1	-1	-1	1	-1	-1	-1	-1	-1	-1	1	16	256	4096	-1	-1
2	2	2	2	2	2	2	2	2	2	2	2	2	0	0	0	2	2
4	4	4	4	4	4	4	4	4	4	4	4	4	0	0	0	0	0
8	8	8	8	8	8	8	8	8	8	8	8	8	0	0	0	0	0
16	16	16	16	16	16	16	16	16	16	16	16	16	0	0	0	16	16
32	32	32	32	32	32	32	32	32	32	32	32	32	0	0	0	0	0
64	64	64	64	64	64	64	64	64	64	64	64	64	0	0	0	-1234567890123456789	64
128	128	128	128	128	128	128	128	99	128	128	128	128	0	0	0	0	0
256	256	256	256	256	256	256	256	88	256	256	256	256	0	0	0	256	256
512	512	512	512	512	512	512	512	77	512	512	512	512	0	0	0	-512	-512
1024	1024	1024	1024	1024	1024	1024	1024	66	1024	1024	1024	1024	1024	1024	1024	1024	999

PHP test script: MUSIC

Testing: $db = mpe_dbopen("MUSIC.DATA","MGR",1)

Testing: mpe_dbfind($db, "SELECTIONS", "ALBUMCODE", 2001)

Testing: mpe_dbget($db, "SELECTIONS", DBGET_MODE_CHAINED_READ) and mpe_dbresult_assoc($db, "SELECTIONS");

Testing: mpe_dbget($db, "Composers", DBGET_MODE_SERIAL_READ) and mpe_dbresult_assoc($db, "Composers");

Testing: mpe_dbget($db, "albums", DBGET_MODE_CALCULATED_READ, 2003) and mpe_dbresult_item($db, "albums", field names);

Testing: mpe_dbinfo_entry_count($db, "SELECTIONS")

Testing: mpe_dbinfo_list_sets($db) and mpe_dbinfo_list_items($db,setname)

Testing: mpe_dbput($db,"COMPOSERS",array("COMPOSERNAME" => "John Lennon","BIRTH" => "1940","DEATH" => "1980"))

Testing: mpe_dbupdate($db,"COMPOSERS","John Lennon",array("BIRTHPLACE" => "Liverpool", "COMMENT" => "Beatle"))

Testing: mpe_dbget_serial($db, "Composers", "BirthPlace")

Testing: mpe_dbdelete($db,"COMPOSERS","John Lennon")

Testing: mpe_dbget_serial_back($db, "Albums", NULL, 100)

Testing: mpe_dbget_chain($db, "Selections", "ComposerName", "Franz Schubert", array("SelectionName","Performers"), 100)

Testing: mpe_dbget_chain_back($db, "Selections", "AlbumCode", 2001, "SelectionName")

Testing: mpe_dbget_chain($db, "Albums", "AlbumCode", 2003, "", 100)

Testing: mpe_dblookup($db, "Albums", "AlbumCode", 2003, "")

Testing: mpe_dblookup($db, "Selections", "AlbumCode", 2003, array("ComposerName","Performers","SelectionName"))

Testing weird data types: The hard way

Testing weird data types: The easy way

Testing:
$db = mpe_dbopen("MUSIC.DATA","MGR",1)

Testing:
mpe_dbfind($db, "SELECTIONS", "ALBUMCODE", 2001)

Testing:
mpe_dbget($db, "SELECTIONS", DBGET_MODE_CHAINED_READ) and
mpe_dbresult_assoc($db, "SELECTIONS");

Testing:
mpe_dbget($db, "Composers", DBGET_MODE_SERIAL_READ) and
mpe_dbresult_assoc($db, "Composers");

Testing:
mpe_dbget($db, "albums", DBGET_MODE_CALCULATED_READ, 2003) and
mpe_dbresult_item($db, "albums", field names);

Testing:
mpe_dbinfo_entry_count($db, "SELECTIONS")

Testing:
mpe_dbinfo_list_sets($db) and
mpe_dbinfo_list_items($db,setname)

Testing:
mpe_dbput($db,"COMPOSERS",array("COMPOSERNAME" => "John Lennon","BIRTH" => "1940","DEATH" => "1980"))

Testing:
mpe_dbupdate($db,"COMPOSERS","John Lennon",array("BIRTHPLACE" => "Liverpool", "COMMENT" => "Beatle"))

Testing:
mpe_dbget_serial($db, "Composers", "BirthPlace")

Testing:
mpe_dbdelete($db,"COMPOSERS","John Lennon")

Testing:
mpe_dbget_serial_back($db, "Albums", NULL, 100)

Testing:
mpe_dbget_chain($db, "Selections", "ComposerName", "Franz Schubert", array("SelectionName","Performers"), 100)

Testing:
mpe_dbget_chain_back($db, "Selections", "AlbumCode", 2001, "SelectionName")

Testing:
mpe_dbget_chain($db, "Albums", "AlbumCode", 2003, "", 100)

Testing:
mpe_dblookup($db, "Albums", "AlbumCode", 2003, "")

Testing:
mpe_dblookup($db, "Selections", "AlbumCode", 2003, array("ComposerName","Performers","SelectionName"))