»
".$arr_idioma['resultados']." "$total_linhas" ";
if($mostra_cesta)
$conteudo_dados .= "".$arr_idioma['cesta']." ";
if($s_estacio_sgc == "projeto_estacio_sgc")
$conteudo_dados .= "".$arr_idioma['cesta_estacio_sgc']." ";
/*$conteudo_dados .= "".$arr_idioma['autores']."
".$arr_idioma['assuntos']." ";*/
if($mostra_outras_redes_redepergamum)
$conteudo_dados .= "".$arr_idioma['rede_pergamum']." ";
//$conteudo_dados .= "
if($mostra_ebsco_eds)
if($cod_empresa == 525){
$conteudo_dados .= "Pesquisa Integrada Discovery ";
}else{
$conteudo_dados .= "".$arr_idioma['rede_ebsco']." ";
}
if($mostra_pesq_livrarias)
$conteudo_dados .= "".$arr_idioma['rede_livrarias']." ";
if($mostra_pesq_oai_geral)
//Confirmar o acao_tab
$conteudo_dados .= "
".$mostra_pesq_oai_geral_desc."
";
if($mostra_pesq_oai_local)
$conteudo_dados .= "".$mostra_pesq_oai_local_desc." ";
if($mostra_gedweb)
$conteudo_dados .= "".$mostra_gedweb_desc." ";
if($mostra_abnt)
//Confirmar o acao_tab
$conteudo_dados .= "
".$mostra_abnt_desc."
";
$conteudo_dados .= "
";
$color = true;
$indice_acervo = 0;
$conexao4 = new PergamumBanco($usuario,$senha,$alias_database,$plataforma_web,$banco_de_dados,$porta_banco_de_dados,$database_name);
if(!$conexao4->conectar())
return "
".$arr_idioma['erro_conectar']."! ";
if($numero_pag == 0){
$vetor_de_acervos="";
$vetor_capa_acervos="";
$vetor_titulo_acervos="";
$vetor_total_titulos=null;
$pesquisa_por_codigo="";
$ehnumero="";
$gera_773="";
$vetor_gera_exemplar="";
$vetor_tot_exemplares="";
$vetor_possui_out_titulos="";
$vetor_possui_doc_online="";
$vetor_qtde_comentarios="";
$vetor_isbn_issn="";
//COMEÇO DIFERENÇA PRIMEIRA PÁGINA
while($resultset = $conexao->move_proximo()){
$concatena_links_856 = "";
$tipo_p = $resultset["tipo_p"];
//$tipo_p = $codMat_selec;
if(is_numeric($tipo_p))
$ehnumero = true;
else
$ehnumero = false;
if($ehnumero==true && trim($pesquisa_por_codigo)==""){
if(!$conexao2->execProcRetorno("$linked_server sp_int_parametro_con_indice","$cod_empresa,$tipo_p"))
return msg_retorno_formatado($conexao2->getErro());
//return "
".$conexao2->getErro()." ";
$reg3 = $conexao2->move_proximo();
$pesquisa_por_codigo = $reg3["pesquisa_por_codigo"];
$conexao2->fechaExecQueryProc();
}
//return "Valor: ".$pesquisa_por_codigo."
";
$cod_acervo_coleta = "";
//Letra
if(($t_p_i_select=="palavra")||($t_p_i_select=="similar")||($t_p_i_select=="38")){
if($chamou_spwper_consultas_postgresql==false){
$cod_acervo_temp = $resultset["cod_acervo"];
$titulo_temp = $resultset["desc_titulo"];
$link_capa_temp = $resultset["link_capa"];
$seq_paragrafo_capa = $resultset["seq_paragrafo_capa"];
if(trim($titulo_temp)=="")
$titulo_temp = $resultset["obra"];
$desc_tipo_obra_ref = $resultset["desc_tipo_obra"];
$classificacao = $resultset["classificacao"];
$text = $resultset["referencia"];
$gera_773 = $resultset["gera_773"];
$gera_exemplar = strtoupper($resultset["gera_exemplar"]);
$tot_exemplares = $resultset["tot_exemplares"];
$possui_out_titulos = $resultset["possui_out_titulos"];
$possui_doc_online = $resultset["possui_doc_online"];
$qtde_comentarios = $resultset["qtde_comentarios"];
$isbn_issn = $resultset["isbn_issn"];
}
else{
$var1_postgresql = explode("titulo_obra",$resultset[0]);
$cod_acervo_temp = $var1_postgresql[0];
$var1_postgresql = explode("desc_tipo_obra",$var1_postgresql[1]);
$titulo_temp = $var1_postgresql[0];
$var1_postgresql = explode("classificacao_obra",$var1_postgresql[1]);
$desc_tipo_obra_ref = $var1_postgresql[0];
$var1_postgresql = explode("referencia_obra",$var1_postgresql[1]);
$classificacao = $var1_postgresql[0];
$var1_postgresql = explode("capa_obra",$var1_postgresql[1]);
$link_capa_temp = $var1_postgresql[0];
$text = $var1_postgresql[1];
}
$cod_acervo_coleta = $cod_acervo_temp;
}
$controla_detalhes_autoridade = false;
//Número e se existir na parametro_con_indice
if($t_p_i_select=="indice"){
$cod_acervo_temp = $resultset["cod_autoridade"];
if(trim($cod_acervo_temp)!="")
$controla_detalhes_autoridade = true;
if($codMat_selec==2 || $codMat_selec==3 || $codMat_selec==4) // Assunto, autor ou série mostra o link Visualizar DETALHES
$controla_detalhes_autoridade = true;
else
$controla_detalhes_autoridade = false;
$titulo_temp = $resultset["descricao"];
$tot_temp = $resultset["total_titulos"];
if($tot_temp=="")
$tot_temp = $resultset["total_exemplares"];
if(trim($cod_acervo_temp)==""){
$cod_acervo_temp = $resultset["cod_acervo"];
$cod_acervo_coleta = $cod_acervo_temp;
}
$link_capa_temp = $resultset["link_capa"];
$seq_paragrafo_capa = $resultset["seq_paragrafo_capa"];
if(trim($titulo_temp)=="")
$titulo_temp = $resultset["desc_titulo"];
if(trim($cod_acervo_temp)=="0" || trim($cod_acervo_temp)=="")
$cod_acervo_temp = $titulo_temp;
$desc_tipo_obra_ref = $resultset["desc_tipo_obra"];
$classificacao = $resultset["classificacao"];
$text = $resultset["referencia"];
$gera_773 = $resultset["gera_773"];
$gera_exemplar = strtoupper($resultset["gera_exemplar"]);
$tot_exemplares = $resultset["tot_exemplares"];
$possui_out_titulos = $resultset["possui_out_titulos"];
$possui_doc_online = $resultset["possui_doc_online"];
$qtde_comentarios = $resultset["qtde_comentarios"];
$isbn_issn = $resultset["isbn_issn"];
}
$indice_acervo++;
$vetor_de_acervos[$indice_acervo] = $cod_acervo_temp;
$vetor_titulo_acervos[$cod_acervo_temp] = $titulo_temp;
$text = $f->formata_referencia_escala($text);
$vetor_referencia_acervos[$cod_acervo_temp] = $text;
//Se arquivo
if(strtoupper(trim($gera_exemplar))=='A' || strtoupper(trim($gera_exemplar))=='M'){
//grant select on localizacao_exemplar to generico
//grant select on tipo_emprestimo_exemplar to generico
$classificacao = "";
if(!$conexao2->execQueryRetorno("select inf_adicional
from $linked_server exemplar
where cod_empresa=$cod_empresa
and cod_acervo=$cod_acervo_temp
and cod_sit_exemplar in(select cod_sit_exemplar from $linked_server sit_exemplar_marc where cod_empresa=$cod_empresa and exibe_exemplar_consulta='S')
and cod_biblioteca in(select cod_biblioteca from $linked_server biblioteca_marc where cod_empresa=$cod_empresa and modo_acesso='L')
and cod_tipo_emp_exemplar in(select cod_tipo_emp_exemplar from $linked_server tipo_emprestimo_exemplar where cod_empresa=$cod_empresa and visualiza_emprestimo='S')
and cod_local_exemplar in(select cod_local_exemplar from $linked_server localizacao_exemplar where cod_empresa=$cod_empresa and exibe_consulta='S')
order by inf_adicional"))
return msg_retorno_formatado($conexao2->getErro());
while($reg_tab = $conexao2->move_proximo())
$classificacao .= $reg_tab["inf_adicional"];
$conexao2->fechaExecQueryProc();
$vetor_classificacao_acervos[$cod_acervo_temp] = $classificacao;
}
else
$vetor_classificacao_acervos[$cod_acervo_temp] = $classificacao;
//Chin Lau - Museu
if(strtoupper(trim($gera_exemplar))=='M'){
$desc_tipo_obra_ref = str_replace("(", "",$desc_tipo_obra_ref);
$desc_tipo_obra_ref = str_replace(")", "",$desc_tipo_obra_ref);
$desc_tipo_obra_ref = trim($desc_tipo_obra_ref);
}
$vetor_de_acervos[$indice_acervo] = $cod_acervo_temp;
$vetor_titulo_acervos[$cod_acervo_temp] = $titulo_temp;
$vetor_referencia_acervos[$cod_acervo_temp] = $text;
$vetor_desc_tipo_obra_ref_acervos[$cod_acervo_temp] = $desc_tipo_obra_ref;
$vetor_capa_acervos[$cod_acervo_temp] = $link_capa_temp;
$vetor_seq_paragrafo_capa_acervos[$cod_acervo_temp] = $seq_paragrafo_capa;
$vetor_gera_773[$cod_acervo_temp] = $gera_773;
$vetor_gera_exemplar[$cod_acervo_temp] = $gera_exemplar;
$vetor_tot_exemplares[$cod_acervo_temp] = $tot_exemplares;
$vetor_possui_out_titulos[$cod_acervo_temp] = $possui_out_titulos;
$vetor_possui_doc_online[$cod_acervo_temp] = $possui_doc_online;
$vetor_qtde_comentarios[$cod_acervo_temp] = $qtde_comentarios;
$vetor_isbn_issn[$cod_acervo_temp] = $isbn_issn;
$vetor_controla_detalhes_autoridade[$cod_acervo_temp] = $controla_detalhes_autoridade;
if(trim($tot_temp)!="")
$vetor_total_titulos[$cod_acervo_temp] = $tot_temp;
if((int)$indice_acervo > (int)$registros_por_pagina)
continue;
if(trim($cod_acervo_coleta)!="")
if(!$f->coleta_dados_consulta_acervo($conexao2,$cod_empresa,$cod_acervo_coleta,5,$linked_server))
return msg_retorno_formatado($arr_idioma['erro_grava_contador_listas']);
//return "
Ocorreu um erro ao gravar o contador de Acessos em listas no Site ";
//FIM DIFERENÇA PRIMEIRA PÁGINA
if($qtde_comentarios==0)
$qtde_comentarios=" ";
if($color){
$cor = "pmu_dados1";
$color = false;
}
else{
$cor = "pmu_dados2";
$color = true;
}
if($ehnumero == false || trim($pesquisa_por_codigo)=="A"){
if($array_de_extensoes==null){
if(!$conexao2->execProcRetorno("$linked_server spwper_busca_tabela_dados","$cod_empresa,250"))
return msg_retorno_formatado($conexao2->getErro());
//return "
".$conexao2->getErro()." ";
while($reg_tab = $conexao2->move_proximo())
$array_de_extensoes[strtoupper($reg_tab["codigo"])] = substr($reg_tab["descricao"] , 0, -4);
//$array_de_extensoes[strtoupper($reg_tab["codigo"])] = $reg_tab["descricao"];
$conexao2->fechaExecQueryProc();
}
//DOCUMENTO ONLINE 1
if($array_de_extensoes!=null && strtoupper(trim($possui_doc_online))=="S"){
if(!$conexao4->execProcRetorno("$linked_server spwper_busca_links856","$cod_empresa,$cod_acervo_temp"))
return msg_retorno_formatado($conexao4->getErro());
$total_retorno_links = $conexao4->totalLinhas();
$seq_paragrafo_anterior = -1;
if($total_retorno_links == 2){
$desc_link_url="";
$target_momento = "target='_blank' rel= 'noopener' ";
while($reg_link = $conexao4->move_proximo()){
$seq_paragrafo_atual = $reg_link["seq_paragrafo"];
if($seq_paragrafo_anterior>0)
if($seq_paragrafo_anterior != $seq_paragrafo_atual){
$concatena_links_856 = "
";
continue;
}
$secao_link = strtolower($reg_link["secao"]);
if($secao_link=="q"){
$desc_link_url = $reg_link["descricao"];
if(trim($desc_link_url)=="")
$desc_link_url = $reg_link["texto_descricao"];
}
elseif($secao_link=="u"){
$url_link = $reg_link["descricao"];
if(trim($url_link)=="")
$url_link = $reg_link["texto_descricao"];
}
elseif($secao_link=="z"){
$reconhecer_ico = "";
if(strtolower(trim($reg_link["descricao"]))=="acesso restrito" || strtolower(trim($reg_link["descricao"]))=="acesso restrito - visualizar" || strtolower(trim($reg_link["descricao"]))=="acessibilidade"){
if(trim($url_link)!=""){
$reconhecer_ico = trim($url_link);
//Confirmação Login - Ebooks 1
if((trim($s_codigopessoa)!="")&&($confirma_login == false))
$url_link = "javascript: valida_permissao_ebook($cod_acervo_temp, '".base64_encode(trim($url_link))."')";
else
$url_link = "javascript: acesso_acessibilidade('$protocolo_s://$server_s/biblioteca_s/acesso_login.php?cod_acervo_acessibilidade=$cod_acervo_temp&acesso=".base64_encode(trim($url_link))."&label=".strtolower(trim($reg_link["descricao"]))."');";
$target_momento = "";
//Se for acessibilidade usa classe de icone de acessibilidade, caso contrário usa class de icone restrito
//$class_acessibilidade_restrito = (strtolower(trim($reg_link["descricao"]))=="acessibilidade")?"btn_ace":"btn_restrito";
$desc_tipo_doc = trim($reg_link["descricao"]);
}
}
}
$seq_paragrafo_anterior = $seq_paragrafo_atual;
}
$extensao_encontrada = "";
$array_chaves = array_keys($array_de_extensoes);
for($r=0;$r 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
else{
if(strpos(strtoupper($url_link),$array_chaves[$r]) > 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
}
if(trim($extensao_encontrada)!=""){
$icone_definitivo = $array_de_extensoes[$extensao_encontrada];
if(trim($desc_link_url)!="")
$desc_link_url = $arr_idioma['titulo'].": ".$desc_link_url."\n";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ."$extensao_encontrada / $url_link!'";
}
else{
//CLARETIANO 1.1
if($cod_empresa == 325){
if(strpos($url_link,"/multimidia/"))
$icone_definitivo = "icone_video";
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
if(trim($concatena_links_856)==""){
if(trim($target_momento) == ""){
//if(strtolower($desc_tipo_doc)=="acessibilidade")
// $icone_definitivo = "btn_acessibilidade";
//Se for acessibilidade usa classe de icone de acessibilidade, caso contrário usa class de icone identificado
if(strtolower($desc_tipo_doc)=="acessibilidade"){
$icone_definitivo = "icone_ace";
$title_acesso_restrito_ou_acessibilidade = $arr_idioma['title_acervo_acessibilidade'];
}
if(strtolower($desc_tipo_doc)=="acesso restrito" || strtolower($desc_tipo_doc)=="acesso restrito - visualizar"){
$title_acesso_restrito_ou_acessibilidade = $arr_idioma['title_acervo_restrito'];
$concatena_links_856 = "
";
}else{
//$concatena_links_856 = "
";
$concatena_links_856 = "
";
}
}
else{
$insere_httpPUC = "";
if($cod_empresa==1){
$temHttpd = strpos($url_link,"http");
if($temHttpd === false)
$insere_httpPUC = "sumario_img.php?link=";
}
/* Foi retirado o if empresa, Atendimento 78333. Thiago */
//if($cod_empresa==341)
//$url_link = urlencode($url_link); //é usado qdo o cadastro da URL está no formato errado
$insere_httpPUC = trim($insere_httpPUC);
$url_link = trim($url_link);
if(strpos($url_link, 'Vínculo no banco') !== false)
$url_link = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_atual¶grafo=856&tipo_vinculo=B";
$concatena_links_856 = "
";
}
}
}
else{
if($total_retorno_links == 1){
$reg_link = $conexao4->move_proximo();
$secao_link = strtolower($reg_link["secao"]);
if($secao_link=="u"){
$url_link = $reg_link["descricao"];
if(trim($url_link)=="")
$url_link = $reg_link["texto_descricao"];
$extensao_encontrada = "";
$array_chaves = array_keys($array_de_extensoes);
for($r=0;$r 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
else{
if(strpos(strtoupper($url_link),$array_chaves[$r]) > 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
}
if(trim($extensao_encontrada)!=""){
$icone_definitivo = $array_de_extensoes[$extensao_encontrada];
//$tip_extensao = "title='".$arr_idioma['arquivo_formato']."$extensao_encontrada / $url_link!'";
}
else{
//CLARETIANO 1.2
if($cod_empresa == 325){
if(strpos($url_link,"/multimidia/"))
$icone_definitivo = "icone_video";
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
$insere_httpPUC = "";
if($cod_empresa==1){
$temHttpd = strpos($url_link,"http");
if($temHttpd === false)
$insere_httpPUC = "sumario_img.php?link=";
}
//if($cod_empresa==341)
//$url_link = urlencode($url_link);
$insere_httpPUC = trim($insere_httpPUC);
$url_link = trim($url_link);
if(strpos($url_link, 'Vínculo no banco') !== false)
$url_link = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_atual¶grafo=856&tipo_vinculo=B";
$concatena_links_856 = "
";
}
}
if($total_retorno_links > 2)
$concatena_links_856 = "
";
}
$conexao4->fechaExecQueryProc();
}
if(trim($concatena_links_856)=="")
$expandir_coluna = "colspan='2'";
else
$expandir_coluna = "";
$codigo_acervo_tela = $cod_acervo_temp;
include("nav_layer_menu.php"); //Menu - guias e variáveis de permissões
if($permissaoIPImprimirClass && $mostra_botao_bematech)
$conteudo_objeto_imprime_classificacao = "
";
else
$conteudo_objeto_imprime_classificacao = " ";
//$conteudo_dados = $conteudo_dados."
//DIFERENÇA PRIMEIRA PÁGINA - $indice_acervo
$conteudo_dados = $conteudo_dados."
$conteudo_objeto_imprime_classificacao
$concatena_links_856
";
if(trim($link_capa_temp)==""){
$conteudo_dados = $conteudo_dados." ";
}else{
if(strpos($link_capa_temp, 'Vínculo no banco') !== false){
$url_capa_tela = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_capa¶grafo=856&tipo_vinculo=B";
$capa_js = "";
$capa_js = "window.open('fotos.php?cod_acervo=$cod_acervo_temp','fotos_capa','status=yes,scrollbars=yes,resizable=yes,width=800,height=600');";
if($cod_empresa==1){
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}else{
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
}else{
$tem_mais_capas = substr($link_capa_temp,0,1); //S ou N
$url_capa_tela = substr($link_capa_temp,1,strlen($link_capa_temp)-1);
$capa_js = "";
//if(strtoupper($tem_mais_capas)=="S")
$capa_js = "window.open('fotos.php?cod_acervo=$cod_acervo_temp','fotos_capa','status=yes,scrollbars=yes,resizable=yes,width=800,height=600');";
if($cod_empresa==1){
/*if($capa_js=="")
$conteudo_dados = $conteudo_dados."";
else*/
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}else{
/*if($capa_js=="")
$conteudo_dados = $conteudo_dados."";
else*/
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
}
}
if($codMat_selec == 10 && $pesq_por_codigo_valor == '' ){
$titulo_temp = str_replace("\""," ",$titulo_temp);
$titulo_temp = str_replace("'"," ",$titulo_temp);
$conteudo_dados = $conteudo_dados."
$titulo_temp
$text
";
}
else{
//Se for a primeira página de resultados da consulta
//MUSEU 1.1
/*
* AT03 1
* Alteração de highlight (semente)
* begin
*
*/
if($t_p_i_select != "38"){
$termo_pesquisa_highlight = explode(" ", $termo_pesquisa);
//var_dump($termo_pesquisa_highlight);
//Para cada palavra é verificado em todos os campos (titulo, descricao de obra e referencia)
foreach($termo_pesquisa_highlight as $value){
//AT03
$titulo_temp = highlight($value, $titulo_temp);
$desc_tipo_obra_ref = highlight($value, $desc_tipo_obra_ref);
$text = highlight($value, $text);
}
$termo_pesquisa_highlight = "";
/* end AT03 semente */
}
if(strtoupper(trim($gera_exemplar))=='M')
$conteudo_dados = $conteudo_dados."
$text
". $desc_tipo_obra_ref." - ".$arr_idioma['detalhes']."
Ac.$cod_acervo_temp
";
else
$conteudo_dados = $conteudo_dados."
". $titulo_temp ." - $desc_tipo_obra_ref
$text
";
}
//trim($classificacao)!="" && trim($classificacao)!="consultar" alterado para apresentar o consultar em mais de um 90 by vt e jrs 07/06/2019
if(trim($classificacao)!=""){
$conteudo_dados = $conteudo_dados."
";
if(strtoupper(trim($gera_exemplar))=='A' || strtoupper(trim($gera_exemplar))=='M') //Se arquivo
$conteudo_dados = $conteudo_dados.$arr_idioma['localizacao'];
else
$conteudo_dados = $conteudo_dados.$arr_idioma['numero_chamada'];
$conteudo_dados = $conteudo_dados.": ".ucfirst($classificacao)."
";
}
else
$conteudo_dados = $conteudo_dados." ";
/*
if(!$conexao4->execQueryRetorno("select count(*) as total
from $linked_server acervo_geral
where cod_empresa=$cod_empresa
and cod_acervo=$cod_acervo_temp
and cod_tipo_obra in(select cod_tipo_obra
from $linked_server tipo_obra
where cod_empresa=$cod_empresa
and gera_exemplar in('A','M')
and exibe_consulta='S')"))
return msg_retorno_formatado($conexao4->getErro());
$resultset = $conexao4->move_proximo();
$total_arquivo = $resultset["total"];
$conexao4->fechaExecQueryProc();
*/
if(strtoupper(trim($gera_exemplar))=='A' || strtoupper(trim($gera_exemplar))=='M') //Se arquivo
$total_arquivo=1;
else
$total_arquivo=0;
$conteudo_dados = $conteudo_dados."
";
include("../compartilhado/acervo_index.php");
$conteudo_dados .= " ";
//QRCODE
$conteudo_dados .= "
";
//BARRA DOS LINKS [1/2] - Se for a primeira página de resultados da consulta
if(strtoupper(trim($gera_exemplar))!="M" || $cod_empresa == 636){
$conteudo_dados .= "".$arr_idioma['acervo'].": $cod_acervo_temp
";
if($mostra_botao_detalhes)
$conteudo_dados .= "
";
if($mostra_comentarios)
$conteudo_dados .= "$qtde_comentarios
";
if($localizacao)
$conteudo_dados .= "
";
$conteudo_dados .= "
";
if(trim($isbn_issn)!="" && $mostra_link_comprar)
$conteudo_dados .= "".$arr_idioma['comprar_online']."
";
$conteudo_dados .= "";
if($mostra_exemplares && $gera_exemplar_verifica!="N" && (!($tot_exemplares==0 && $gera_exemplar_verifica=="E"))){
if($total_arquivo==0)
$conteudo_dados .= "
".$arr_idioma['exemplares']." ";
else
$conteudo_dados .= "
".$arr_idioma['itens']." ";
}
if($mostra_referencia)
$conteudo_dados .= "
|
".$arr_idioma['referencia']." ";
if($mostra_marc)
$conteudo_dados .= "
|
".$arr_idioma['marc']." ";
if($mostra_dublin_core)
$conteudo_dados .= "
|
".$arr_idioma['dublin_core']." ";
if($mostra_colecao && $temKardex && $gera_exemplar_verifica!="N")
$conteudo_dados .= "
|
".$arr_idioma['colecao_kardex']." ";
if($mostra_sumario)
$conteudo_dados .= "
|
".$arr_idioma['sumarios_doc_online']." ";
if($mostra_reserva && $reserva_mostra && $total_exemplares_normal>=1)
$conteudo_dados .= "
|
".$arr_idioma['reserva']." ";
if($mostra_req_material)
$conteudo_dados .= "
|
$desc_req_material ";
if($armazem_mostra)
if($permissaoIPArmazem)
$conteudo_dados .= "
|
".$denominacao_armazem." ";
if($permissaoIPImprimirClass)
$conteudo_dados .= "
|
$label_temp ";
}
//LINK MUSEU 1
// if(strtoupper(trim($gera_exemplar))=='M') //Se Museu
// {
if(!$conexao4->execQueryRetorno("
select distinct td.codigo, td.descricao, td.descricao_adicional2
from $linked_server acervo_link al, $linked_server tabela_dados td
where al.cod_empresa = $cod_empresa
and al.cod_acervo = $cod_acervo_temp
and td.cod_tabela = 337
and td.cod_empresa = al.cod_empresa
and td.codigo = al.cod_tipo_d337"))
return msg_retorno_formatado($conexao4->getErro());
while($resultset = $conexao4->move_proximo()){
$link_codigo = $resultset["codigo"];
$link_descricao = $resultset["descricao"];
$link_mostra = $resultset["descricao_adicional2"];
if($link_mostra == 'S'){
//if(strtoupper(trim($gera_exemplar))!="M") //Exemplar do tipo museu pode ter mais de um link (exposição, objeto relacionado, etc) precisando ter a barra de divisão
$conteudo_dados .= "
| ";
$conteudo_dados .= "
$link_descricao ";
}
}
$conexao4->fechaExecQueryProc();
//FIM LINK MUSEU
// }
$conteudo_dados .= "
";
//FIM BARRA DOS LINKS
$conteudo_dados .= "
";
$nome_div_mostra="div_resultados";
}
else{
if(trim($tot_temp)!="")
$tot_temp_tem_conteudo = " ($tot_temp)";
//$tot_temp_tem_conteudo = " - ".$arr_idioma['titulos'].": $tot_temp";
else
$tot_temp_tem_conteudo = "";
if($controla_detalhes_autoridade)
$link_remissiva = " - ".$arr_idioma['visualizar_detalhes']." ";
else
$link_remissiva = "";
if($pesq_por_codigo_valor == ''){
$titulo_temp = str_replace("\""," ",$titulo_temp);
$titulo_temp = str_replace("'"," ",$titulo_temp);
$conteudo_dados = $conteudo_dados."";
}
else{
//MUSEU 1.2
/*
* AT03 2
* Alteração de highlight (semente)
* begin
*
*/
if($t_p_i_select != "38"){
$termo_pesquisa_highlight = explode(" ", $termo_pesquisa);
//Para cada palavra é verificado em todos os campos (titulo, descricao de obra e referencia)
foreach($termo_pesquisa_highlight as $value){
//AT03
$titulo_temp = highlight($value, $titulo_temp);
$desc_tipo_obra_ref = highlight($value, $desc_tipo_obra_ref);
$text = highlight($value, $text);
}
$termo_pesquisa_highlight = "";
/* end AT03 semente */
}
if(strtoupper(trim($gera_exemplar))=='M')
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
//$nome_div_mostra="div_resultados_intermediario";
$nome_div_mostra="div_resultados";
}
}
}//fim while
if(trim($conteudo_dados)!="")
$conteudo_dados = $conteudo_dados."";
if(($mostra_cesta) || ($s_estacio_sgc == "projeto_estacio_sgc")){
$conteudo_dados = $conteudo_dados."";
}
if($mostra_outras_redes_redepergamum)
$conteudo_dados = $conteudo_dados."
";
if($mostra_ebsco_eds)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_livrarias)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_oai_geral)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_oai_local)
$conteudo_dados = $conteudo_dados."
";
if($mostra_gedweb)
$conteudo_dados = $conteudo_dados."";
if($mostra_abnt)
$conteudo_dados = $conteudo_dados."";
$conteudo_dados = $conteudo_dados."
";
$conteudo_dados = $conteudo_dados."
";
}
//AQUI2
else if($numero_pag>=1){
$conexao2 = new PergamumBanco($usuario,$senha,$alias_database,$plataforma_web,$banco_de_dados,$porta_banco_de_dados,$database_name);
if(!$conexao2->conectar())
return "
".$arr_idioma['erro_conectar']." ";
if($intervalo_fim > $total_linhas)
$intervalo_fim = $total_linhas;
if(trim($cod_autoridade_valor2) == "")
$mostra_termo = ""$termo_pesquisa" ";
else
$mostra_termo = "";
$botao_voltar_tela = "";
if(trim($pesq_por_codigo_valor) != "")
$botao_voltar_tela = "« ".$arr_idioma['voltar']."
";
$conteudo_dados = "
$botao_voltar_tela
»
".$arr_idioma['resultados']." "$total_linhas" ";
if($mostra_cesta)
$conteudo_dados .= "".$arr_idioma['cesta']." ";
if($s_estacio_sgc == "projeto_estacio_sgc")
$conteudo_dados .= "".$arr_idioma['cesta_estacio_sgc']." ";
/*$conteudo_dados .= "".$arr_idioma['autores']."
".$arr_idioma['assuntos']." ";*/
if($mostra_outras_redes_redepergamum)
$conteudo_dados .= "".$arr_idioma['rede_pergamum']." ";
//$conteudo_dados .= "
if($mostra_ebsco_eds)
$conteudo_dados .= "".$arr_idioma['rede_ebsco']." ";
if($mostra_pesq_livrarias)
$conteudo_dados .= "".$arr_idioma['rede_livrarias']." ";
if($mostra_pesq_oai_geral)
$conteudo_dados .= "".$mostra_pesq_oai_geral_desc." ";
if($mostra_pesq_oai_local)
$conteudo_dados .= "".$mostra_pesq_oai_local_desc." ";
if($mostra_gedweb)
$conteudo_dados .= "".$mostra_gedweb_desc." ";
if($mostra_abnt)
$conteudo_dados .= "".$mostra_abnt_desc." ";
$conteudo_dados .= "
";
$color = true;
$indice_acervo = 0;
$conexao4 = new PergamumBanco($usuario,$senha,$alias_database,$plataforma_web,$banco_de_dados,$porta_banco_de_dados,$database_name);
if(!$conexao4->conectar())
return "
".$arr_idioma['erro_conectar']." ";
//COMEÇO DIFERENÇA PRIMEIRA PÁGINA
for($j=$intervalo_inicio;$j<=count($vetor_de_acervos);$j++){
$concatena_links_856 = "";
$cod_acervo_temp = $vetor_de_acervos[$j];
$titulo_temp = $vetor_titulo_acervos[$cod_acervo_temp];
$text = $vetor_referencia_acervos[$cod_acervo_temp];
$classificacao = $vetor_classificacao_acervos[$cod_acervo_temp];
$desc_tipo_obra_ref = $vetor_desc_tipo_obra_ref_acervos[$cod_acervo_temp];
$link_capa_temp = $vetor_capa_acervos[$cod_acervo_temp];
$gera_773 = $vetor_gera_773[$cod_acervo_temp];
$gera_exemplar = $vetor_gera_exemplar[$cod_acervo_temp];
$tot_exemplares = $vetor_tot_exemplares[$cod_acervo_temp];
$possui_out_titulos = $vetor_possui_out_titulos[$cod_acervo_temp];
$possui_doc_online = $vetor_possui_doc_online[$cod_acervo_temp];
$qtde_comentarios = $vetor_qtde_comentarios[$cod_acervo_temp];
$isbn_issn = $vetor_isbn_issn[$cod_acervo_temp];
$controla_detalhes_autoridade = $vetor_controla_detalhes_autoridade[$cod_acervo_temp];
if(trim($vetor_total_titulos) != null)
$tot_temp = $vetor_total_titulos[$cod_acervo_temp];
if($intervalo_fim < $j){
$j = count($vetor_de_acervos)+1;
continue;
}
if(!$f->coleta_dados_consulta_acervo($conexao2,$cod_empresa,$cod_acervo_temp,5,$linked_server))
return "
".$arr_idioma['erro_grava_contador_listas']." ";
//return "
Ocorreu um erro ao gravar o contador de Acessos em listas no Site ";
//FIM DIFERENÇA PRIMEIRA PÁGINA
if($qtde_comentarios==0)
$qtde_comentarios=" ";
if($color){
$cor = "pmu_dados1";
$color = false;
}
else{
$cor = "pmu_dados2";
$color = true;
}
if($ehnumero == false || trim($pesquisa_por_codigo)=="A"){
if($array_de_extensoes==null){
if(!$conexao2->execProcRetorno("$linked_server spwper_busca_tabela_dados","$cod_empresa,250"))
return msg_retorno_formatado($conexao2->getErro());
//return "
".$conexao2->getErro()." ";
while($reg_tab = $conexao2->move_proximo())
$array_de_extensoes[strtoupper($reg_tab["codigo"])] = substr($reg_tab["descricao"] , 0, -4);
//$array_de_extensoes[strtoupper($reg_tab["codigo"])] = $reg_tab["descricao"];
$conexao2->fechaExecQueryProc();
}
//DOCUMENTO ONLINE 2
if($array_de_extensoes!=null && strtoupper(trim($possui_doc_online))=="S"){
if(!$conexao4->execProcRetorno("$linked_server spwper_busca_links856","$cod_empresa,$cod_acervo_temp"))
return msg_retorno_formatado($conexao4->getErro());
$total_retorno_links = $conexao4->totalLinhas();
$seq_paragrafo_anterior = -1;
if($total_retorno_links == 2){
$desc_link_url="";
$target_momento = "target='_blank' rel= 'noopener' ";
while($reg_link = $conexao4->move_proximo()){
$seq_paragrafo_atual = $reg_link["seq_paragrafo"];
if($seq_paragrafo_anterior>0)
if($seq_paragrafo_anterior != $seq_paragrafo_atual){
$concatena_links_856 = "
";
continue;
}
$secao_link = strtolower($reg_link["secao"]);
if($secao_link=="q"){
$desc_link_url = $reg_link["descricao"];
if(trim($desc_link_url)=="")
$desc_link_url = $reg_link["texto_descricao"];
}
elseif($secao_link=="u"){
$url_link = $reg_link["descricao"];
if(trim($url_link)=="")
$url_link = $reg_link["texto_descricao"];
}
elseif($secao_link=="z"){
$reconhecer_ico = "";
if(strtolower(trim($reg_link["descricao"]))=="acesso restrito" || strtolower(trim($reg_link["descricao"]))=="acesso restrito - visualizar" || strtolower(trim($reg_link["descricao"]))=="acessibilidade"){
if(trim($url_link)!=""){
$reconhecer_ico = trim($url_link);
//Confirmação Login - Ebooks 2
if((trim($s_codigopessoa)!="")&&($confirma_login == false))
$url_link = "javascript: valida_permissao_ebook($cod_acervo_temp, '".base64_encode(trim($url_link))."')";
else
$url_link = "javascript: acesso_acessibilidade('$protocolo_s://$server_s/biblioteca_s/acesso_login.php?cod_acervo_acessibilidade=$cod_acervo_temp&acesso=".base64_encode(trim($url_link))."&label=".strtolower(trim($reg_link["descricao"]))."');";
$target_momento = "";
//Se for acessibilidade usa classe de icone de acessibilidade, caso contrário usa class de icone restrito
//$class_acessibilidade_restrito = (strtolower(trim($reg_link["descricao"]))=="acessibilidade")?"btn_ace":"btn_restrito";
$desc_tipo_doc = trim($reg_link["descricao"]);
}
}
}
$seq_paragrafo_anterior = $seq_paragrafo_atual;
}
$extensao_encontrada = "";
$array_chaves = array_keys($array_de_extensoes);
for($r=0;$r 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
else{
if(strpos(strtoupper($url_link),$array_chaves[$r]) > 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
}
if(trim($extensao_encontrada)!=""){
$icone_definitivo = $array_de_extensoes[$extensao_encontrada];
if(trim($desc_link_url)!="")
$desc_link_url = $arr_idioma['titulo'].": ".$desc_link_url."\n";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ."$extensao_encontrada / $url_link!'";
}
else{
//CLARETIANO 2.1
if($cod_empresa == 325){
if(strpos($url_link,"/multimidia/"))
$icone_definitivo = "icone_video";
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
if(trim($concatena_links_856)==""){
if(trim($target_momento) == ""){
//if(strtolower($desc_tipo_doc)=="acessibilidade")
// $icone_definitivo = "btn_acessibilidade";
//Se for acessibilidade usa classe de icone de acessibilidade, caso contrário usa class de icone identificado
if(strtolower($desc_tipo_doc)=="acessibilidade"){
$icone_definitivo = "icone_ace";
$title_acesso_restrito_ou_acessibilidade = $arr_idioma['title_acervo_acessibilidade'];
}
if(strtolower($desc_tipo_doc)=="acesso restrito" || strtolower($desc_tipo_doc)=="acesso restrito - visualizar"){
$title_acesso_restrito_ou_acessibilidade = $arr_idioma['title_acervo_restrito'];
$concatena_links_856 = "
";
}else{
//$concatena_links_856 = "
";
$concatena_links_856 = "
";
}
}
else{
$insere_httpPUC = "";
if($cod_empresa==1){
$temHttpd = strpos($url_link,"http");
if($temHttpd === false)
$insere_httpPUC = "sumario_img.php?link=";
}
/* Foi retirado o if empresa, Atendimento 78333. Thiago */
//if($cod_empresa==341)
//$url_link = urlencode($url_link); //é usado qdo o cadastro da URL está no formato errado
$insere_httpPUC = trim($insere_httpPUC);
$url_link = trim($url_link);
if(strpos($url_link, 'Vínculo no banco') !== false)
$url_link = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_atual¶grafo=856&tipo_vinculo=B";
$concatena_links_856 = "
";
}
}
}
else{
if($total_retorno_links == 1){
$reg_link = $conexao4->move_proximo();
$secao_link = strtolower($reg_link["secao"]);
if($secao_link=="u"){
$url_link = $reg_link["descricao"];
if(trim($url_link)=="")
$url_link = $reg_link["texto_descricao"];
$extensao_encontrada = "";
$array_chaves = array_keys($array_de_extensoes);
for($r=0;$r 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else{
if(strpos(strtoupper($url_link),$array_chaves[$r]) > 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
}
else{
if(strpos(strtoupper($url_link),$array_chaves[$r]) > 0){
$extensao_encontrada = $array_chaves[$r];
$r = count($array_chaves)+1;
}
else
$extensao_encontrada = "";
}
}
if(trim($extensao_encontrada)!=""){
$icone_definitivo = $array_de_extensoes[$extensao_encontrada];
//$tip_extensao = "title='".$arr_idioma['arquivo_formato']."$extensao_encontrada / $url_link!'";
}
else{
//CLARETIANO 2.2
if($cod_empresa == 325){
if(strpos($url_link,"/multimidia/"))
$icone_definitivo = "icone_video";
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
else{
$icone_definitivo = "icone_on_line";
//$tip_extensao = "title='$desc_link_url". $arr_idioma['arquivo_formato'] ." WWW / $url_link!'";
}
}
$insere_httpPUC = "";
if($cod_empresa==1){
$temHttpd = strpos($url_link,"http");
if($temHttpd === false)
$insere_httpPUC = "sumario_img.php?link=";
}
//if($cod_empresa==341)
//$url_link = urlencode($url_link);
$insere_httpPUC = trim($insere_httpPUC);
$url_link = trim($url_link);
if(strpos($url_link, 'Vínculo no banco') !== false)
$url_link = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_atual¶grafo=856&tipo_vinculo=B";
$concatena_links_856 = "
";
}
}
if($total_retorno_links > 2)
$concatena_links_856 = "
";
}
$conexao4->fechaExecQueryProc();
}
if(trim($concatena_links_856)=="")
$expandir_coluna = "colspan='2'";
else
$expandir_coluna = "";
$codigo_acervo_tela = $cod_acervo_temp;
include("nav_layer_menu.php"); //Menu - guias e variáveis de permissões
if($permissaoIPImprimirClass && $mostra_botao_bematech)
$conteudo_objeto_imprime_classificacao = "
";
else
$conteudo_objeto_imprime_classificacao = " ";
//$conteudo_dados = $conteudo_dados."
//FIM DIFERENÇA PRIMEIRA PÁGINA - $j
$conteudo_dados = $conteudo_dados."
$conteudo_objeto_imprime_classificacao
$concatena_links_856
";
if(trim($link_capa_temp)==""){
$conteudo_dados = $conteudo_dados." ";
}else{
if(strpos($link_capa_temp, 'Vínculo no banco') !== false){
$url_capa_tela = "./monta_vinculo.php?cod=$cod_acervo_temp&seq_paragrafo=$seq_paragrafo_capa¶grafo=856&tipo_vinculo=B";
$capa_js = "";
$capa_js = "window.open('fotos.php?cod_acervo=$cod_acervo_temp','fotos_capa','status=yes,scrollbars=yes,resizable=yes,width=800,height=600');";
if($cod_empresa==1){
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}else{
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
}else{
$tem_mais_capas = substr($link_capa_temp,0,1); //S ou N
$url_capa_tela = substr($link_capa_temp,1,strlen($link_capa_temp)-1);
$capa_js = "";
//if(strtoupper($tem_mais_capas)=="S")
$capa_js = "window.open('fotos.php?cod_acervo=$cod_acervo_temp','fotos_capa','status=yes,scrollbars=yes,resizable=yes,width=800,height=600');";
if($cod_empresa==1){
/*if($capa_js=="")
$conteudo_dados = $conteudo_dados."";
else*/
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}else{
/*if($capa_js=="")
$conteudo_dados = $conteudo_dados."";
else*/
if(strtoupper($tem_mais_capas)=="S")
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
}
}
if($codMat_selec == 10 && $pesq_por_codigo_valor == '' ){
$titulo_temp = str_replace("\""," ",$titulo_temp);
$titulo_temp = str_replace("'"," ",$titulo_temp);
$conteudo_dados = $conteudo_dados."
$titulo_temp
$text
";
}
else{
//Se for a primeira página de resultados da consulta
//MUSEU 2.1
/*
* AT03 3
* Alteração de highlight (semente)
* begin
*
*/
if($t_p_i_select != "38"){
$termo_pesquisa_highlight = explode(" ", $termo_pesquisa);
//Para cada palavra é verificado em todos os campos (titulo, descricao de obra e referencia)
foreach($termo_pesquisa_highlight as $value){
//AT03
$titulo_temp = highlight($value, $titulo_temp);
$desc_tipo_obra_ref = highlight($value, $desc_tipo_obra_ref);
$text = highlight($value, $text);
}
$termo_pesquisa_highlight = "";
/* end AT03 semente */
}
if(strtoupper(trim($gera_exemplar))=='M')
$conteudo_dados = $conteudo_dados."
$text
".$desc_tipo_obra_ref." - ".$arr_idioma['detalhes']."
Ac.$cod_acervo_temp
";
else
$conteudo_dados = $conteudo_dados."
$titulo_temp - $desc_tipo_obra_ref
$text
";
}
//trim($classificacao)!="" && trim($classificacao)!="consultar" alterado para apresentar o consultar em mais de um 90 by vt e jrs 07/06/2019
if(trim($classificacao)!=""){
$conteudo_dados = $conteudo_dados."
";
if(strtoupper(trim($gera_exemplar))=='A' || strtoupper(trim($gera_exemplar))=='M') //Se arquivo
$conteudo_dados = $conteudo_dados.$arr_idioma['localizacao'];
else
$conteudo_dados = $conteudo_dados.$arr_idioma['numero_chamada'];
$conteudo_dados = $conteudo_dados.": ".ucfirst($classificacao)."
";
}
else
$conteudo_dados = $conteudo_dados." ";
/*
if(!$conexao4->execQueryRetorno("select count(*) as total
from $linked_server acervo_geral
where cod_empresa=$cod_empresa
and cod_acervo=$cod_acervo_temp
and cod_tipo_obra in(select cod_tipo_obra
from $linked_server tipo_obra
where cod_empresa=$cod_empresa
and gera_exemplar in('A','M')
and exibe_consulta='S')"))
return msg_retorno_formatado($conexao4->getErro());
$resultset = $conexao4->move_proximo();
$total_arquivo = $resultset["total"];
$conexao4->fechaExecQueryProc();
*/
if(strtoupper(trim($gera_exemplar))=='A' || strtoupper(trim($gera_exemplar))=='M') //Se arquivo
$total_arquivo=1;
else
$total_arquivo=0;
$conteudo_dados = $conteudo_dados."
";
include("../compartilhado/acervo_index.php");
$conteudo_dados .= " ";
//QRCODE
$conteudo_dados .= "
";
//BARRA DOS LINKS [2/2] - Se NÃO for a primeira página de resultados da consulta
if(strtoupper(trim($gera_exemplar))!="M" || $cod_empresa == 636){
$conteudo_dados .= "".$arr_idioma['acervo'].": $cod_acervo_temp
";
if($mostra_botao_detalhes)
$conteudo_dados .= "
";
if($mostra_comentarios)
$conteudo_dados .= "$qtde_comentarios
";
if($localizacao)
$conteudo_dados .= "
";
$conteudo_dados .= "
";
if(trim($isbn_issn)!="" && $mostra_link_comprar)
$conteudo_dados .= "".$arr_idioma['comprar_online']."
";
$conteudo_dados .= "";
if($mostra_exemplares && $gera_exemplar_verifica!="N" && (!($tot_exemplares==0 && $gera_exemplar_verifica=="E"))){
if($total_arquivo==0)
$conteudo_dados .= "
".$arr_idioma['exemplares']." ";
else
$conteudo_dados .= "
".$arr_idioma['itens']." ";
}
if($mostra_referencia)
$conteudo_dados .= "
|
".$arr_idioma['referencia']." ";
if($mostra_marc)
$conteudo_dados .= "
|
".$arr_idioma['marc']." ";
if($mostra_dublin_core)
$conteudo_dados .= "
|
".$arr_idioma['dublin_core']." ";
if($mostra_colecao && $temKardex && $gera_exemplar_verifica!="N")
$conteudo_dados .= "
|
".$arr_idioma['colecao_kardex']." ";
if($mostra_sumario)
$conteudo_dados .= "
|
".$arr_idioma['sumarios_online']." ";
if($mostra_reserva && $reserva_mostra && $total_exemplares_normal>=1)
$conteudo_dados .= "
|
".$arr_idioma['reserva']." ";
if($mostra_req_material)
$conteudo_dados .= "
|
$desc_req_material ";
if($armazem_mostra)
if($permissaoIPArmazem)
$conteudo_dados .= "
|
".$denominacao_armazem." ";
if($permissaoIPImprimirClass)
$conteudo_dados .= "
|
$label_temp ";
}
//LINK MUSEU 2
// if(strtoupper(trim($gera_exemplar))=='M') //Se Museu
// {
if(!$conexao4->execQueryRetorno("
select distinct td.codigo, td.descricao, td.descricao_adicional2
from $linked_server acervo_link al, $linked_server tabela_dados td
where al.cod_empresa = $cod_empresa
and al.cod_acervo = $cod_acervo_temp
and td.cod_tabela = 337
and td.cod_empresa = al.cod_empresa
and td.codigo = al.cod_tipo_d337"))
return msg_retorno_formatado($conexao4->getErro());
while($resultset = $conexao4->move_proximo()){
$link_codigo = $resultset["codigo"];
$link_descricao = $resultset["descricao"];
$link_mostra = $resultset["descricao_adicional2"];
if($link_mostra == 'S'){
//if(strtoupper(trim($gera_exemplar))!="M") //Exemplar do tipo museu pode ter mais de um link (exposição, objeto relacionado, etc) precisando ter a barra de divisão
$conteudo_dados .= "
| ";
$conteudo_dados .= "
$link_descricao ";
}
}
$conexao4->fechaExecQueryProc();
//FIM LINK MUSEU
// }
$conteudo_dados .= "
";
//FIM BARRA DOS LINKS
$conteudo_dados .= "
";
$nome_div_mostra="div_resultados";
}
else{
if(trim($tot_temp)!="")
$tot_temp_tem_conteudo = " ($tot_temp)";
//$tot_temp_tem_conteudo = " - ".$arr_idioma['titulos'].": $tot_temp";
else
$tot_temp_tem_conteudo = "";
if($controla_detalhes_autoridade)
$link_remissiva = " - ".$arr_idioma['visualizar_detalhes']." ";
else
$link_remissiva = "";
if($pesq_por_codigo_valor == ''){
$titulo_temp = str_replace("\""," ",$titulo_temp);
$titulo_temp = str_replace("'"," ",$titulo_temp);
$conteudo_dados = $conteudo_dados."";
}
else{
//MUSEU 2.2
/*
* AT03 4
* Alteração de highlight (semente)
* begin
*
*/
if($t_p_i_select != "38"){
$termo_pesquisa_highlight = explode(" ", $termo_pesquisa);
//Para cada palavra é verificado em todos os campos (titulo, descricao de obra e referencia)
foreach($termo_pesquisa_highlight as $value){
//AT03
$titulo_temp = highlight($value, $titulo_temp);
$desc_tipo_obra_ref = highlight($value, $desc_tipo_obra_ref);
$text = highlight($value, $text);
}
$termo_pesquisa_highlight = "";
/* end AT03 semente */
}
if(strtoupper(trim($gera_exemplar))=='M')
$conteudo_dados = $conteudo_dados."";
else
$conteudo_dados = $conteudo_dados."";
}
//$nome_div_mostra="div_resultados_intermediario";
$nome_div_mostra="div_resultados";
}
} //fim for
if(trim($conteudo_dados)!="")
$conteudo_dados = $conteudo_dados."";
if(($mostra_cesta) || ($s_estacio_sgc == "projeto_estacio_sgc")){
$conteudo_dados = $conteudo_dados."";
}
if($mostra_outras_redes_redepergamum)
$conteudo_dados = $conteudo_dados."
";
if($mostra_ebsco_eds)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_livrarias)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_oai_geral)
$conteudo_dados = $conteudo_dados."
";
if($mostra_pesq_oai_local)
$conteudo_dados = $conteudo_dados."
";
if($mostra_gedweb)
$conteudo_dados = $conteudo_dados."";
if($mostra_abnt)
$conteudo_dados = $conteudo_dados."";
$conteudo_dados = $conteudo_dados."
";
$conteudo_dados = $conteudo_dados."
";
}
//AQUI3
else{
if($numero_pag == 0 && trim($termo_pesquisa)!="" && trim($detalhes_query)!=""){
$conexao5 = new PergamumBanco($usuario,$senha,$alias_database,$plataforma_web,$banco_de_dados,$porta_banco_de_dados,$database_name);
if(!$conexao5->conectar())
return "
".$arr_idioma['erro_conectar']." ";
$detalhes_query = str_replace("'","\"",$detalhes_query);
$time_end_conteudo = microtime(1);
$time_consulta_conteudo = $time_end_conteudo - $time_start_conteudo;
if($time_consulta_proc>0 && $time_consulta_conteudo>0)
if(!$conexao5->execProc("$linked_server spwper_gravar_pesquisa_usuario","$cod_empresa,$cod_pessoa_proc,'$termo_pesquisa','$detalhes_query',$total_linhas,3,$cod_atividade_tela,".((strtolower($banco_de_dados)=="sybase")? str_replace(".","",sprintf("%02.2f",$time_consulta_proc)) : sprintf("%02.2f",$time_consulta_proc)).",".((strtolower($banco_de_dados)=="sybase")? str_replace(".","",sprintf("%02.2f",$time_consulta_conteudo)) : sprintf("%02.2f",$time_consulta_conteudo))))
return msg_retorno_formatado($conexao5->getErro());
$conexao5->fechaExecQueryProc();
}
return msg_retorno_formatado($arr_idioma['nenhum_registro_cadastrado']);
}
if(count($vetor_de_acervos) > (int)$registros_por_pagina){
$result_div = count($vetor_de_acervos)/$registros_por_pagina;
settype($result_div,"integer");
$total_pags = $result_div;
$result_mod = count($vetor_de_acervos)%$registros_por_pagina;
if((int)$result_mod > 0)
$total_pags += 1;
$str_paginas = "";
$pula_linha_cont = 1;
for($i=1;$i<=$total_pags;$i++){
/*if($pula_linha_cont==30){
$pula_linha_pag = " ";
$pula_linha_cont=1;
}
else*/
//$pula_linha_pag = "";
if($numero_pag == 0){
if($i==1){
$i_prox = $i;
$i_prox++;
if($i_prox<=$total_pags)
$str_proximo = "".$arr_idioma['proxima']." » ";
$str_paginas .= "$i ";//$pula_linha_pag";
}
else
$str_paginas .= "$i ";//$pula_linha_pag";
}
else{
if($i==$numero_pag){
$i_ant = $i;
$i_ant--;
$str_anterior = "« ".ucfirst(strtolower($arr_idioma['anterior']))." ";
$i_prox = $i;
$i_prox++;
if($i_prox<=$total_pags)
$str_proximo = "".$arr_idioma['proxima']." » ";
$str_paginas .= "$i ";//$pula_linha_pag";
}
else{
$str_paginas .= "$i ";//$pula_linha_pag";
}
}
$pula_linha_cont++;
}
$i--;
if($str_anterior=="")
$str_anterior = "« ".ucfirst(strtolower($arr_idioma['anterior']))." ";
if($str_proximo=="")
$str_proximo = "".$arr_idioma['proxima']." » ";
$conteudo_dados = $conteudo_dados."
";
$conteudo_dados = str_replace("str_conteudo_paginas","".$arr_idioma['primeira_pagina']." $str_anterior $intervalo_inicio-$intervalo_fim $str_proximo ".$arr_idioma['ultima_pagina']." ",$conteudo_dados);
}
else{
$conteudo_dados = $conteudo_dados." ";
$conteudo_dados = str_replace("str_conteudo_paginas","",$conteudo_dados);
}
$conteudo_dados = $conteudo_dados."
";
if($numero_pag == 0){
$conexao->fechaExecQueryProc();
if($chamou_spwper_consultas_postgresql)
$conexao_postgresql->fechaExecQueryProc();
}
$_SESSION["vetor_de_acervos"]=$vetor_de_acervos;
$_SESSION["vetor_titulo_acervos"]=$vetor_titulo_acervos;
$_SESSION["vetor_total_titulos"]=$vetor_total_titulos;
$_SESSION["total_linhas"]=$total_linhas;
$_SESSION["registros_por_pagina"]=$registros_por_pagina;
$_SESSION["pesquisa_por_codigo"]=$pesquisa_por_codigo;
$_SESSION["ehnumero"]=$ehnumero;
$_SESSION["tipo_p"]=$tipo_p;
$_SESSION["vetor_referencia_acervos"]=$vetor_referencia_acervos;
$_SESSION["vetor_classificacao_acervos"]=$vetor_classificacao_acervos;
$_SESSION["vetor_desc_tipo_obra_ref_acervos"]=$vetor_desc_tipo_obra_ref_acervos;
$_SESSION["controla_detalhes_autoridade"]=$controla_detalhes_autoridade;
$_SESSION["vetor_capa_acervos"]=$vetor_capa_acervos;
$_SESSION["vetor_gera_773"]=$vetor_gera_773;
$_SESSION["vetor_gera_exemplar"]=$vetor_gera_exemplar;
$_SESSION["vetor_tot_exemplares"]=$vetor_tot_exemplares;
$_SESSION["vetor_possui_out_titulos"]=$vetor_possui_out_titulos;
$_SESSION["vetor_possui_doc_online"]=$vetor_possui_doc_online;
$_SESSION["vetor_qtde_comentarios"]=$vetor_qtde_comentarios;
$_SESSION["vetor_isbn_issn"]=$vetor_isbn_issn;
//if(strtolower($banco_de_dados)!="sybase")
if($numero_pag == 0 && trim($termo_pesquisa)!="" && trim($detalhes_query)!=""){
$conexao5 = new PergamumBanco($usuario,$senha,$alias_database,$plataforma_web,$banco_de_dados,$porta_banco_de_dados,$database_name);
if(!$conexao5->conectar())
return "
".$arr_idioma['erro_conectar']." ";
$detalhes_query = str_replace("'","\"",$detalhes_query);
//$detalhes_query = str_replace("\"","",$detalhes_query);
$time_end_conteudo = microtime(1);
$time_consulta_conteudo = $time_end_conteudo - $time_start_conteudo;
//if(strtolower(trim($banco_de_dados))=="oracle"){
if($time_consulta_proc>0 && $time_consulta_conteudo>0)
if(!$conexao5->execProc("$linked_server spwper_gravar_pesquisa_usuario","$cod_empresa,$cod_pessoa_proc,'$termo_pesquisa','$detalhes_query',$total_linhas,3,$cod_atividade_tela,".((strtolower($banco_de_dados)=="sybase")? str_replace(".","",sprintf("%02.2f",$time_consulta_proc)) : sprintf("%02.2f",$time_consulta_proc)).",".((strtolower($banco_de_dados)=="sybase")? str_replace(".","",sprintf("%02.2f",$time_consulta_conteudo)) : sprintf("%02.2f",$time_consulta_conteudo))))
return msg_retorno_formatado($conexao5->getErro());
//return "
".$conexao5->getErro()." ";
//}
/*else{
if(!$conexao5->execProc("spwper_gravar_pesquisa_usuario","$cod_empresa,$cod_pessoa_proc,'$termo_pesquisa',\"$detalhes_query\",$total_linhas,3,$cod_atividade_tela,".sprintf("%02.2f",$time_consulta_proc).",".sprintf("%02.2f",$time_consulta_conteudo)))
return "
".$conexao5->getErro()."
";
}*/
$conexao5->fechaExecQueryProc();
}
//$handle = fopen("conteudo.txt","w");
//fwrite($handle,$conteudo_dados."@MCL@".$nome_div_mostra);
//fclose($handle);
return $conteudo_dados."@MCL@".$nome_div_mostra;
}
function ajax_adiciona_cesta($acervo_selec)
{
if(trim($acervo_selec)=="")
exit;
global $cesta_acervos;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$existe = false;
$vetor_de_acervos_marc = explode("@#!",$cesta_acervos);
for($j=1;$j
X
";
return $conteudo_filtro;
}
function ajax_tipo_p_i($t_p_i,$control){
if(trim($t_p_i)=="")
exit;
global $cod_empresa,$conexao;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
global $arr_idioma;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$conteudo_t_p_i = "";
if(($t_p_i=="palavra")||($t_p_i=="similar")){
//if(trim($control)=="1")
$marca = "selected";
//else
//$marca = "";
$conteudo_t_p_i = "
".$arr_idioma['titulo']."
".$arr_idioma['assunto']."
".$arr_idioma['autor']."
".$arr_idioma['livre']."
";
return $conteudo_t_p_i;
}
if($t_p_i=="indice"){
if(!$conexao->execProcRetorno("$linked_server s_parametro_con_indice","$cod_empresa")){
$conteudo_t_p_i = "".$conexao->getErro()." ";
return $conteudo_t_p_i;
}
$conteudo_t_p_i = "";
while($resultset = $conexao->move_proximo()){
$cod_opcao_temp = $resultset["cod_opcao"];
//if(($resolution=="1024" || $resolution=="1024_1" || $resolution=="1024_2"))
//$desc_opcao_temp = substr($resultset["descricao"],0,19);
$desc_opcao_temp = $resultset["descricao"];
//else
//$desc_opcao_temp = substr($resultset["descricao"],0,11);
$conteudo_t_p_i .= "$desc_opcao_temp ";
}
$conexao->fechaExecQueryProc();
$conteudo_t_p_i .= " ";
return $conteudo_t_p_i;
}
}
function ajax_monta_sumario($url_sumario)
{
if(trim($url_sumario)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$conteudo_sumario = "";
return $conteudo_sumario;
}
function ajax_consulta_quadro_class()
{
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server, $arr_idioma;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$conteudo_temp = "X
".$arr_idioma['selecione']."... ";
if(!$conexao->execQueryRetorno("select distinct t.*
from $linked_server acesso_usuario_grupo_area a,
$linked_server tipo_area_conhecimento t, $linked_server grupo_area g
where a.cod_empresa = $cod_empresa
and t.cod_empresa = a.cod_empresa
and g.cod_empresa = t.cod_empresa
and a.cod_pessoa = $cod_pessoa_proc
and g.cod_grupo = a.cod_grupo
and t.cod_tipo_area_conhec = g.cod_tipo_area_conhecimento
order by t.desc_tipo_area_conhec"))
return $conexao->getErro();
while($resultset = $conexao->move_proximo())
{
$cod_tipo_area_conhec = $resultset["cod_tipo_area_conhec"];
$desc_tipo_area_conhec = trim($resultset["desc_tipo_area_conhec"]);
$conteudo_temp .= "$cod_tipo_area_conhec - $desc_tipo_area_conhec ";
}
$conexao->fechaExecQueryProc();
$conteudo_temp .= "
";
return $conteudo_temp;
}
function ajax_mostra_menu_class($cod_tipo_area_conhecimento)
{
if(trim($cod_tipo_area_conhecimento)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server;
//Medida de segurança 139751
settype($cod_tipo_area_conhecimento,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if(!$conexao->execProcRetorno("$linked_server spwper_par_arv_area_grupo","$cod_empresa,$cod_tipo_area_conhecimento,null,$cod_pessoa_proc,-1,1"))
return $conexao->getErro();
$conteudo_temp = "
";
while($resultset = $conexao->move_proximo())
{
$cod_area_conhecimento = $resultset["cod_area_conhecimento"];
$desc_area_conhecimento = trim($resultset["desc_area_conhecimento"]);
$tem_filho = trim($resultset["tem_filho"]);
$cod_nivel_permissao = $resultset["cod_nivel_permissao"];
$descricao_nivel = $resultset["descricao_nivel"];
if(strtoupper($tem_filho)=="S")
{
$nome_class="tesauro_mais";
$sinal_temp="+";
}
else
{
$nome_class="tesauro_menos";
$sinal_temp=" ";
}
$conteudo_temp .= "
$cod_area_conhecimento - $desc_area_conhecimento
";
}
$conexao->fechaExecQueryProc();
return $conteudo_temp;
}
function ajax_mostra_class_filho($cod_tipo_area_conhecimento_tela, $area_conhecimento_aux_tela)
{
if(trim($cod_tipo_area_conhecimento_tela)=="" && trim($area_conhecimento_aux_tela)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server;
//Medida de segurança 139751
settype($cod_tipo_area_conhecimento_tela,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if(!$conexao->execProcRetorno("$linked_server spwper_par_arv_area_grupo","$cod_empresa,$cod_tipo_area_conhecimento_tela,'$area_conhecimento_aux_tela',$cod_pessoa_proc,-1,1"))
return $conexao->getErro();
$conteudo_temp = "";
while($resultset = $conexao->move_proximo())
{
$cod_area_conhecimento = $resultset["cod_area_conhecimento"];
$desc_area_conhecimento = trim($resultset["desc_area_conhecimento"]);
$tem_filho = trim($resultset["tem_filho"]);
$cod_nivel_permissao = $resultset["cod_nivel_permissao"];
$descricao_nivel = $resultset["descricao_nivel"];
if(strtoupper($tem_filho)=="S")
{
$nome_class="tesauro_mais";
$sinal_temp="+";
}
else
{
$nome_class="tesauro_menos";
$sinal_temp=" ";
}
$conteudo_temp .= "
$cod_area_conhecimento - $desc_area_conhecimento
";
}
$conexao->fechaExecQueryProc();
$vet_dados[0] = $area_conhecimento_aux_tela;
$vet_dados[1] = $conteudo_temp;
return $vet_dados;
}
function ajax_resultado_class($cod_tipo_area_conhec,$cod_area_conhec,$desc_area_conhec,$cod_nivel_permissao_area)
{
if(trim($cod_area_conhec)=="" && trim($cod_tipo_area_conhec)=="" && trim($desc_area_conhec)=="" && trim($cod_nivel_permissao_area)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server, $arr_idioma;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$junta_parametros = trim($cod_area_conhec)."|".$cod_tipo_area_conhec;
//Nível 1 passa 35
// return "spwper_consultas $cod_empresa,',',',','35','','$junta_parametros','','','','','','','-1',0,0,'-1','-1',-1,'-1','-1','N','N',$cod_pessoa_proc,'obra','null','','-1'";
if(!$conexao->execProcRetorno("$linked_server spwper_consultas","$cod_empresa,',',',','35','','$junta_parametros','','','','','','','-1',0,0,'-1','-1',-1,'-1','-1','N','N',$cod_pessoa_proc,'obra','null','','-1'"))
return "";
if($conexao->totalLinhas() == 0)
return " ".$arr_idioma['nao_existe_registro_com_filtro']."
";
$conteudo_temp = "";
$nome_class = "pmu_dados1";
while($resultset = $conexao->move_proximo())
{
$cod_acervo = $resultset["cod_acervo"];
$referencia = trim($resultset["referencia"]);
$desc_tipo_obra = trim($resultset["desc_tipo_obra"]);
$tem_773_relacionado = strtoupper(trim($resultset["tem_773_relacionado"]));
$arquivos_indexar = strtoupper(trim($resultset["arquivo_indexar"]));
$gera_773 = $resultset["gera_773"];
$nome_css = $resultset["icone"];
if(strtoupper(trim($gera_773))=="N")
{
if($tem_773_relacionado=="S" || $arquivos_indexar=="S")
{
$var_temp_dados = urlencode("$referencia - $desc_tipo_obra");
$mostra_mais = "+";
$js_evento = "style='cursor:pointer;' onClick=\"mostra_relacao_indexar($cod_acervo,$cod_nivel_permissao_area);\"";
$chama_inserir = " ";
}
else
{
$mostra_mais = " ";
$js_evento = "";
$chama_inserir = "";
}
if($cod_nivel_permissao_area==1 || $cod_nivel_permissao_area==2)
$chama_inserir = "";
$conteudo_temp .= "";
if($nome_class == "pmu_dados1")
$nome_class = "pmu_dados2";
else
$nome_class = "pmu_dados1";
}
}
$conexao->fechaExecQueryProc();
return $conteudo_temp;
}
function ajax_relacao_indexar($cod_acervo_indexar, $cod_nivel_permissao_area, $cod_tipo_area_conhec)
{
if(trim($cod_acervo_indexar)=="" && trim($cod_nivel_permissao_area)=="" && trim($cod_tipo_area_conhec)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server, $arr_idioma;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$conteudo1="";
$conteudo2="";
//Nível 2 passa 36
if(!$conexao->execProcRetorno("$linked_server spwper_consultas","$cod_empresa,',',',','36','','$cod_acervo_indexar','','','','','','','-1',0,0,'-1','-1',-1,'-1','-1','N','N',$cod_pessoa_proc,'obra','null','','-1'"))
{
$vet_indexar[0]=$cod_acervo_indexar;
$vet_indexar[1]="";
$vet_indexar[2]="";
return $vet_indexar;
}
while($resultset = $conexao->move_proximo())
{
$cod_acervo = $resultset["cod_acervo"];
$referencia = trim($resultset["referencia"]);
$desc_tipo_obra = trim($resultset["desc_tipo_obra"]);
$tem_773_relacionado = strtoupper(trim($resultset["tem_773_relacionado"]));
$arquivos_indexar = strtoupper(trim($resultset["arquivo_indexar"]));
$nome_css = $resultset["icone"];
if($tem_773_relacionado=="S" || $arquivos_indexar=="S")
{
$var_temp_dados = urlencode("$referencia - $desc_tipo_obra");
$mostra_mais = "+";
$js_evento = "style='cursor:pointer;' onClick=\"mostra_relacao_indexar($cod_acervo,$cod_nivel_permissao_area);\"";
$chama_inserir = " ";
}
else
{
$mostra_mais = " ";
$js_evento = "";
$chama_inserir = "";
}
if($cod_nivel_permissao_area==1 || $cod_nivel_permissao_area==2)
$chama_inserir = "";
$conteudo1 .= " ";
$conteudo2 .= " ";
}
$conexao->fechaExecQueryProc();
$vet_indexar[0]=$cod_acervo_indexar;
$vet_indexar[1]=$conteudo1;
$vet_indexar[2]=$conteudo2;
return $vet_indexar;
}
function ajax_tela_inserir_material($cod_acervo_select,$descricao_select,$cod_tipo_area_conhecimento_select)
{
if(trim($cod_acervo_select)=="" && trim($descricao_select)=="" && trim($cod_tipo_area_conhecimento_select)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$vetor_de_acervos,$conexao_postgresql;
global $linked_server, $arr_idioma;
//Medida de segurança 139751
settype($cod_tipo_area_conhecimento_select,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
$conteudo_parte1 = "";
$cod_acervo_select_niveis = $cod_acervo_select;
if(trim($descricao_select)!="")
{
$descricao_select = urldecode($descricao_select);
$conteudo_parte1 = "
".$arr_idioma['material_principal'].":
";
}
if(trim($descricao_select)=="")
$cod_acervo_select_niveis = 0;
$conteudo_temp = "
".$arr_idioma['criacao_novo_material']."
$conteudo_parte1
Tipo de material:
";
if(!$conexao->execProcRetorno("$linked_server spwper_tipo_obra_s","$cod_empresa,'A'"))
return "";
while($resultset = $conexao->move_proximo())
{
$cod_tipo_obra = $resultset["cod_tipo_obra"];
$desc_tipo_obra = trim($resultset["desc_tipo_obra"]);
$icone_obra = trim($resultset["icone"]);
if(trim($icone_obra)!="")
$conteudo_temp .= "$cod_tipo_obra - $desc_tipo_obra ";
}
$conexao->fechaExecQueryProc();
$conteudo_temp .= "
".$arr_idioma['nivel_autorizacao'].":
";
//Alteração Chin Lau 14/01/2013
if(!$conexao->execProcRetorno("$linked_server spwper_cat_busca_niveis","$cod_empresa,0,0"))
return "";
$cont_valida_nivel=0;
while($resultset = $conexao->move_proximo())
{
$codigo_nivel_temp = $resultset["codigo"];
$descricao_nivel_temp = trim($resultset["descricao"]);
$cont_valida_nivel++;
}
$conexao->fechaExecQueryProc();
if($cont_valida_nivel==1)
{
$conteudo_temp .= " $descricao_nivel_temp";
}
else
{
$conteudo_temp .= "
".$arr_idioma["todos"]."
";
}
//FIM alteração Chin Lau 14/01/2013
$conteudo_temp .= "
".$arr_idioma['unidade_informacao'].":
";
//Alteração Chin Lau 14/01/2013
if(!$conexao->execProcRetorno("$linked_server spwper_cat_bibliotecas_dis","$cod_empresa,$cod_pessoa_proc,$cod_tipo_area_conhecimento_select"))
return "";
$cont_valida_bib=0;
while($resultset = $conexao->move_proximo())
{
$codigo_bib_temp = $resultset["cod_biblioteca"];
$descricao_bib_temp = trim($resultset["desc_biblioteca"]);
$cont_valida_bib++;
}
$conexao->fechaExecQueryProc();
if($cont_valida_bib==1)
{
$conteudo_temp .= " $codigo_bib_temp - $descricao_bib_temp";
}
else
{
$conteudo_temp .= "
".$arr_idioma["todas"]."
";
}
//FIM alteração Chin Lau 14/01/2013
$conteudo_temp .= "
".$arr_idioma['titulo'].":
".$arr_idioma['autor'].":
".$arr_idioma['observacao'].":
";
return $conteudo_temp;
}
function ajax_mostra_niveis($tipo,$valores_selecionados,$eh_ato,$acervo_clicado)
{
if(trim($tipo)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
global $arr_idioma;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if(trim($valores_selecionados)=="," || trim($valores_selecionados)=="-1")
$valores_selecionados = "";
$desc_titulo = strtoupper($arr_idioma['niveis_autorizacao']); //Níveis de autorização
$atos_js = "";
$tipo = htmlentities($tipo, ENT_QUOTES); //alteração IBGE
$conteudo_filtro = "";
return $conteudo_filtro;
}
function ajax_mostra_bibs($tipo,$valores_selecionados,$eh_ato,$cod_tipo_area_conhec_clicado)
{
if(trim($tipo)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
global $arr_idioma,$denominacao_biblioteca;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if(trim($valores_selecionados)=="," || trim($valores_selecionados)=="-1")
$valores_selecionados = "";
$desc_titulo = strtoupper($denominacao_biblioteca);
$atos_js = "";
$tipo = htmlentities($tipo, ENT_QUOTES); // alteração IBGE
$conteudo_filtro = "";
return $conteudo_filtro;
}
function ajax_grava_novo_material_class($cod_tipo_area,$cod_obra,$cod_nivel,$biblio_class,$titulo_class_anexo,$anexo_url856u,$autor_class,$obs_class,$cod_area_conhec_tela,$codigo_acervo_tela,$diretorio,$nome_arquivo,$tamanho_arquivo)
{
if(trim($cod_obra)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
global $arr_idioma,$denominacao_biblioteca;
//Medida de segurança 139751
settype($cod_tipo_area,"int");
settype($cod_obra,"int");
settype($codigo_acervo_tela,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
// return "$linked_server spwper_cat_acervo_geral $cod_empresa,-1,$cod_obra,0,null,null,0,3,-1,$cod_pessoa_proc";
if(!$conexao->execProcRetorno("$linked_server spwper_cat_acervo_geral","$cod_empresa,-1,$cod_obra,0,null,null,0,3,-1,$cod_pessoa_proc,null"))
return $arr_idioma['erro']." 1: ".$conexao->getErro();
$acervo = $conexao->move_proximo();
$cod_acervo = $acervo['cod_acervo'];
$conexao->fechaExecQueryProc();
if(trim($biblio_class)=="" || trim($biblio_class)=="-1" || trim($biblio_class)==",")
$biblio_class="todos";
// return "$linked_server spwper_cat_ins_acervo_class $cod_empresa,$cod_acervo,'$cod_area_conhec_tela',$cod_tipo_area,'','','$biblio_class',$cod_pessoa_proc";
if(!$conexao->execProc("$linked_server spwper_cat_ins_acervo_class","$cod_empresa,$cod_acervo,'$cod_area_conhec_tela',$cod_tipo_area,'','','$biblio_class',$cod_pessoa_proc"))
return $arr_idioma['erro']." 2: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execQuery("delete $linked_server acervo_acesso_restrito
where cod_empresa = $cod_empresa
and cod_acervo = $cod_acervo"))
return $arr_idioma['erro']." 3: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
$cod_nivel = str_replace(",","",$cod_nivel);
//Medida de segurança 139751
settype($cod_nivel,"int");
if($cod_nivel!="")
{
if(!$conexao->execQuery("insert into $linked_server acervo_acesso_restrito
(cod_empresa,cod_acervo,cod_nivel)
select $cod_empresa,$cod_acervo,$cod_nivel
where not exists (select * from $linked_server acervo_acesso_restrito r
where r.cod_empresa = $cod_empresa
and r.cod_acervo = $cod_acervo
and r.cod_nivel = $cod_nivel)"))
return $arr_idioma['erro']." 4: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
// return "$linked_server SpwPer_Cat_Gera_773 $cod_empresa,$cod_acervo,$codigo_acervo_tela,1,$cod_pessoa_proc";
//Sò roda qdo chamar o Inserir de dentro da tela de pesquisa SpwPer_Cat_Gera_773
if(trim($codigo_acervo_tela)!="")
{
if(!$conexao->execProc("$linked_server SpwPer_Cat_Gera_773","$cod_empresa,$cod_acervo,$codigo_acervo_tela,1,$cod_pessoa_proc"))
return $arr_idioma['erro']." 5: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
$tipo_return = "ok";
}
else
$tipo_return = "ok2";
// 245 (TITULO)
// return "$linked_server SPWPER_GERA_ACERVO_PARAGRAFO $cod_empresa,$cod_acervo,245,1,0,0,null,'US',$cod_pessoa_proc";
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_PARAGRAFO","$cod_empresa,$cod_acervo,245,1,0,0,null,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 6: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
// return "$linked_server SPWPER_GERA_ACERVO_MARC_SECAO $cod_empresa,$cod_acervo,245,1,'a',1,null,null,null,'$titulo_class_anexo',0,0,'US',$cod_pessoa_proc";
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_MARC_SECAO ","$cod_empresa,$cod_acervo,245,1,'a',1,null,null,null,'$titulo_class_anexo',0,0,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 7: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(trim($nome_arquivo)!="")
{
// 246 (NOME DO ARQUIVO)
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_PARAGRAFO","$cod_empresa,$cod_acervo,246,1,1,3,null,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 8: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_MARC_SECAO ","$cod_empresa,$cod_acervo,246,1,'a',1,null,null,null,'$titulo_class_anexo',1,3,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 9: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
// 590 ( NOTAS)
if(trim($obs_class)!="")
{
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_PARAGRAFO","$cod_empresa,$cod_acervo,590,1,null,null,null,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 10: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_MARC_SECAO ","$cod_empresa,$cod_acervo,590,1,'a',1,null,null,null,'$obs_class',1,3,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 11: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
// 856 ( Vínculos)
if(trim($nome_arquivo)!="")
{
//return "$linked_server spwper_cat_ins_arquivo $cod_empresa,$cod_acervo,-1,-1,'$diretorio','$nome_arquivo','$tamanho_arquivo','$titulo_class_anexo','N',-1.0,-1,$cod_pessoa_proc";
if(!$conexao->execProc("$linked_server spwper_cat_ins_arquivo","$cod_empresa,$cod_acervo,-1,-1,'$diretorio','$nome_arquivo','$tamanho_arquivo','$titulo_class_anexo','N',-1.0,-1,$cod_pessoa_proc"))
return $arr_idioma['erro']." 12: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
if(!$conexao->execProcRetorno("$linked_server spwper_cat_pode_atualizar","$cod_empresa,$cod_acervo,$cod_pessoa_proc"))
return $arr_idioma['erro']." 13: ".$conexao->getErro();
$acervo = $conexao->move_proximo();
$tem_classificacao_repetida = $acervo['tem_classificacao_repetida'];
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_GERA_ATU_CADASTRO","$cod_empresa,$cod_acervo,$cod_pessoa_proc"))
return $arr_idioma['erro']." 14: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
// 700 ( AUTOR)
if(trim($autor_class)!="")
{
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_PARAGRAFO","$cod_empresa,$cod_acervo,700,1,null,null,null,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 15: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_GERA_ACERVO_MARC_SECAO","$cod_empresa,$cod_acervo,700,1,'a',1,null,null,null,'$autor_class',1,3,'US',$cod_pessoa_proc"))
return $arr_idioma['erro']." 16: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
/* SE FOR DIFERENTE DE CARPETA então cod_sit_acervo = 6, senao cod_sit_acervo = 0*/
if($cod_obra!=3)
$cod_sit_acervo_temp = 6;
else
$cod_sit_acervo_temp = 0;
if(!$conexao->execQuery("update $linked_server acervo_geral
set cod_sit_acervo = $cod_sit_acervo_temp, cod_pessoa_mov = $cod_pessoa_proc
where cod_empresa = $cod_empresa
and cod_acervo = $cod_acervo"))
return $arr_idioma['erro']." 17: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
// return $cod_acervo;
return $tipo_return;
}
function ajax_gera_protocolo($jus,$obs,$pri,$frase_xml,$frase_qtde_itens)
{
if(trim($pri)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa;
global $linked_server;
global $arr_idioma,$denominacao_biblioteca;
//Medida de segurança 139751
settype($pri,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if(trim($jus)!="")
{
$jus = str_replace("'"," ",$jus);
$jus = "'".$jus."'";
}
else
$jus = "null";
if(trim($obs)!="")
{
$obs = str_replace("'"," ",$obs);
$obs = "'".$obs."'";
}
else
$obs = "null";
//return "spwper_aqu_protocolo $cod_empresa,-1,$jus,$obs,$pri,101,$cod_pessoa_proc,1,'S',-1,null,null,null,null,-1,-1,null,-1,null,null,null,null,null,-1,-1,null,null,null,null,null,null,null,null,null,-1,-1,-1,''";
// if(!$conexao->execProcRetorno("$linked_server spwper_aqu_protocolo","$cod_empresa,-1,$jus,$obs,$pri,104,$cod_pessoa_proc,1,'S',-1,null,null,null,null,-1,-1,null,-1,null,null,null,null,null,-1,-1,null,null,null,null,null,null,null,null,null,-1,-1,-1,''"))
if(!$conexao->execProcRetorno("$linked_server spwper_aqu_protocolo","$cod_empresa,-1,$jus,$obs,$pri,104,$cod_pessoa_proc,1,'S',-1,null,null,null,null,-1,-1,null,-1,null,null,null,null,null,-1,-1,null,null,null,null,null,null,null,null,null,-1,-1,-1,'',null,null,null,null"))
return $arr_idioma['erro']." 1: ".$conexao->getErro();
$dados = $conexao->move_proximo();
$num_protocolo = $dados['protocolo'];
$conexao->fechaExecQueryProc();
$vet_frase = explode("@!%",$frase_xml);
$vet_frase_itens = explode("@!%",$frase_qtde_itens);
for($j=1;$j(.*?)\<\/acervo\>/",$dado_xml_livraria,$acervo_liv);
preg_match_all( "/\(.*?)\<\/titulo\>/",$dado_xml_livraria,$titulo_liv);
preg_match_all( "/\(.*?)\<\/preco\>/",$dado_xml_livraria,$preco_liv);
preg_match_all( "/\(.*?)\<\/link_capa\>/",$dado_xml_livraria,$link_capa_liv);
// preg_match_all( "/\(.*?)\<\/link_produto\>/",$dado_xml_livraria,$link_produto_liv);
// preg_match_all( "/\(.*?)\<\/livraria_origem\>/",$dado_xml_livraria,$livraria_origem_liv);
// preg_match_all( "/\(.*?)\<\/livraria_logotipo\>/",$dado_xml_livraria,$livraria_logotipo_liv);
preg_match_all( "/\(.*?)\<\/autor_principal\>/",$dado_xml_livraria,$autor_principal_liv);
preg_match_all( "/\(.*?)\<\/imprenta\>/",$dado_xml_livraria,$imprenta_liv);
preg_match_all( "/\(.*?)\<\/isbn_issn\>/",$dado_xml_livraria,$isbn_issn_liv);
$total_pedido_itens = $vet_frase_itens[$j];
$preco = $preco_liv[1][0];
if($preco != "")
$preco = str_replace(",",".",$preco);
else
$preco = "null";
if(!$conexao->execProcRetorno("$linked_server spwper_aqu_item","$cod_empresa,$cod_pessoa_proc,$num_protocolo,-1,1,6,$total_pedido_itens,".$preco.",1,-1,$pri,1,'',0,'E',0,'',null,'I','','',1,-1,-1,-1,null,-1,-1,null,null,null"))
return $arr_idioma['erro']." 2: ".$conexao->getErro();
$dados = $conexao->move_proximo();
$aqu_item = $dados['aqu_item'];
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server spwper_aqu_distribuicao","$cod_empresa,$cod_pessoa_proc,0,$aqu_item,'pessoa',$cod_pessoa_proc,'N',null,null,null,-1,0,0,null,null,-1,-1,null,null,null,-1,null,null,-1,-1,-1,null,null"))
return $arr_idioma['erro']." 3: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_AQU_PLANILHA","$cod_empresa,0,$aqu_item,20,1,'a',1,-1,-1,'','','".$isbn_issn_liv[1][0]."','G',$cod_pessoa_proc"))
return $arr_idioma['erro']." 4: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
$autor_principal_liv[1][0] = str_replace("\""," ",$autor_principal_liv[1][0]);
$autor_principal_liv[1][0] = str_replace("\\","",$autor_principal_liv[1][0]);
$autor_principal_liv[1][0] = str_replace("\'"," ",$autor_principal_liv[1][0]);
$autor_principal_liv[1][0] = str_replace("'","''",$autor_principal_liv[1][0]);
$autor_principal_liv[1][0] = trim($autor_principal_liv[1][0]);
if(!$conexao->execProc("$linked_server SPWPER_AQU_PLANILHA","$cod_empresa,0,$aqu_item,100,1,'a',1,-1,-1,'','','".$autor_principal_liv[1][0]."','G',$cod_pessoa_proc"))
return $arr_idioma['erro']." 5: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_AQU_PLANILHA","$cod_empresa,0,$aqu_item,245,1,'a',1,-1,-1,'','','".$titulo_liv[1][0]."','G',$cod_pessoa_proc"))
return $arr_idioma['erro']." 6: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_AQU_PLANILHA","$cod_empresa,0,$aqu_item,260,1,'a',1,-1,-1,'','','".$imprenta_liv[1][0]."','G',$cod_pessoa_proc"))
return $arr_idioma['erro']." 7: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server SPWPER_AQU_PLANILHA","$cod_empresa,0,$aqu_item,856,1,'a',1,-1,-1,'','','".$link_capa_liv[1][0]."','G',$cod_pessoa_proc"))
return $arr_idioma['erro']." 8: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
if(!$conexao->execProc("$linked_server spwper_aqu_gera_consulta","$cod_empresa,$aqu_item,null,null,null,$cod_pessoa_proc"))
return $arr_idioma['erro']." 9: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
}
return $arr_idioma['protocolo_numero'].": ".$num_protocolo;
}
function ajax_grava_volumes_sgc($acervo,$indices)
{
if(trim($acervo)=="")
exit;
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$s_nomepessoa,$s_codigopessoatela;
global $linked_server,$linked_server_temp,$denominacao_login,$autenticacao_tipo,$qtde_caracteres_senha_alfa;
global $pitagoras, $denominacao_biblioteca,$mostra_captcha;
global $arr_idioma,$vetor_de_volumes,$s_bibliografia_sgc,$s_cod_disciplina_sgc;
//Medida de segurança 139751
settype($acervo,"int");
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if($s_bibliografia_sgc=="Básica")
$bibliografia_temp="E";
if($s_bibliografia_sgc=="Complementar")
$bibliografia_temp="R";
$conexao->execProcRetorno("$linked_server spwper_usu_operacoes_disc_bib","$cod_empresa,'$s_cod_disciplina_sgc',-1,null,$acervo,'$bibliografia_temp',null,null,null,4,$cod_pessoa_proc,null");
$servico = $conexao->move_proximo();
$conexao->fechaExecQueryProc();
$arr = explode("-MCL-",$indices);
for($i=0;$iexecProcRetorno("$linked_server spwper_usu_operacoes_disc_bib","$cod_empresa,'$s_cod_disciplina_sgc',-1,null,$acervo,'$bibliografia_temp','$valor_volume',null,null,4,$cod_pessoa_proc,null"))
return $arr_idioma['erro'].": ".$conexao->getErro();
$servico = $conexao->move_proximo();
$conexao->fechaExecQueryProc();
}
return $arr_idioma['gravacao_efetuada_com_sucesso'];
}
function ajax_transfere_sgc()
{
global $cod_empresa,$conexao,$internetexplorer;
global $cod_usuario_internet,$s_codigopessoa,$s_nomepessoa,$s_codigopessoatela;
global $linked_server,$linked_server_temp,$denominacao_login,$autenticacao_tipo,$qtde_caracteres_senha_alfa;
global $pitagoras, $denominacao_biblioteca,$mostra_captcha;
global $arr_idioma,$vetor_de_volumes,$s_bibliografia_sgc,$s_cod_disciplina_sgc,$s_idplanoensino_sgc,$banco_de_dados,$s_id_operador_sgc;
if(trim($s_codigopessoa)!="")
$cod_pessoa_proc = $s_codigopessoa;
else
$cod_pessoa_proc = $cod_usuario_internet;
if($s_bibliografia_sgc=="Básica")
$bibliografia_temp="E";
if($s_bibliografia_sgc=="Complementar")
$bibliografia_temp="R";
if(!$conexao->execProcRetorno("$linked_server spwper_usu_operacoes_disc_bib","$cod_empresa,'$s_cod_disciplina_sgc',-1,null,null,'$bibliografia_temp',null,null,null,13,$cod_pessoa_proc,null"))
return $arr_idioma['erro'].": ".$conexao->getErro();
$referencia_anerior = "";
$monta_referencias = "";
$monta_acervos = "";
// $controle = false;
while($consulta_sgc = $conexao->move_proximo())
{
$acervo_local = $consulta_sgc["cod_acervo"];
$volume_local = $consulta_sgc["volume"];
$referencia_local = $consulta_sgc["referencia"];
// if($banco_de_dados=="oracle")
// $referencia_local = $referencia_local->load(); //tipo clob
// $iso_2709 = $iso_2709->read(2000); //tipo clob
if($referencia_anerior != $referencia_local)
{
/* if($controle)
{
$controle = false;
$monta_referencias .= " ";
}*/
$monta_referencias .= "".$referencia_local." ";
if(trim($volume_local)!="")
$monta_referencias .= " ".$volume_local." ";
$monta_acervos .= $acervo_local."|";
}
else
{
if(trim($volume_local)!="")
{
$monta_referencias .= ", ".$volume_local." ";
// $controle = true;
}
}
$referencia_anerior = $referencia_local;
}
$conexao->fechaExecQueryProc();
$monta_referencias = str_replace(" "," ",$monta_referencias);
$monta_referencias = str_replace(" ,",",",$monta_referencias);
// return $monta_acervos.$monta_referencias;
if($s_bibliografia_sgc=="Básica")
$bibliografia_temp="B";
if($s_bibliografia_sgc=="Complementar")
$bibliografia_temp="C";
if(!$conexao->execQueryRetorno("SELECT nome_parametro, valor
FROM $linked_server parametros_pergamum
WHERE cod_empresa=$cod_empresa
and nome_parametro = 'url_plano_ensino_wsdl'"))
return $arr_idioma['erro'].": ".$conexao->getErro();
$resultset = $conexao->move_proximo();
$url_plano_ensino_wsdl = $resultset["valor"];
$conexao->fechaExecQueryProc();
if(!$conexao->execQueryRetorno("SELECT nome_parametro, valor
FROM $linked_server parametros_pergamum
WHERE cod_empresa=$cod_empresa
and nome_parametro = 'parceiro_plano_ensino_wsdl'"))
return $arr_idioma['erro'].": ".$conexao->getErro();
$resultset = $conexao->move_proximo();
$parceiro_plano_ensino_wsdl = $resultset["valor"];
$conexao->fechaExecQueryProc();
if(!$conexao->execQueryRetorno("SELECT nome_parametro, valor
FROM $linked_server parametros_pergamum
WHERE cod_empresa=$cod_empresa
and nome_parametro = 'chave_plano_ensino_wsdl'"))
return $arr_idioma['erro'].": ".$conexao->getErro();
$resultset = $conexao->move_proximo();
$chave_plano_ensino_wsdl = $resultset["valor"];
$conexao->fechaExecQueryProc();
require_once('../webservices/nusoap.php');
$ChaveIdentificacao_ws = $chave_plano_ensino_wsdl;
$codigo_parceiro = $parceiro_plano_ensino_wsdl;
$client = new nusoap_client("$url_plano_ensino_wsdl?WSDL",array('soap_version' => SOAP_1_2));
$xml_dados = $client->call('AtualizarBibliografiaDisciplina', array('parceiro'=>$codigo_parceiro,'chaveAcesso'=>$ChaveIdentificacao_ws,'codigoSIA'=>$s_cod_disciplina_sgc,'IDPlanoEnsino'=>$s_idplanoensino_sgc,'tipoBibliografia'=>$bibliografia_temp,'referenciaBibliografica'=>$monta_referencias,'identificacaoAcervo'=>$monta_acervos,'id_operador'=>$s_id_operador_sgc));
if(trim(strtolower($xml_dados["AtualizarBibliografiaDisciplinaResult"]["Mensagem"]))=="sucesso")
{
if($s_bibliografia_sgc=="Básica")
$bibliografia_temp="E";
if($s_bibliografia_sgc=="Complementar")
$bibliografia_temp="R";
if(!$conexao->execProcRetorno("$linked_server spwper_usu_operacoes_disc_bib","$cod_empresa,'$s_cod_disciplina_sgc',-1,null,null,'$bibliografia_temp',null,null,null,8,$cod_pessoa_proc,null"))
return "Erro: ".$conexao->getErro();
$conexao->fechaExecQueryProc();
return "Transferido com sucesso!";
}
if(trim($xml_dados["AtualizarBibliografiaDisciplinaResult"]["Mensagem"])!="")
return $xml_dados["AtualizarBibliografiaDisciplinaResult"]["Mensagem"];
else
return $arr_idioma['erro_conectar_WSDL_SGC'];
//Ocorreu um erro ao conectar no serviço WSDL do Sistema SGC!
}
function ajax_sgc_existe_minhas_referencias()
{
global $mostra_outras_redes_redepergamum, $mostra_ebsco_eds, $mostra_pesq_livrarias,$mostra_cesta;
global $arr_idioma,$s_estacio_sgc;
$conteudo_html = "
";
if($s_estacio_sgc!="")
$conteudo_html .= "".$arr_idioma['cesta_estacio_sgc']." ";
$conteudo_html .= "
";
if($s_estacio_sgc!="")
$conteudo_html .= "
";
$conteudo_html .= "
@MCL@div_resultados";
return $conteudo_html;
}
if(trim($codigo_acervo_areas)!="")
$codAcervo = trim($codigo_acervo_areas);
if(trim($termo)=="")
$termo = $arr_idioma['termo_pesquisa'] ;
//Usados para enviar email de solicitação de resgate de senha:
if(!class_exists("phpmailer")){
require_once("../e_mails/lib/class.phpmailer.php");
}
//***********************************//
//************* GEDWeb *************//
include("../ged_web/GEDWeb.php");
function get_email_padrao_internet() {
global $conexao, $linked_server, $cod_empresa;
if($conexao->execProcRetorno("$linked_server sp_int_dados_email_lista","$cod_empresa")) {
$reg_link = $conexao->move_proximo();
$email = $reg_link["email_padrao_internet"];
}
$conexao->fechaExecQueryProc();
return $email;
}
function get_email_usuario() {
global $conexao, $linked_server, $cod_empresa, $s_codigopessoa;
if($conexao->execQueryRetorno("SELECT e_mail FROM $linked_server PESSOA WHERE cod_pessoa = $s_codigopessoa")) {
$resultado = $conexao->move_proximo();
$email = $resultado["e_mail"];
}
$conexao->fechaExecQueryProc();
return $email;
}
if(trim($s_nomepessoa) == ""){
$email = get_email_padrao_internet();
} else {
$email = get_email_usuario();
if(!isset($email))
$email = get_email_padrao_internet();
}
$conexao_ged = new PergamumBanco($usuario, $senha, $alias_database, $plataforma_web, $banco_de_dados, $porta_banco_de_dados, $database_name);
if(!$conexao_ged->conectar())
echo $arr_idioma['erro_conectar']."!";
$ged = GEDWeb::get_instance($cod_empresa, $conexao_ged, $email, $arr_idioma);
//***********************************//
include("../compartilhado/ajax_generico.php");
sajax_init();
//QRCODE
sajax_export("ajax_set_idioma","ajax_resultados","ajax_dados_acervo","ajax_conteudo_pastas","ajax_adiciona_cesta","ajax_mostra_filtro","ajax_monta_local","ajax_tipo_p_i","ajax_mostra_login","ajax_email_resgate_senha","ajax_valida_acesso","ajax_monta_exemplares","ajax_monta_sumario","ajax_monta_links","ajax_mostra_armazem","ajax_mostra_classificacao","ajax_mostra_reserva","ajax_autoridade_remissiva","ajax_mostra_req_material","ajax_acervo_detalhes","ajax_mostra_autores_assuntos","ajax_chamada","ajax_mostra_filtro_campus","ajax_exemplares_id","ajax_adiciona_cesta_pagina","ajax_adiciona_cesta_todos","ajax_adiciona_cesta_acervo","ajax_remove_cesta_acervo","ajax_GravaComentario","ajax_busca_pessoaComentario","ajax_buscaComentario", "ajax_valida_acesso_novo","ajax_dados_marc","ajax_dados_reserva","ajax_dados_exemplar","ajax_dados_local","ajax_dados_referencia","ajax_dados_colecao","ajax_mostra_exemplares_colecao","ajax_lista_sumarios","ajax_mostra_comentarios","ajax_mostra_comentario_geral","ajax_busca_pessoa","ajax_gravar","ajax_mostra_sugestoes","ajax_gravar2_novo","ajax_tela_cesta","ajax_apaga_acervo_cesta","ajax_referencia_janela","ajax_marc","ajax_dados_acervo_janela","ajax_validaLogin","ajax_grava_cesta_permanente","ajax_valida_acesso_cesta","ajax_redepergamum","ajax_detalhes_redes","ajax_consulta_refinamento","ajax_consulta_quadro_class","ajax_mostra_menu_class","ajax_mostra_class_filho","ajax_resultado_class","ajax_relacao_indexar","ajax_tela_inserir_material","ajax_mostra_niveis","ajax_mostra_bibs","ajax_grava_novo_material_class","ajax_redeebsco","ajax_redeebsco_dados_acervo","ajax_rede_livrarias","ajax_rede_pesquisa_livrarias","ajax_adiciona_cesta_livrarias","ajax_apaga_livraria_cesta","ajax_gera_protocolo","ajax_pesquisa_cursos_mkt","ajax_gera_qr_code","ajax_cad_nao_encontrados","ajax_grava_nao_encontrado","ajax_mostra_sgc_volumes","ajax_grava_volumes_sgc","ajax_transfere_sgc","ajax_sgc_existe_minhas_referencias","ajax_busca_pessoa_unisc","ajax_cria_lista_link","ajax_login_senha","ajax_valida_permissao_ebook","ajax_rede_oai_geral","ajax_rede_oai_local","ajax_consulta_refinamento_oai","ajax_adiciona_cesta_armazem", "ajax_apaga_acervo_cesta_armazem", "ajax_gera_qr_code_armazem","ajax_tabela_oai_inst", "ajax_ged_produtos", "ajax_ged_pesquisa", "ajax_ged_consulta_item", "ajax_ged_consulta_item_login", "ajax_dados_dublin_core", "ajax_gravar_ifsp", "ajax_gravar2_novo_ifsp", "ajax_mostra_ajuda", "ajax_abnt_pesquisa","ajax_abnt_consulta_item", "ajax_abnt_consulta_item_login");
sajax_handle_client_request();
?>
//if($mostra_facebook)
// echo "\n";
if(trim($codAcervo)!="") //Facebook
{
$desabilita_outras_pesquisas = true;
settype($codAcervo,"int");
$conexao->execProcRetorno("$linked_server sp_per_int_busca_titulo","$cod_empresa,$codAcervo");
$resultset = $conexao->move_proximo();
$titulo_acervo = $resultset["desc_titulo"];
$desc_tipo_obra_acervo = $resultset["desc_tipo_obra"];
$conexao->fechaExecQueryProc();
$conexao->execProcRetorno("$linked_server sp_per_cons_referencia","$cod_empresa,$codAcervo");
$reg = $conexao->move_proximo();
/*$text_index = "";
$text_index .= $reg["autor"]." ";
$text_index .= "".$reg["titulo"]." "." ";
$text_index .= $reg["titulo_n"]." ";
$text_index .= $reg["sub_titulo"]." ";
$text_index .= "".$reg["titulo_revista"]." "." ";
$text_index .= $reg["edicao"]." ";
$text_index .= $reg["publicacao"]." ";
$text_index .= $reg["tit_ant_post"]." ";
$text_index .= $reg["indice"]." ";
$text_index .= $reg["pagina"]." ";
$text_index .= $reg["ref_artigo"]." ";
$text_index .= $reg["nota_monog"]." ";
$text_index .= $reg["escala"];
$text_index = $f->formata_referencia_escala($text_index);*/
$text_index = $reg["referencia"];
if($banco_de_dados=="oracle")
$text_index = $text_index->load(); //tipo clob
$text_index = $f->formata_referencia_escala($text_index);
$conexao->fechaExecQueryProc();
$og_description = $text_index;
$og_title = $titulo_acervo." - ".$desc_tipo_obra_acervo;
$og_url = "$protocolo://$server/biblioteca/index.php?codAcervo=$codAcervo";
$og_image = "$protocolo://$server/img/logo_empresa_facebook.jpg";
$link_capa = "";
$conexao->execQueryRetorno("select link_capa from acervo_consulta where cod_acervo = $codAcervo");
$result = $conexao->move_proximo();
$link_capa = $result["link_capa"];
$conexao->fechaExecQueryProc();
if($link_capa != ""){
$link_capa = substr($link_capa,1,strlen($link_capa)-1);
if($cod_empresa==1){
$og_image = "$protocolo://$server/biblioteca/img.php?arquivo=".trim($link_capa);
}else{
$og_image = trim($link_capa);
}
}
?>
}
?>