Esempio n. 1
0
<?php

$value = $_POST['value'];
$value = (double) str_replace(',', '.', $value);
$from = $_POST['from'];
$to = $_POST['to'];
require 'WebServiceClient.php';
$client = new WebServiceClient('http://localhost/xmlgenerator/remote2.php');
$proxy = $client->getProxy();
$value2 = $proxy->converterMoeda($value, $from, $to);
//formatacao
$value2 = str_replace('.', ',', $value2);
$currency1 = $proxy->descricaoMoeda($from);
$currency2 = $proxy->descricaoMoeda($to);
$mensagem = "{$value} {$currency1} equivalem a {$value2} {$currency2}";
?>
<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title>Moeda convertida</title>
</head>
<body>
<?php 
echo $mensagem;
?>
<br>
<a href="form-xml02.php">Retornar</a>
</body>
</html>
Esempio n. 2
0
function Main()
{
    header('Content-Type: text/html; charset=iso-8859-1');
    $ret = "";
    $cnn = Conexao2::getInstance();
    $cmd = $cnn->prepare("select Valor from sisparametros where Nome = 'URLWebServiceSIAP';");
    $cmd->execute();
    $UrlWS = $cmd->fetchColumn();
    $cmd->closeCursor();
    $cmd = $cnn->prepare("select Valor from sisparametros where Nome = 'URLSIAP';");
    $cmd->execute();
    $UrlSIAP = $cmd->fetchColumn();
    $cmd->closeCursor();
    //$ws = new WebServiceClient('http://siap.ufcspa.edu.br/ws/siap_ws.php?wsdl');
    $ws = new WebServiceClient($UrlWS);
    if (!$ws) {
        $ret = "@lng[Erro ao conectar o banco de imagens. Detalhes:]" . " " . $ws->getErro();
    } else {
        if (!isset($_REQUEST['r'])) {
            $rotina = "tipos";
        } else {
            $rotina = $_REQUEST['r'];
        }
        if ($rotina == "tipos") {
            $search_types = $ws->call_soap_method('get_search_types', array());
            if ($search_types) {
                $opcoes = '<option value="">@lng[Selecione]</option>';
                foreach ($search_types as $nodo) {
                    $opcoes .= '<option value="' . $nodo['id'] . '">' . $nodo['nome'] . '</option>';
                }
                $ret = $opcoes;
            } else {
                Log::RegistraLog("ERRO. Não foi possível carregar os Tipos de pesquisa ao SIAP", true);
                $ret = 'ERRO: @lng[Não foi possível carregar os Tipos de pesquisa ao banco de imagens. Tente novamente em alguns minutos.]<br /><br /><a href="vwuploaddetalhe.php?type=img">@lng[Tentar novamente]</a>';
            }
        } else {
            if ($rotina == "subtipos") {
                $codigo_search = array("search_type" => $_REQUEST['selTipos']);
                $search_sub_types = $ws->call_soap_method('get_search_type_keywords', $codigo_search);
                if ($search_sub_types) {
                    $opcoes = '<option value="">@lng[Selecione]</option>';
                    foreach ($search_sub_types as $nodo) {
                        $opcoes .= '<option value="' . $nodo['id'] . '">' . $nodo['nome'] . '</option>';
                    }
                    $ret = $opcoes;
                } else {
                    Log::RegistraLog("ERRO. Não foi possível carregar os Subtipos de pesquisa ao SIAP", true);
                    $ret = 'ERRO: @lng[Não foi possível carregar os Subtipos de pesquisa ao banco de imagens. Tente novamente em alguns minutos.]<br /><br /><a href="vwuploaddetalhe.php?type=img">@lng[Tentar novamente]</a>';
                }
            } else {
                if ($rotina == "imagens") {
                    if (urldecode($_REQUEST['type_key']) == "Sistema") {
                        $parametros = array('search_request' => array("palavra" => !isset($_REQUEST['txtPalavraChave']) ? '' : $_REQUEST['txtPalavraChave'], "sistema" => $_REQUEST['selSubTipos'], "procedencia" => "", "patologia" => ""));
                    } else {
                        if ($_REQUEST['type_key'] == "Procedência") {
                            $parametros = array('search_request' => array("palavra" => !isset($_REQUEST['txtPalavraChave']) ? '' : $_REQUEST['txtPalavraChave'], "sistema" => "", "procedencia" => $_REQUEST['selSubTipos'], "patologia" => ""));
                        } else {
                            if ($_REQUEST['type_key'] == "Patologia") {
                                $parametros = array('search_request' => array("palavra" => !isset($_REQUEST['txtPalavraChave']) ? '' : $_REQUEST['txtPalavraChave'], "sistema" => "", "procedencia" => "", "patologia" => $_REQUEST['selSubTipos']));
                            }
                        }
                    }
                    $nmax = $_REQUEST['nmax'];
                    try {
                        $list_images = $ws->call_soap_method('search', $parametros);
                    } catch (Exception $e) {
                        Log::RegistraLog("ERRO: O servidor do banco de imagens não respondeu no tempo máximo de 60 segundos. Detalhes: " . $e->getMessage(), true);
                        $ret = 'ERRO: @lng[O servidor do banco de imagens não respondeu no tempo máximo de 60 segundos.]<br /><br />@lng[Tente repetir a consulta.]';
                    }
                    if ($list_images) {
                        $opcoes = '';
                        if (count($list_images) < $nmax) {
                            $nmax = count($list_images);
                        }
                        for ($i = 0; $i < $nmax; $i++) {
                            $UrlImg = $UrlSIAP . substr($list_images[$i]['url'], stripos($list_images[$i]['url'], "upload"));
                            $opcoes .= '<div class="find-result">';
                            $opcoes .= '  <input type="checkbox" name="chkUsar[]" id="chkUsar_' . $i . '" value="' . base64_encode($UrlImg . "::::" . $list_images[$i]['nome']) . '" class="campo" />@lng[Selecionar]<br />';
                            $opcoes .= '  <img src="' . str_replace("/sis_imagem/", "/sis_imagem_p/", $UrlImg) . '" class="img-preview-2" title="' . $list_images[$i]['nome'] . '" alt="' . $list_images[$i]['nome'] . '">';
                            $opcoes .= '</div>';
                        }
                        $opcoes .= '<input type="hidden" name="hdnHorigem" id="hdnHorigem" value="banco" class="campo" />';
                        $ret = $opcoes;
                    } else {
                        if ($ws->getErro() != "") {
                            Log::RegistraLog("ERRO. Erro ao consulta imagens do SIAP. Detalhes: " . $ws->getErro(), true);
                            $ret = 'ERRO: @lng[Não foi possível realizar a pesquisa no banco de imagens. Detalhes do erro:] ' . $ws->getErro() . '.<br /><br />@lng[Tente novamente em alguns minutos.]<br /><br /><a href="vwuploaddetalhe.php?type=img">@lng[Tentar novamente]</a>';
                        } else {
                            $ret = "@lng[Nenhum item encontrado com a pesquisa realizada]";
                        }
                    }
                }
            }
        }
    }
    echo Comuns::Idioma($ret);
}