<pre>
<?php

define('PGV_SCRIPT_NAME', 'serviceClientTest.php');
require './config.php';

ob_start();
require_once './SOAP/Client.php';

//-- put your URL here
$url = 'http://localhost/pgv-svn/genservice.php?wsdl';
print "Getting WSDL<br />";

if (!class_exists('SoapClient')) {
	print "Using PEAR:SOAP<br />";
	$wsdl = new SOAP_WSDL($url);
	print "Getting Proxy<br />";
	$soap = $wsdl->getProxy();
}
else {
	print "Using SOAP Extension<br />";
	$soap = new SoapClient($url);
}

print "Getting ServiceInfo<br />\n";
$s = $soap->ServiceInfo();
var_dump($s);
print "After ServiceInfo()<br />";

$result = $soap->Authenticate('', '', '', '', 'GEDCOM');
var_dump($result);

print "After Authenticate<br />";

$res = $soap->getPersonById($result->SID, "I2");
var_dump($res);
print "After getPersonById<br />";

$res = $soap->getGedcomRecord($result->SID, "I2");
var_dump($res);
print "After getGedcomRecord<br />";

//$person = $soap->getPersonByID($result->SID, "I1");
//print_r($person);
//require_once PGV_ROOT.'includes/classes/class_grampsexport.php';
//$ge= new GrampsExport();
//$ge->begin_xml();
//$ge->create_family(find_family_record("F1", PGV_GED_ID), "F1", 1);
////$ge->create_person(find_person_record("I1", PGV_GED_ID), "I1", 1);
//$xml = $ge->dom->saveXML();
//print htmlentities($xml);
//
//$family = $soap->getFamilyByID($result->SID, "F1");
//print_r($family);

//$ids = $soap->checkUpdates($result->SID, "01 JAN 2006");
//print_r($ids);
//
//$s = $soap->search($result->item->SID, 'week', '0','100');
//echo print_r($s,true);
//
//$res = $soap->getPersonById($result->SID, "I1");
//print_r($res);
//
/*************************************** getVar TESTS *********************************************/
/*$s = $soap->getVar($result->SID, 'GEDCOM');
print_r($s);

$s = $soap->getXref($result->SID, 'new', 'INDI');
print_r($s);

$s = $soap->checkUpdates($result->SID, '10 JAN 2005');
print_r($s);
*/
//
//$s = $soap->getVar($result->SID, 'CHARACTER_SET');
//print_r($s);
//
//$s = $soap->getVar($result->SID, 'PEDIGREE_ROOT_ID');
//print_r($s);
//
// The rest of these are examples that only work if you are
// actually authenticated as a user first not anonymously
//$s = $soap->getVar($result->SID, 'CALENDAR_FORMAT');
//print_r($s);
//
//$s = $soap->getVar($result->SID, 'LANGUAGE');
//print_r($s);
//
/************* THE REST OF THESE SCHOULD RETURN SOAP FAULTS SINCE THEY'RE NOT ALLOWED   **********/
//$s = $soap->getVar($result->SID, 'DBTYPE');
//print_r($s);
//
//$s = $soap->getVar($result->SID, 'SERVER_URL');
//print_r($s);
/**************************************** END OF getVar TEST *************************************/
//
//$s = $soap->appendRecord($result->SID, 'RoyalBaseGarrett05.ged', $gedrec);
//print_r($s);
//
//$s = $soap->deleteRecord($result->SID, 'RoyalBaseGarrett05.ged');
//print_r($s);

ob_end_flush();
?>
</pre>
