Subversion Repositories Sigmater

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
6 Andrea 1 
<table width="80%" border="1" align="center">
2 
  <tr>
3 
    <td><b>Stato richiesta:</b></td>
4 
    <td>&nbsp;<?
5 
	if (PEAR::isError($ritorno))
6 
		{?>
7 
      <span class="Stile3">Errore</span>
8 
      <? } else { ?>
9 
		<span class="Stile1">Successo</span>		<?
10 
 
11 
		}
12 
 
13 
	?></td>
14 
  </tr>
15 
 
16 
   <tr>
17 
    <td><b>Protocollo:</b></td>
18 
    <td>&nbsp;
19 
	<?
20 
	if (PEAR::isError($ritorno))
21 
		{?>
22 
      <span class="Stile3">n/a</span>
23 
      <? } else {
24 
 
25 
	  // trovo il protocollo nel xml di ritorno...
26 
 
27 
	  $pos1 = strpos($ritorno, "<Protocollo>");
28 
	  $pos2 = strpos($ritorno, "</Protocollo>");
29 
 
30 
	  if ($pos1>0)
31 
		{
32 
	  $protocollo = substr($ritorno, $pos1+12, $pos2-$pos1-10);
33 
	  }
34 
	  else
35 
	  	$protocollo="n/a";
36 
 
37 
	  ?><?if($protocollo=="n/a") {?>
38 
		<span class="Stile3"><? echo $protocollo; ?></span>
39 
			<?} else {?>
40 
			<span class="Stile1"><? echo $protocollo; ?></span>
41 
			<?} ?>
42 
 
43 
		<?
44 
		}
45 
	?>
46 
	</td>
47 
  </tr>
48 
   <tr>
49 
    <td><b>XML in ingresso:</b></td>
50 
    <td><textarea  name="xmlin" cols="60" rows="6">
51 
	<? echo  htmlentities($xml); ?>
52 
</textarea> </td>
53 
  </tr>
54 
   <tr>
55 
     <td><b>XML in uscita:</b></td>
56 
     <td><textarea name="xmlin" cols="60" rows="6">
57 
<?
58 
		if (PEAR::isError($ritorno))
59 
			echo 'SOAPFAULT: [CODE]'.$ritorno->code.' - [MESSAGE]'.$ritorno->message; //$soapclient->xml;
60 
		else
61 
			echo htmlentities($ritorno);
62 
 ?>
63 
   </textarea>
64 
     </td>
65 
   </tr>
66 
 </table><br><br>