|
|
Daftar orang dengan data pribadi yang sangat mendasar
Skrip klien berikut akan mengambil daftar orang dengan data pribadi yang sangat mendasar(nama pertama/keluarga , DOB, Kode pos, Jenis Kelamin, Tanggal meninggal, Status rekaman) dan menampilkannya di tabel. (Pls. scroll down)
// Load the library
require('ixr_library.inc.php');
// Create the client and connect to the remote server
$client = new IXR_Client('http://www.care2x.net/foundry/modules/hxp/server.php');
// Create the header and supply the username and password
$header['usr'] = 'hxp';
$header['pw'] = 'hxp';
// Call the remote procedure
if (!$client->query('Person.List', $header)){
// If error, show info
echo ('An error occured - '.$client->getErrorCode().' : '.$client->getErrorMessage();
}else{
// Get the result
$response = $client->getResponse();
// Display the result
echo '<TABLE BORDER=0>';
echo "<TR>
<TD> PID </TD>
<TD> Family name </TD>
<TD> First name </TD>
<TD> Date of birth </TD>
<TD> Zip </TD>
<TD> Sex </TD>
<TD> Death date </TD>
<TD> Record status </TD>
</TR>";
while(list($x,$v) = each($response)){
echo "<TR>";
while(list($y, $z) = each($v)){
echo '<TD>'.$v.'</TD>';
}
echo "</TR>";
}
echo '</TABLE>';
}
|