<html>
<head>
<title>BlackTDN :: UBTDNTBLVIEW.php</title>
</head>
<body>
<?php
$wsdl = "http://BlackTDN:8088/wsDev02/UBTDNTVIEW.apw?WSDL";
try {
$client = new SoapClient($wsdl, array("cache_wsdl" => WSDL_CACHE_NONE));
$alias = "SM0";
$deleted = false;
$recno = true;
$param = array("ALIAS" => $alias, "RDELETED" => $deleted, "RRECNO" => $recno);
$tStruct = $client->GETTSTRUCT($param);
$param = array("ALIAS" => $alias);
$fields = $client->GETTFIELDSNAME($param);
$array = $fields->GETTFIELDSNAMERESULT->UFLDNAME->STRING;
$fNames = array();
for ($f = 0; $f < sizeof($array); ++$f) {
if ($tStruct->GETTSTRUCTRESULT->UFIELDSTRUCT[$f]->FLDMANDATORY) {
array_push($fNames, $array[$f]);
}
}
$arrRemove = array_merge(array_diff($array, $fNames));
$fields->GETTFIELDSNAMERESULT->UFLDNAME->STRING = array_merge(array_diff($array, $arrRemove));
$fields = $fields->GETTFIELDSNAMERESULT;
$param = array("ALIAS" => $alias, "FIELDSNAME" => $fields, "RDELETED" => $deleted, "RRECNO" => $recno);
$tStruct = $client->GETTSTRUCTBYFIELDSNAME($param);
echo "<table border='1' align='left'>";
echo "<thead>";
echo "<tr align='left'>";
