function xss_security_post($s) { $s = troca($s, '<', '<'); $s = troca($s, '>', '>'); $s = troca($s, '"', '"'); //$s = troca($s,'/','''); $s = troca($s, "'", '/'); return $s; }
function xml($cep) { $title = htmlspecialchars($cep->line['cep_titulo']); $titlep = htmlspecialchars($cep->line['cep_titulo_public']); /* data */ $data = $cep->line['cep_data']; $data = substr($data, 0, 4) . '-' . substr($data, 4, 2) . '-' . substr($data, 6, 2) . 'T00:00:00'; //print_r($cep); $xml = "\n<trials>\n\t<trial>\n\t\t<main>\n\t\t\t<trial_id></trial_id> \n\t\t\t<utrn /> \n\t\t\t<reg_name>RPEC</reg_name> \n\t\t\t<date_registration>**DATA**</date_registration> \n\t\t\t<primary_sponsor>**AUTOR**</primary_sponsor> \n \t\t\t<public_title>{$titlep}</public_title>\n\t\t\t<acronym /> \n \t\t\t<scientific_title>{$title}</scientific_title> \n \t\t\t<scientific_acronym>{$acronym}</scientific_acronym> \n \t\t\t<date_enrolment>{$data}</date_enrolment> \n \t\t\t<type_enrolment /> \n \t\t\t<target_size>**tabg**</target_size> \n \t\t\t<recruitment_status /> \n \t\t\t<url>SITE</url> \n \t\t\t<study_type /> \n \t\t\t<study_design>**Desenho**</study_design> \n \t\t\t<phase>**FASE**</phase> \n \t\t\t<hc_freetext>**</hc_freetext> \n \t\t\t<i_freetext>**FREE TEXT**</i_freetext> \n\t\t</main>\n\t\t<contacts>\n\t\t\t<contact>\n \t\t\t\t<tipo>public</tipo> \n \t\t\t\t<firstname>***</firstname> \n \t\t\t\t<middlename>**</middlename> \n \t\t\t\t<lastname>***</lastname> \n \t\t\t\t<address>****</address> \n \t\t\t\t<city>***</city> \n \t\t\t\t<country1>***</country1> \n \t\t\t\t<zip /> \n \t\t\t\t<telephone>*****</telephone> \n \t\t\t\t<email>*****</email> \n \t\t\t\t<affiliation>****</affiliation> \n \t\t\t</contact>\n\t\t\t<contact>\n \t\t\t\t<tipo>public</tipo> \n \t\t\t\t<nombres>**</nombres> \n \t\t\t\t<apell_mat>****</apell_mat> \n \t\t\t\t<apell_pat>****</apell_pat> \n \t\t\t\t<direccion>****</direccion> \n \t\t\t\t<distrito>*****</distrito> \n \t\t\t\t<provincia>****</provincia> \n \t\t\t\t<departamento>*****</departamento> \n \t\t\t\t<ruc>*****</ruc> \n \t\t\t \t<mail>****</mail> \n \t\t\t\t<ejecutor>*****</ejecutor> \n \t\t\t</contact>\n \t\t</contacts>\n\t\t<country>\n \t\t\t<country2>***</country2> \n \t\t\t<country2>****</country2> \n \t\t\t<country2>****</country2> \n \t\t</country>\n\t\t<criteria>\n \t\t\t<inclusion_criteria>***</inclusion_criteria> \n \t\t\t<agemin>18</agemin> \n \t\t\t<agemax>99</agemax> \n \t\t\t<gender>-</gender> \n \t\t\t<exclusion_criteria>\n \t\t\t****\n \t\t\t</exclusion_criteria> \n \t\t</criteria>\n\t\t\t<hc_keyword>\n \t\t\t\t<hc_code /> \n \t\t\t</hc_keyword>\n\t\t<health_condition_keyword>\n \t\t\t<hc_code /> \n \t\t</health_condition_keyword>\n\t\t<i_keyword>\n \t\t\t<i_code /> \n \t\t</i_keyword>\n\t\t<intervention_keyword>\n \t\t\t<hc_code /> \n \t\t</intervention_keyword>\n\t\t<primary_outcome>\n \t\t\t<prim_outcome>â¢Overall survival [ Time Frame: approximately 8 years ] [ Designated as safety issue: No ] NAME OF THE RESULT: Overall survival USED MEASURING METHOD :The Kaplan-Meier method will be used to calculate the median OS for each treatment arm. The log-rank test bilateral, stratified by measurable disease versus non-measurable / evaluable, geographic region (U.S. vs. outside the U.S.) and creatinine clearance (45-59 mL / min vs> 60 mL / min), will be used to compare OS between the two treatment arms of trastuzumab. Also provide the result of the Log-Rank test unstratified. The stratified Cox regression (with proportional hazards) will also be used to estimate hazard ratios and to calculate confidence intervals 95% (95% CI) of risk indices. PERIOD OF TIME WHERE THE MEASUREMENT WILL BE CONDUCTED AND WHICH WILL ALLOW OBTAINING THE PRIMARY RESULT: 8 years</prim_outcome> \n \t\t</primary_outcome>\n\t\t<secondary_outcome>\n \t\t\t<sec_outcome>Progression Free Survival NAME OF THE RESULT: Progression Free Survival USED MEASURING METHOD :The Kaplan-Meier method The log-rank test bilateral PERIOD OF TIME WHERE THE MEASUREMENT WILL BE CONDUCTED AND WHICH WILL ALLOW OBTAINING THE SECONDARY RESULT: 6 months</sec_outcome> \n \t\t</secondary_outcome>\n\t\t<secondary_ids>\n\t\t\t<secondary_id>\n\t \t\t\t<sec_id>BO27798</sec_id> \n \t\t\t\t<issuing_authority /> \n \t\t\t</secondary_id>\n \t\t</secondary_ids>\n\t\t<secondary_sponsor>\n \t\t\t<sponsor_name /> \n \t\t</secondary_sponsor>\n\t\t<source_support>\n \t\t\t<source_name>F. HOFFMANN-LA ROCHE LTD.</source_name> \n \t\t</source_support>\n \t</trial>\n</trials>"; $xml = troca($xml, '&', '[XXX]'); //$xml = troca($xml,'<','<'); //$xml = troca($xml,'>','>'); $xml = troca($xml, '&', '&'); $xml = troca($xml, '[XXX]', '&'); return $xml; }
function login($login, $pass) { global $messa; $login = uppercase($login); if (strlen($login) == 0 or strlen($pass) == 0) { $this->user_erro = -3; $this->user_msg = 'login_required'; return -3; } else { $login = troca($login, "'", "´"); $pass = troca($pass, "'", "´"); $sql = "select * from " . $this->usuario_tabela; $sql .= " where " . $this->usuario_tabela_email . " = '" . LowerCase($login) . "' "; $resrlt = db_query($sql); if ($result = db_read($resrlt)) { $user_senha = trim($result[$this->usuario_tabela_pass]); if ($result['senha_md5'] == 1) { $pass = md5($pass); } if ($user_senha == $pass) { $this->user_erro = 1; $this->user_msg = ''; $this->user_login = trim($result[$this->usuario_tabela_login]); $this->user_nome = trim($result[$this->usuario_tabela_nome]); $this->user_nivel = trim($result[$this->usuario_tabela_nivel]); $this->user_id = trim($result[$this->usuario_tabela_id]); $this->user_codigo = trim($result['us_codigo']); $this->user_perfil = trim($result['us_perfil']); $this->LiberarUsuario(); } else { $this->user_erro = -2; $this->user_msg = 'password_incorrect'; } } else { $this->user_erro = -1; $this->user_msg = 'login_invalid'; } } if ($this->user_erro == 1) { $this->LiberarUsuario(); return True; } else { return False; } }
function confirm_submission_by_email() { global $LANG; /**** ENVIO DE E-MAIL *****/ $ic = new ic(); $ic = $ic->ic('email_confirm_subm'); $title = utf8_decode($this->doc_1_titulo); $texto = mst(utf8_decode($ic['text'])); $subject = $ic['title']; $emails = $this->email_autores(); $texto = troca($texto, '$TITLE', $title); $texto = troca($texto, '$CAAE', $protocolo); $texto = troca($texto, '$TITLE', $title); echo '<h3>' . $subjec . '</h3>'; for ($r = 0; $r < count($emails); $r++) { echo 'sending to ' . $emails[$r]; enviaremail($emails[$r], '', '#2' . $subject, $texto); enviaremail($emails[$r], '', '#1' . $subject, $texto); } exit; }
function process($cp) { global $dd, $acao, $ged, $http; /* Caixa Alta */ $i = UpperCaseSql(substr($cp[0], 1, 5)); if (strpos($i, ' ') > 0) { $i = substr($i, 0, strpos($i, ' ')); } /* Transfere parametros */ $this->required = $cp[3]; $this->caption = $cp[2]; $this->caption_original = $cp[2]; $placeholder = troca($cp[2], '"', ''); if (strpos($placeholder, '<') > 0) { $placeholder = substr($placeholder, 0, strpos($placeholder, '<')); } $this->caption_placeholder = $placeholder; $this->fieldset = $cp[1]; $size = sonumero($cp[0]); $this->maxlength = $size; $this->caption = $cp[2]; $ro = UpperCaseSql($cp[4]); /* Read Only */ if ($ro == 'FALSE' or $ro == '0' or strlen($ro) == '0') { $this->readonly = ' READONLY '; } else { $this->readonly = ''; } if (strlen(trim($acao)) > 0 and $this->required == 1 and strlen(trim($this->value)) == 0) { $this->caption = '<font color="red">' . $this->caption . '</font>'; } if ($size > 80) { $size = 80; } $this->size = $size; $i = troca($i, '&', ''); $i = troca($i, ':', ''); $sn = sonumero($i); $i = troca($i, $sn, ''); //echo '['.$i.']'; if (substr($i, 0, 1) == 'T' and $i != 'TOKEN') { $i = 'T'; } if (substr($i, 0, 1) == '[') { $i = '['; } if (empty($sx)) { $sx = ''; } $sx .= chr(13) . '<TR valign="top">'; $sh = '<TD align="right" width="10%">' . $this->caption . '<TD>'; if (strlen(trim($this->caption_original)) == 0) { $sh = '<TD colspan=2 align="left">'; } if (substr($i, 0, 1) == 'T') { //$sh = '<TD colspan=2 align="right">'; $sh .= $this->caption; } switch ($i) { /* Field Sets */ case '{': $sx .= $this->type_open_field(); break; case '}': $sx .= $this->type_close_field(); break; /* Sequencial */ /* Sequencial */ case '[': $this->par = substr($cp[0], 2, strlen($cp[0])); $sx .= $sh . $this->type_seq(); break; case 'AJAX': $sx .= '<TR><TD colspan=2>' . $this->type_ajax(); break; case 'AUTOR': $sx .= '<TR><TD colspan=2>' . $this->type_Autor(); break; /* Caption */ /* Caption */ case 'A': $sx .= '<TR><TD colspan=2>' . $this->type_A(); break; /* Alert */ /* Alert */ case 'ALERT': $sx .= '<TR><TD><TD colspan=1>' . $this->type_ALERT(); break; /* Button */ /* Button */ case 'B': $sx .= '<TD colspan=2 >' . $this->type_B(); break; /* City, State, Country */ /* City, State, Country */ case 'CITY': $sx .= $sh . $this->type_City(); break; /* Declaracao */ /* Declaracao */ case 'DECLA': $sx .= $this->type_DECLA(); break; /* Checkbox */ /* Checkbox */ case 'C': $sx .= '<TR><TD colspan=2>' . $this->type_C() . $this->caption; break; /* Checkbox */ /* Checkbox */ case 'CAPTC': $sx .= '<TR><TD><TD colspan=1>' . $this->caption . '<BR>' . $this->type_captcha() . '<BR>'; $sx .= ' <input type="text" name="' . $this->name . '" value = "" maxlength="8" class="' . $this->class_captcha . '" id="' . $this->name . '" placeholder="' . $this->caption_placeholder . '" ' . $this->readonly . ' ' . $style . ' />' . chr(13); $sx .= $this->requerido(); break; /* Date */ /* Date */ case 'D': $sx .= $sh . $this->type_D(); break; /* EAN13 */ /* EAN13 */ case 'EAN': $sx .= $sh . $this->type_EAN(0); break; /* EMAIL */ /* EMAIL */ case 'EMAIL': $sx .= $sh . $this->type_EMAIL(0); break; case 'EMAIL_UNIQUE': $sx .= $sh . $this->type_EMAIL(1); break; /* Funcoes adicionais */ /* Funcoes adicionais */ case 'FC': $this->par = substr($cp[0], 3, strlen($cp[0])); if ($this->par == '001') { $sx .= function_001(); } if ($this->par == '002') { $sx .= function_002(); } if ($this->par == '003') { $sx .= function_003(); } if ($this->par == '004') { $sx .= function_004(); } if ($this->par == '005') { $sx .= function_005(); } if ($this->par == '006') { $sx .= function_006(); } if ($this->par == '007') { $sx .= function_007(); } if ($this->par == '008') { $sx .= function_008(); } if ($this->par == '009') { $sx .= function_009(); } if ($this->par == '010') { $sx .= function_010(); } if ($this->par == '011') { $sx .= function_011(); } break; /* Files */ /* Files */ case 'FILES': $sx .= '<TD>'; $sx .= $ged->file_list(); $sx .= $ged->upload_botton_with_type($ged->protocolo, '', ''); break; /* KeyWord */ /* KeyWord */ case 'KEYWO': $sx .= $sh . $this->type_KEYWORDS(); break; /* Hidden */ /* Hidden */ case 'H': $sx .= $this->type_H(); break; /* Hidden with value */ /* Hidden with value */ case 'HV': $sx .= $this->type_HV(); break; /* Inteiro */ /* Inteiro */ case 'I': $sx .= $sh . $this->type_I(); break; /* MEnsagens */ /* MEnsagens */ case 'M': $sx .= $this->type_M(); break; /* Valor com dias casas */ /* Valor com dias casas */ case 'N': $sx .= $sh . $this->type_N(); break; /* Options */ /* Options */ case 'O': $this->par = substr($cp[0], 2, strlen($cp[0])); $sx .= $sh . $this->type_O(); break; /* String Simple */ /* String Simple */ case 'P': $sx .= $sh . $this->type_P(); break; /* Query */ /* Query */ case 'Q': $this->par = splitx(':', substr($cp[0], 2, strlen($cp[0]))); $sx .= $sh . $this->type_Q(); break; /* Radio box */ /* Radio box */ case 'R': $this->par = substr($cp[0], 2, strlen($cp[0])); $sx .= '<TD colspan=2 >' . $this->caption . ': ' . $this->type_R(); break; /* String Simple */ /* String Simple */ case 'S': $sx .= $sh . $this->type_S(); break; /* Text area */ /* Text area */ case 'T': $this->cols = sonumero(substr($cp[0], 0, strpos($cp[0], ':'))); $this->rows = sonumero(substr($cp[0], strpos($cp[0], ':'), 100)); $sx .= '<TD align="right">' . $this->caption . '<TD>' . $this->type_T(); break; /* String Simple */ /* String Simple */ case 'TOKEN': $sx .= $this->type_TOKEN(); break; /* String Ajax */ /* String Ajax */ case 'SA': $sx .= $sh . $this->type_SA(); break; /* Update */ /* Update */ case 'U': $sx .= $sh . $this->type_U(); break; /* Estados */ /* Estados */ case 'UF': $sx .= $sh . $this->type_UF(); break; case 'RT': /* Editor de texto rico (Rich Text) */ /* Editor de texto rico (Rich Text) */ case 'ARV': /* Arvore com checkboxes */ /* Arvore com checkboxes */ case 'ATAGS': /* Textarea com autocomplete de tags */ $params = $this->_cp_get_params($cp); $sx .= $sh . call_user_func_array(array(&$this, 'type_' . $i), $params); break; } return $sx; }
function form_field($cp, $vlr) { global $dd, $ddi; /* Zera tela */ $tela = ''; $table = 1; if (!isset($dd)) { $dd = array(); $ddi = 0; } $type = $cp[0]; $label = $cp[2]; $required = $cp[3]; $placeholder = $label; $readonly = $cp[4]; $tt = substr($type, 1, 1); /* exessoes */ if (substr($type, 0, 4) == '$MES') { $tt = 'MES'; } if (substr($type, 0, 3) == '$SW') { $tt = 'SW'; } if (substr($type, 0, 3) == '$HV') { $tt = 'HV'; } if (substr($type, 0, 5) == '$LINK') { $tt = 'LINK'; } if (substr($type, 0, 3) == '$AA') { $tt = 'AA'; } /* form */ $max = 100; $size = 100; $dados = array(); $dn = 'dd' . $ddi; if ($table == 1) { $td = '<td>'; $tdl = '<td align="right">'; $tdn = '</td>'; $tr = '<tr valign="top">'; $trn = '</tr>'; } else { $td = ''; $tdl = ''; $tdn = ''; $tr = ''; $trn = ''; } //$dados = array('name'=>'dd'.$ddi, 'id'=>'dd'.$ddi,'value='.$dd[$ddi],'maxlenght'=>$max,'size'=>$size,$class=>''); switch ($tt) { case '{': $tela .= $tr; $tela .= '<td colspan=2>'; $tela .= '<fieldset class="border1"><legend class="lt3 bold">' . $label . '</legend>'; $tela .= '<table width="100%" class="tabela00">'; break; case '}': $tela .= '</table>'; $tela .= '</fieldset>'; $tela .= '</td></tr>'; $tela .= '<table width="100%" id="row">'; $tela .= '</td></tr>'; break; /* Select Box */ /* Select Box */ case '[': $ntype = trim(substr($type, 2, strlen($type))); $n1 = substr($ntype, 0, strpos($ntype, '-')); $n2 = sonumero(substr($ntype, strpos($ntype, '-'), strlen($ntype))); $n3 = substr($ntype, strlen($ntype) - 1, 1); $options = array('' => '::select an option::'); if ($n3 != 'D') { /* Crescente */ for ($r = $n1; $r <= $n2; $r++) { $options[$r] = $r; } } else { /* Descrecente */ for ($r = $n2; $r >= $n1; $r--) { $options[$r] = $r; } } /* recupera dados */ $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* Select Box - Autocomplete*/ /* Select Box - Autocomplete*/ case 'AA': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, ':', ';') . ';'; $param = splitx(';', $ntype); /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } /* **/ $dados = array('name' => $dn . 'a', 'id' => $dn . 'a', 'value' => $vlr, 'maxlenght' => $max, 'size' => $size, 'placeholder' => $label, 'class' => 'form_string', 'autocomplete' => 'on'); $tela .= $td . form_input($dados); $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => 10, 'placeholder' => $label, 'class' => 'form_string', 'autocomplete' => 'on'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= form_input($dados); $tela .= $tdn . $trn; $tela .= ' <script> $(function(){ var $sfield = $("#' . $dn . 'a").autocomplete({ source: function(request, response){ var url = "' . base_url("index.php/instituicao/autocomplete?term=") . '" + $("#' . $dn . 'a").val(); $.get(url, {}, function(data) { response($.map(data, function(rlt) { return { label: rlt.nome, value: rlt.id }; })); }, "json"); }, select: function( event, ui ) { $( "#' . $dn . 'a" ).val( ui.item.label ); $( "#' . $dn . '" ).val( ui.item.value ); return false; } , minLength: 4, autofocus: true }); }); </script> '; break; /* Button */ /* Button */ case 'B': $tela .= $tr . $tdl . $td; $dados = array('name' => 'acao', 'id' => 'acao', 'value' => $label, 'class' => 'form_submit'); $tela .= form_submit($dados); $tela .= $tdn . $trn; break; case 'C': /* TR da tabela */ $tela .= $tr; $dados = array('name' => $dn, 'id' => $dn, 'value' => '1', 'class' => 'onoffswitch-checkbox'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= '<td align="right">' . form_checkbox($dados, 'accept', $vlr); /* label */ if (strlen($label) > 0) { $tela .= '<td>' . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= $tdn . $trn; break; /* Oculto */ /* Oculto */ case 'H': $dados = array($dn => $vlr); $tela .= form_hidden($dados); break; case 'HV': $vlr = $cp[2]; $dados = array($dn => $vlr); $tela .= '<input type="hidden" name="' . $dn . '" id="' . $dn . '" value="' . $vlr . '">' . cr(); break; /* Select Box - Mes */ /* Select Box - Mes */ case 'MES': $options = array('' => '::select an option::'); /* recupera dados */ for ($r = date("Y") + 4; $r > 1990; $r--) { $vlra = $r; $options[$vlra] = '===' . $r . '==='; //array_push($options,array('2019')); $ar = array(); for ($y = 12; $y > 0; $y--) { $vlrs = $r . strzero($y, 2) . '01'; $cpt = $r . '/' . msg('mes_' . strzero($y, 2)); $op = array($vlr => $cpt); $ar[$vlrs] = $cpt; //array_push($options,$op); } $options[$vlra] = $ar; } $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } if (strlen($vlr) == 0) { $vlr = date("Ym") . '01'; } else { $vlr = sonumero($vlr); } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* Select Box */ /* Select Box */ case 'O': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, '&', ';') . ';'; $param = splitx(';', $ntype); $options = array('' => '::select an option::'); for ($r = 0; $r < count($param); $r++) { if (count(trim($param[$r])) > 0) { $nterm = splitx(':', $param[$r] . ':'); $key = $nterm[0]; $valor = $nterm[1]; $options[$key] = $valor; } } /* recupera dados */ $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* Select Box */ /* Select Box */ case 'Q': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, ':', ';') . ';'; $param = splitx(';', $ntype); $options = array('' => '::select an option::'); /* recupera dados */ $sql = "select * from (" . $param[2] . ") as tabela order by " . $param[1]; $CI =& get_instance(); $query = $CI->db->query($sql); foreach ($query->result_array() as $row) { /* recupera ID */ $flds = trim($param[0]); $vlrs = trim($param[1]); $flds = $row[$flds]; $vlrs = $row[$vlrs]; $options[$flds] = $vlrs; } $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* String */ /* String */ case 'R': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, '&', ';') . ';'; $param = splitx(';', $ntype); $form = '<table width="100%" border=0>'; for ($r = 0; $r < count($param); $r++) { if (count(trim($param[$r])) > 0) { $nterm = splitx(':', $param[$r] . ':'); $key = $nterm[0]; $valor = $nterm[1]; $options[$key] = $valor; $checked = false; if ($key == $vlr) { $checked = true; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $key, 'class' => 'form_select', 'checked' => $checked); $form .= '<tr valign="top"><td>' . form_radio($dados) . '</td>'; $form .= '<td class="form_radio">' . $valor . '</td>'; $form .= '</tr>'; } } $form .= '</table>'; /* recupera dados */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= '<TD>'; //$tela .= form_radio($dados, $options, $vlr); $tela .= $form; break; /* String */ /* String */ case 'D': /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => 12, 'size' => 12, 'placeholder' => $label, 'class' => 'form_string date'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= $td . form_input($dados) . ' (dd/mm/yyyy)'; $tela .= $tdn . $trn; $tela .= ' <script> $(function() { $( "#' . $dn . '" ).datepicker(); }); </script> '; break; /* String */ /* String */ case 'LINK': /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => $size, 'placeholder' => $label, 'class' => 'form_string'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= $td . form_input($dados); $tela .= $tdn . $trn; break; case 'M': /* TR da tabela */ $tela .= $tr; /* label */ $tela .= '<td colspan=2>' . '<span class="lt1">' . $label . '</span>'; $tela .= $tdn . $trn; break; /* form_number */ /* form_number */ case 'N': /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => 15, 'size' => 15, 'placeholder' => $label, 'class' => 'form_string money'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= $td . form_input($dados); $tela .= $tdn . $trn; break; /* String */ /* String */ case 'S': /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $size = sonumero($type); $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => $size, 'placeholder' => $label, 'class' => 'form_string'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= $td . form_input($dados); $tela .= $tdn . $trn; break; case 'SW': /* TR da tabela */ $tela .= $tr; $checked = False; /* label */ $tela .= ' <td class="lt4" colspan=2> <table> <tr> <td> <div class="onoffswitch"> '; /* cehcked */ if (trim($vlr) == '1') { $checked = True; } /* Monta lista */ $data = array('name' => $dn, 'checked' => $checked, 'class' => 'onoffswitch-checkbox', 'id' => $dn, 'value' => '1'); $tela .= form_checkbox($data); $tela .= ' <label class="onoffswitch-label" for="' . $dn . '"> <span class="onoffswitch-inner"></span> <span class="onoffswitch-switch"></span> </label> </div></td><td class="lt2"> ' . $label . ' </td> </tr> </table></td></tr>'; break; /* Update */ /* Update */ case 'U': if (round($vlr) == 0) { $vlr = date("Y-m-d"); } $dados = array($dn => $vlr); $tela .= form_hidden($dados); break; /* Textarea */ /* Textarea */ case 'T': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, ':', ';') . ';'; $param = splitx(';', $ntype); /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $data = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'rows' => $param[1], 'cols' => $param[0], 'class' => 'form_textarea'); $tela .= $td . form_textarea($data); $tela .= $tdn . $trn; break; /* Password */ /* Password */ case 'P': if (strlen($label) > 0) { $tela .= $label . ' '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => $size); $tela .= form_password($dados); break; } $ddi++; return $tela; }
$valid = $hd->site . 'login_user_valid.php?dd1=' . $dd[5] . '&dd90=' . checkpost($dd[5]); } else { $valid = $hd->site . '/login_user_valid.php?dd1=' . $dd[5] . '&dd90=' . checkpost($dd[5]); } $link = '<A HREF="' . $valid . '">'; $ic_cod = "email_confirm_email"; $tx = $ic->ic($ic_cod); /* Cambia texto */ $texto = mst($tx['text']); $subtitle = $tx['title']; $texto = troca($texto, '$name', $name); $texto = troca($texto, '$NAME', $name); $texto = troca($texto, '$email', $email); $texto = troca($texto, '$EMAIL', $email); $texto = troca($texto, '$link', $link . $valid . '</a>'); $texto = troca($texto, '$LINK', $link . $valid . '</a>'); $texto .= '<BR><BR><font size=-2>' . $ic_cod . '</font>'; /* Envia e-mail da validação */ $sql = "select * from usuario where us_email = '" . $email . "' "; $rlt = db_query($sql); if ($line = db_read($rlt)) { $email = trim($line['us_email']); enviaremail($email, '', $subtitle, $texto); echo '<BR><BR>Send mail to ' . $email; } echo '</div>'; } else { echo $tela; echo '</div>'; } echo '</div>';
require "cab.php"; require '_class/_class_cep.php'; /* Admin Common */ $ok = ($perfil->valid('#ADM') or $perfil->valid('#SCR') or $perfil->valid('#COO')); if ($ok == 0) { redirecina('main.php'); } $tp = new message(); //$tp->language_set('pt_BR'); global $acao, $dd, $cp, $tabela; require $include . 'sisdoc_colunas.php'; require $include . 'sisdoc_debug.php'; $clx = new cep(); $tabela = $clx->tabela; $label = msg("protocols"); $http_edit = troca(page(), '.php', '_ed.php'); $http_ver = 'protocol_detalhe.php'; $http = page(); $editar = True; $http_redirect = page(); //$http_ver = 'cliente_ver.php'; $clx->row(); $busca = true; $offset = 20; //$pre_where = " e_mailing = '".$cl->mail_codigo."' "; echo '<h1>' . msg('cep_protocol') . '</h1>'; echo '<fieldset><legend>' . msg('protocol') . '</legend>'; echo '<TABLE width="100%" align="center"><TR><TD>'; require $include . 'sisdoc_row.php'; echo '</table>'; echo '</fieldset>';
<?php require '../_class/_class_csf.php'; $csf = new csf(); $total = $csf->total_bolsistas(); echo '<div id="content">'; echo '<div style="text-align: justify">'; $txt = troca($txt, ' 50 ', ' ' . $total . ' '); echo $txt; echo '</div>'; echo $csf->world_onde_curso_universidade(); //echo $csf->estudantes_curso_instituicao(); echo '</div>';
/** * Exportacao - criar arquivo com mensagens das paginas */ function language_page_create() { $cr = chr(13) . chr(10); $domtree = new DOMDocument('1.0', 'UTF-8'); /* create the root element of the xml tree */ $xmlRoot = $domtree->createElement("xml"); /* append it to the document created */ $xmlRoot = $domtree->appendChild($xmlRoot); $pags = array(); $sql = "select msg_language from " . $this->tabela . " group by msg_language"; $rlt = db_query($sql); while ($line = db_read($rlt)) { array_push($pags, $line['msg_language']); } /* Constroi as paginas */ for ($ro = 0; $ro < count($pags); $ro++) { $sql = "select * from " . $this->tabela . " where (msg_ativo = 1) "; $sql .= " and (msg_language = '" . $pags[$ro] . "') "; $sql .= " order by msg_language, msg_field "; $rlt = db_query($sql); $sx = ''; /* Construi arquivo */ $sv = ''; /* validacoes de traduca */ $sv .= '$messav = array(' . $cr; $sx = '<?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify // ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt ' . $cr; $sx .= '/* Arquivo de Mensagens das paginas */' . $cr; $sx .= '$messa = array(' . $cr; $idio = "xxx"; $it = 0; echo '<table width="100%" class="border01">'; echo '<tr><td>'; echo 'Language: ' . $pags[$ro] . '<BR>'; /* Create XML */ while ($xline = db_read($rlt)) { $xlan = trim($xline['msg_language']); $xfile = trim($xline['msg_field']); $xpage = trim($xline['msg_content']); $xfile = troca($xfile, '&', '[e]'); $xpage = troca($xpage, '&', '[e]'); if (strlen($xfile) > 0) { if ($xfile != $xpage) { $currentReg = $domtree->createElement("reg"); $xmlRoot->appendChild($currentReg); $currentReg->appendChild($domtree->createElement('msg_language', $xlan)); $currentReg->appendChild($domtree->createElement('msg_field', $xfile)); $currentReg->appendChild($domtree->createElement('msg_content', $xpage)); } } if ($xlan != $idio) { if ($it > 0) { $sx .= $cr . ') ,'; } if ($it > 0) { $sv .= $cr . ') ,'; } /* mensagens */ /* validacao */ $sv .= $cr; $sv .= '/* New Language ' . $xline['msg_language'] . ' */'; $sv .= $cr; $sv .= "'" . $xline['msg_language'] . "'=>"; $sv .= " array(" . $cr; /* mensagens */ $sx .= $cr; $sx .= '/* New Language ' . $xline['msg_language'] . ' */'; $sx .= $cr; $sx .= "'" . $xline['msg_language'] . "'=>"; $sx .= " array(" . $cr; $it = 0; $idio = $xlan; } if ($it > 0) { $sx .= ',' . $cr; } if ($it > 0) { $sv .= ',' . $cr; } $page_banco = $line['msg_pag']; if (!strlen(trim($page_banco)) == 0) { $page_banco = unserialize($page_banco); } else { $page_banco = array(); } $pages = ' array('; $i = 0; foreach ($page_banco as $key => $value) { if ($i > 0) { $pages .= ', '; } $pages .= "'{$key}' => '{$value}' "; $i++; } $pages .= ')'; $sx .= " '" . trim($xline['msg_field']) . "'=>'" . trim($xline['msg_content']) . "' "; $sv .= " '" . trim($xline['msg_field']) . "'=>" . $pages . " "; $it++; //echo '<BR>'.trim($xline['msg_field']); echo '. '; } echo '</table>'; $sx .= $cr . ')'; $sx .= '); '; $sx .= $cr; $sv .= $cr . ')'; $sv .= '); '; $sv .= $cr; /* Salvar arquivo */ $arq = 'messages/msg_' . trim($pags[$ro]); $fld = fopen($arq . '.php', 'w+'); fwrite($fld, $sx); fwrite($fld, $sv); fwrite($fld, '?>'); fclose($fld); } /* XML */ $arq = 'messages/msg.xml'; $domtree->save($arq); }
function upload_file_save() { global $dd, $messa, $acao, $tipo; $page = page() . '?'; $page .= 'dd0=' . $dd[0] . '&dd5=' . $dd[5] . '&dd2=' . $dd[2] . '&dd1=' . $dd[1] . '&dd90=' . $dd[90]; $saved = 0; if (strlen($acao) > 0) { $tipo = $dd[2]; $nome = lowercasesql($_FILES['arquivo']['name']); $temp = $_FILES['arquivo']['tmp_name']; $size = $_FILES['arquivo']['size']; $path = $this->upload_path; $extensoes = $this->upload_format; /* valida extensao */ $ext = strtolower($nome); while (strpos(' ' . $ext, '.') > 0) { $ext = substr($ext, strpos($ext, '.') + 1, strlen($ext)); } $ext = '.' . $ext; /* diretorio */ $nome = substr($nome, 0, strlen($nome) - 4); $nome = lowercasesql(troca($nome, ' ', '_')); $nome .= $ext; $this->dir($path); if ($this->up_month_control == 1) { $path .= date("Y") . '/'; $this->dir($path); $path .= date("m") . '/'; $this->dir($path); } /* caso nao apresente erro */ if (strlen($erro) == 0) { $compl = $dd[1] . '-' . substr(md5($nome . date("His")), 0, 5) . '-'; $compl = troca($compl, '/', '-'); $this->filename = $path . $compl . $nome; if (move_uploaded_file($temp, $path . $compl . $nome)) { return 1; } else { $sx = 'Erro de salvamento'; return 0; } } else { echo '<center>' . msg($erro) . '</center>'; } return 0; } }
function form_field($cp, $vlr) { global $dd, $ddi; /* Zera tela */ $tela = ''; $table = 1; if (!isset($dd)) { $dd = array(); $ddi = 0; } $type = $cp[0]; $label = $cp[2]; $required = $cp[3]; $placeholder = $label; $readonly = $cp[4]; $tt = substr($type, 1, 1); /* exessoes */ if (substr($type, 0, 4) == '$MES') { $tt = 'MES'; } /* form */ $max = 100; $size = 100; $dados = array(); $dn = 'dd' . $ddi; if ($table == 1) { $td = '<td>'; $tdl = '<td align="right">'; $tdn = '</td>'; $tr = '<tr valign="top">'; $trn = '</tr>'; } else { $td = ''; $tdl = ''; $tdn = ''; $tr = ''; $trn = ''; } //$dados = array('name'=>'dd'.$ddi, 'id'=>'dd'.$ddi,'value='.$dd[$ddi],'maxlenght'=>$max,'size'=>$size,$class=>''); switch ($tt) { /* Button */ case 'B': $tela .= $tr . $tdl . $td; $dados = array('name' => 'acao', 'id' => 'acao', 'value' => $label); $tela .= form_submit($dados); $tela .= $tdn . $trn; break; /* Oculto */ /* Oculto */ case 'H': $dados = array($dn => $vlr); $tela .= form_hidden($dados); break; /* Select Box - Mes */ /* Select Box - Mes */ case 'MES': $options = array('' => '::select an option::'); /* recupera dados */ for ($r = date("Y") + 4; $r > 1990; $r--) { $vlra = $r; $options[$vlra] = '===' . $r . '==='; //array_push($options,array('2019')); $ar = array(); for ($y = 12; $y > 0; $y--) { $vlrs = $r . strzero($y, 2) . '01'; $cpt = $r . '/' . msg('mes_' . strzero($y, 2)); $op = array($vlr => $cpt); $ar[$vlrs] = $cpt; //array_push($options,$op); } $options[$vlra] = $ar; } $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } if (strlen($vlr) == 0) { $vlr = date("Ym") . '01'; } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* Select Box */ /* Select Box */ case 'Q': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, ':', ';') . ';'; $param = splitx(';', $ntype); $options = array('' => '::select an option::'); /* recupera dados */ $sql = "select * from (" . $param[2] . ") as tabela "; $CI =& get_instance(); $query = $CI->db->query($sql); foreach ($query->result_array() as $row) { /* recupera ID */ $flds = trim($param[0]); $vlrs = trim($param[1]); $flds = $row[$flds]; $vlrs = $row[$vlrs]; $options[$flds] = $vlrs; } $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select'); $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $tela .= '<TD>'; $tela .= form_dropdown($dados, $options, $vlr); break; /* String */ /* String */ case 'S': /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => $size, 'placeholder' => $label, 'class' => 'form_string'); if ($readonly == false) { $dados['readonly'] = 'readonly'; } $tela .= $td . form_input($dados); $tela .= $tdn . $trn; break; /* Update */ /* Update */ case 'U': if (round($vlr) == 0) { $vlr = date("Ymd"); } $dados = array($dn => $vlr); $tela .= form_hidden($dados); break; /* Textarea */ /* Textarea */ case 'T': $ntype = trim(substr($type, 2, strlen($type))); $ntype = troca($ntype, ':', ';') . ';'; $param = splitx(';', $ntype); /* TR da tabela */ $tela .= $tr; /* label */ if (strlen($label) > 0) { $tela .= $tdl . $label . ' '; } if ($required == 1) { $tela .= ' <font color="red">*</font> '; } $data = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'rows' => $param[1], 'cols' => $param[0], 'class' => 'form_textarea'); $tela .= $td . form_textarea($data); $tela .= $tdn . $trn; break; /* Password */ /* Password */ case 'P': if (strlen($label) > 0) { $tela .= $label . ' '; } $dados = array('name' => $dn, 'id' => $dn, 'value' => $vlr, 'maxlenght' => $max, 'size' => $size); $tela .= form_password($dados); break; } $ddi++; return $tela; }
////////////////////////////// Variaveis iniciais $pdf->SetFont('Arial', 'B', 14); $pdf->MultiCell(0, 6, utf8_decode(msg('dictamen_number')) . ' ' . $nrp, 1, 'C'); $pdf->Ln(6); $pdf->SetFont('Arial', 'B', 16); $decision = msg('pm_' . trim($line['pr_situacao'])); $pdf->MultiCell(0, 6, utf8_decode(msg('decision_oficial')) . ': ' . $decision, 0, 'C'); $pdf->Ln(6); /* titulo do projeto */ $pdf->SetFont('Arial', '', 8); $pdf->Cell(35, 6, utf8_decode(msg('dictamen_project_title')), T, T, 'R'); $pdf->SetFont('Arial', 'B', 11); $titulo = trim($line['cep_titulo']); $titulo = troca($titulo, chr(13), ' '); $titulo = troca($titulo, chr(10), ' '); $titulo = troca($titulo, ' ', ' '); $pdf->MultiCell(0, 5, utf8_decode($titulo), LT, 'L'); /* Inverstigador */ $pdf->SetFont('Arial', '', 8); $pdf->Cell(35, 6, utf8_decode(msg('dictamen_investigador')), T, T, 'R'); $pdf->SetFont('Arial', 'B', 11); $nome = trim($line['us_nome']) . chr(13) . chr(10); $nome .= trim($line['us_instituition']); $pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L'); /* Pais do Estudo */ $pdf->SetFont('Arial', '', 8); $pdf->Cell(35, 6, utf8_decode(msg('dictamen_country')), T, T, 'R'); $pdf->SetFont('Arial', 'B', 11); $nome = trim($line['pais_nome']); $pdf->MultiCell(0, 6, utf8_decode($nome), TL, 'L'); /* Tipo do Estudo */
function sql_convert($sql) { if (strpos($sql, 'serial NOT NULL') > 0) { $posi = strpos($sql, '('); $posf = strpos($sql, 'serial NOT NULL'); $key = trim(substr($sql, $posi + 1, $posf - $posi - 1)); $sql = troca($sql, 'serial NOT NULL', ' int PRIMARY KEY IDENTITY '); // $sql = substr($sql,0,strlen($sql)-2); // $sql .= ", PRIMARY KEY($key) );"; $sql = troca($sql, 'int(1)', 'int'); $sql = troca($sql, 'int(4)', 'int'); $sql = troca($sql, 'int(8)', 'int'); $sql = troca($sql, 'int(16)', 'int'); $sql = troca($sql, 'int(11)', 'int'); } return $sql; }
array_push($cp, array('$H8', 'doc_type', '', False, True)); array_push($cp, array('$H8', 'doc_xml', '', False, True)); array_push($cp, array('$H8', 'doc_caae', '', False, True)); $tela = $form->editar($cp, $tabela); if ($form->saved > 0) { if (round($protocolo) == 0) { $proj->updatex(); $sql = "select * from " . $proj->tabela . " where doc_autor_principal = '" . trim($ss->user_codigo) . "' \n\t\t\t\t\tand doc_status = '@' order by id_doc desc "; $rlt = db_query($sql); if ($line = db_read($rlt)) { $_SESSION['proj_id'] = $line['id_doc']; $_SESSION['proj_page'] = 1; $pt = strzero($_SESSION['proj_id'], 7); $at = $line['doc_autor_principal']; } else { echo msg('ERRO-SAVE_NEW_PROJET'); exit; } /* Incluir o pesquisador principal */ $proj->inserir_pesquisador_autor($pt, $at); } $_SESSION['proj_page'] = 2; redirecina('submit.php?time' . date("dmYhis")); } else { echo $tela; } $dd5 = troca(msg('title_main_inf'), chr(13), ''); $dd5 = troca($dd5, chr(10), ''); $dd7 = troca(msg('title_public_inf'), chr(13), ''); $dd7 = troca($dd7, chr(10), '');
border: 1px solid Gray; padding: 1px 1px 1px 1px; text-align: left; text-decoration: none; font-family: Verdana, Geneva, Arial, Helvetica, sans-serif; font-size: 12px; font-weight: normal; letter-spacing: 0px; } </style> '; $page = page(); if (strlen($http_redirect) > 0) { global $dd, $base; $pg_cookie = $page; $pg_cookie = troca($pg_cookie, '.php', ''); /******** Salva Session */ /* Filtro ativado */ if (strlen($dd[50]) > 0) { if (substr($dd[50], 0, 1) == 'c') { $_SESSION[$page . '_filtro'] = ''; $_SESSION[$page . '_pos'] = ''; $_SESSION[$page . '_ordem'] = ''; $dd[1] = ''; $dd[4] = ''; $clean = 0; } else { if (strlen($dd[1]) > 0) { $_SESSION[$page . '_filtro'] = $dd[1]; $_SESSION[$page . '_field'] = $dd[2]; $_SESSION[$page . '_pos'] = $dd[4];
function mostra($data = 0, $page = 6) { global $institution_name, $institution_site; $data = round($data); $sql = "select * from cep_protocolos\n\t\t\t\t\tleft join usuario on cep_pesquisador = us_codigo\n\t\t\t\t\twhere cep_reuniao = {$data}\n\t\t\t\t\torder by cep_caae , cep_data\n\t\t\t\t"; $rlt = db_query($sql); $link = '<A href="javascript:newxy2(\'meeting_schediled_popup.php?dd1=' . $data . '&dd2=' . $page . '\',800,600);">'; $sh = '<table bgcolor="white" class="tabela00" cellpadding=0 cellspacing=0 width="100%" border=0>'; $sh .= '<TR valign="top"> <TD colspan=1 rowspan=2 width="10%">'; $sh .= '<img src="img/logo_dictamen.jpg">'; $sh .= '<TD colspan=2><center><B>' . $institution_name . '</B>'; $sh .= '<BR>' . $institution_site; $sh .= '</center>'; $sh .= '<div id="icone_pr">' . $link . '<img src="img/icone_print.png" width="48" border=0></A></div>'; $sh .= '<TR><TD>'; $sh .= '<div class="lt0" style="text-align: right">page</div>'; $sh .= '</table>'; /* Dados da pauta */ $sh .= '<table class="table_proj tabela00" width="100%" border=0>'; $sh .= '<TR><TD colspan=4><h2><center>' . msg("scheduled_meeting") . ' - ' . stodbr($data) . '</center></h2>'; $sh .= '<TR> <TH width="10%">' . msg('protocol'); $sh .= '<TH width="80%" colspan=2>' . msg('project_title'); $sh .= '<TH width="10%">' . msg('results'); $sx = ''; $tot = 99; $totr = 0; $pag = 1; while ($line = db_read($rlt)) { if ($tot + 1 > $page) { $tot = 0; if ($pag > 1) { $sx .= '</table>'; $sx .= '<p style="page-break-before: always;"></p>'; } $sx .= troca($sh, 'page', 'p. ' . $pag); $pag++; } $tot++; $totr++; $sx .= '<TR valign="top" class="tabela01">'; /* NR caae */ $sx .= '<TD rowspan=2> <font class="lt1"><B>' . $line['cep_caae'] . '</B>' . '</font>'; $sx .= '<BR>' . msg('version') . ' ' . $line['cep_versao']; $sx .= '<BR><center><font class="lt0">' . stodbr($line['cep_data']) . '</font></center>'; /* Project title */ $sx .= '<TD colspan=2><B>' . $line['cep_titulo'] . '</B>'; /* Decision */ $sx .= '<TD rowspan=2 width="60"><center>' . msg('decision'); $sx .= '<table border=1 width=80%> <TR><TD height="30"> </table>'; $sx .= '<TR>'; $sx .= '<TD colspan=2>' . msg('investigador') . ': <B>' . $line['us_nome']; $sx .= '</B> - ' . $line['us_instituition']; $sx .= '<BR> '; } $sx .= '<TR><TD colspan=3>' . msg('found') . ' ' . $totr . ' ' . msg('register'); $sx .= '</table>'; $sx .= show_logo(); return $sx; }
function config_file() { $ip = $_SERVER['HTTP_HOST']; $ip = troca($ip, '.', '_'); $ip = troca($ip, ':', '_'); $file = 'db_' . $ip . '.php'; return $file; }
$botton_submit = 0; $xcdo = "X"; $se = ''; while ($line = db_read($rlt)) { /* Dados do campos de edicao */ $name_id = $line['sub_codigo']; $s .= '<A NAME="' . $name_id . '"></A>'; if ($xcod != $name_id) { $xcod = $name_id; /* Recupera dados gravados se nao tem acao */ if (strlen($acao) == 0) { $value = trim($line['spc_content']); } else { $value = trim($_POST['dd' . $name_id]); } $value = troca($value, "'", "´"); /* Dados do campos de edicao */ $CP1 = trim($line['sub_field']); $CP2 = msg(trim($line['sub_descricao'])); $CP2a = $CP2; $mmm = trim(trim($line['sub_descricao']) . '_inf'); $mmm = msg($mmm); /* Se for botão anula mensagem de informação */ if (substr($CP1, 0, 2) == '$B') { $mmm = ''; } if (strpos($mmm, '_inf') > 0) { $mmm = ''; } $CP3 = ''; /* Armazena para gravacao dados ja inseridos */
define(path,''.$_SERVER['PATH_INFO']); define(host,getServerHost()); define(secu,'ojsbr'); $path = substr(path,1,100); $charset = "ASCII"; //-------------------------------------- Leituras das Variaveis dd0 a dd99 (POST/GET) $vars = array_merge($_GET, $_POST); for ($k=0;$k < 100;$k++) { $varf='dd'.$k; $varf=$vars[$varf]; //if (isset($varf) and ($k > 1)) { //$varf = str_replace($varf,"A","�"); } $varf = troca($varf,chr(92),''); $dd[$k] = troca($varf,"'","�"); } $acao = $vars['acao']; $nocab = $vars['nocab']; $base = 'pgsql'; $http = 'http://www2.pucpr.br/reol/'; //-------------------------------------- Determina o Idioma de Navega��o $idv = $vars['idioma']; if (strlen($idv) > 0) { $_SESSION["idioma"] = $idv; $idioma = $idv;
function confirm_notify_by_email() { global $LANG, $hd; $email_cep = $hd->email_replay; $email_nome = $hd->title; $ic = new ic(); $ic = $ic->ic('email_notify_subm'); $this->le($this->protocolo_cep); $sx = $this->mostra_email($this->line); $texto = mst(utf8_decode($ic['text'])); $subject = utf8_decode($ic['title']); $texto = troca($texto, '$INFORMACION_DEL_PROTOCOLO', $sx); $texto = troca($texto, '$PROTOCOL_INFORMATION', $sx); $texto = troca($texto, '$TITLE', $sx); $texto = troca($texto, '$INFORMACION_DEL_COMITTE', $sx); $texto = troca($texto, '$COMMITTEE_INFORMATION', $sx); $emails = array(); array_push($emails, $email_cep); for ($r = 0; $r < count($emails); $r++) { $email = $emails[$r]; //echo '<BR>'.msg('send_to_email').':'.$email; enviaremail($email, '', $subject, $texto); } }
// ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt require 'db.php'; // PHP5 Implementation - uses MySQLi. // mysqli('localhost', 'yourUsername', 'yourPassword', 'yourDatabase'); // Is there a posted query string? if (isset($_POST['queryString'])) { $queryString = troca($_POST['queryString'], "'", "´"); // Is the string length greater than 0? if (strlen($queryString) > 0) { // Run the query: We use LIKE '$queryString%' // The percentage sign is a wild-card, in my example of countries it works like this... // $queryString = 'Uni'; // Returned data = 'United States, United Kindom'; // YOU NEED TO ALTER THE QUERY TO MATCH YOUR DATABASE. // eg: SELECT yourColumnName FROM yourTable WHERE yourColumnName LIKE '$queryString%' LIMIT 10 $sql = "SELECT it_nome FROM institutions WHERE it_nome LIKE '{$queryString}%' LIMIT 10"; $rlt = db_query($sql); while ($line = db_read($rlt)) { echo '<li onClick="fill(\'' . $result->it_nome . '\');">' . $result->it_nome . '</li>'; } } }
function update11() { $up = 0; $new = 0; $filename = "_documents/ged_download_fld.php.xml"; $sql = "delete from cep_submit_manuscrito_field "; $rlt = db_query($sql); $xml = ""; $f = fopen($filename, 'r'); while ($data = fread($f, 4096)) { $xml .= $data; } fclose($f); preg_match_all("/\\<reg\\>(.*?)\\<\\/reg\\>/s", $xml, $bookblocks); foreach ($bookblocks[1] as $block) { //$block = utf8_encode($block); $block = troca($block, '[e]', '&'); preg_match_all("/\\<sub_pos\\>(.*?)\\<\\/sub_pos\\>/", $block, $sub_pos); preg_match_all("/\\<sub_field\\>(.*?)\\<\\/sub_field\\>/", $block, $sub_field); preg_match_all("/\\<sub_css\\>(.*?)\\<\\/sub_css\\>/", $block, $sub_css); preg_match_all("/\\<sub_descricao\\>(.*?)\\<\\/sub_descricao\\>/", $block, $sub_descricao); preg_match_all("/\\<sub_ativo\\>(.*?)\\<\\/sub_ativo\\>/", $block, $sub_ativo); preg_match_all("/\\<sub_codigo\\>(.*?)\\<\\/sub_codigo\\>/", $block, $sub_codigo); preg_match_all("/\\<sub_informacao\\>(.*?)\\<\\/sub_informacao\\>/", $block, $sub_informacao); preg_match_all("/\\<sub_projeto_tipo\\>(.*?)\\<\\/sub_projeto_tipo\\>/", $block, $sub_projeto_tipo); preg_match_all("/\\<sub_ordem\\>(.*?)\\<\\/sub_ordem\\>/", $block, $sub_ordem); preg_match_all("/\\<sub_pag\\>(.*?)\\<\\/sub_pag\\>/", $block, $sub_pag); preg_match_all("/\\<sub_obrigatorio\\>(.*?)\\<\\/sub_obrigatorio\\>/", $block, $sub_obrigatorio); preg_match_all("/\\<sub_editavel\\>(.*?)\\<\\/sub_editavel\\>/", $block, $sub_editavel); preg_match_all("/\\<sub_pdf_title\\>(.*?)\\<\\/sub_pdf_title\\>/", $block, $sub_pdf_title); preg_match_all("/\\<sub_pdf_mostra\\>(.*?)\\<\\/sub_pdf_mostra\\>/", $block, $sub_pdf_mostra); preg_match_all("/\\<sub_pdf_align\\>(.*?)\\<\\/sub_pdf_align\\>/", $block, $sub_pdf_align); preg_match_all("/\\<sub_pdf_font_size\\>(.*?)\\<\\/sub_pdf_font_size\\>/", $block, $sub_pdf_font_size); preg_match_all("/\\<sub_pdf_space\\>(.*?)\\<\\/sub_pdf_space\\>/", $block, $sub_pdf_space); preg_match_all("/\\<sub_limite\\>(.*?)\\<\\/sub_limite\\>/", $block, $sub_limite); preg_match_all("/\\<sub_caption\\>(.*?)\\<\\/sub_caption\\>/", $block, $sub_caption); preg_match_all("/\\<sub_id\\>(.*?)\\<\\/sub_id\\>/", $block, $sub_id); $_sub_pos = $sub_pos[1][0]; $_sub_field = $sub_field[1][0]; $_sub_css = $sub_css[1][0]; $_sub_descricao = $sub_descricao[1][0]; $_sub_ativo = $sub_ativo[1][0]; $_sub_codigo = $sub_codigo[1][0]; $_sub_pag = $sub_pag[1][0]; $_sub_obrigatorio = $sub_obrigatorio[1][0]; $_sub_editavel = $sub_editavel[1][0]; $_sub_informacao = $sub_informacao[1][0]; $_sub_projeto_tipo = $sub_projeto_tipo[1][0]; $_sub_ordem = $sub_ordem[1][0]; $_sub_pdf_title = $sub_pdf_title[1][0]; $_sub_pdf_mostra = $sub_pdf_mostra[1][0]; $_sub_pdf_align = $sub_pdf_align[1][0]; $_sub_pdf_font_size = $sub_pdf_font_size[1][0]; $_sub_pdf_space = $sub_pdf_space[1][0]; $_sub_limite = $sub_limite[1][0]; $_sub_caption = $sub_caption[1][0]; $_sub_id = $sub_id[1][0]; $sql = "insert cep_submit_manuscrito_field \n\t\t\t\t\t(\n\t\t\t\t\tsub_pos, sub_field, sub_css,\n\t\t\t\t\tsub_descricao, sub_ativo, sub_codigo,\n\t\t\t\t\tsub_pag, sub_obrigatorio, sub_editavel,\n\t\t\t\t\t\n\t\t\t\t\tsub_informacao, sub_projeto_tipo, sub_ordem,\n\t\t\t\t\tsub_pdf_title, sub_pdf_mostra, sub_pdf_align,\n\t\t\t\t\tsub_pdf_font_size, \tsub_pdf_space, sub_limite,\n\t\t\t\t\t\t\n\t\t\t\t\tsub_caption, sub_id)\n\t\t\t\t\tvalues\n\t\t\t\t\t(\n\t\t\t\t\t'{$_sub_pos}', '{$_sub_field}', '{$_sub_css}',\n\t\t\t\t\t'{$_sub_descricao}', '{$_sub_ativo}', '{$_sub_codigo}',\n\t\t\t\t\t'{$_sub_pag}', '{$_sub_obrigatorio}', '{$_sub_editavel}',\n\t\t\t\t\t\n\t\t\t\t\t'{$_sub_informacao}', '{$_sub_projeto_tipo}', '{$_sub_ordem}',\n\t\t\t\t\t'{$_sub_pdf_title}', '{$_sub_pdf_mostra}', '{$_sub_pdf_align}',\n\t\t\t\t\t'{$_sub_pdf_font_size}', \t'{$_sub_pdf_space}', '{$_sub_limite}',\n\t\t\t\t\t\t\n\t\t\t\t\t'{$_sub_caption}', '{$_sub_id}'\n\t\t\t\t\t)\n\t\t\t\t\t "; $RLT = db_query($sql); //exit; $new++; } if ($up + $new > 0) { echo '<br>' . msg('update') . ' 011 ' . msg('successful') . ' ' . $new . '/' . $up . ' updated'; } else { echo '<br>' . msg('already update - 011'); } }
function LowerCaseSQL($d) { $qch1 = "������������������������������������������������"; $qch2 = "aeiouaeiouaeiouaeiouaeiouaeiouccaeiouaeiouaoaoao"; for ($qk = 0; $qk < strlen($qch2); $qk++) { $d = troca($d, substr($qch1, $qk, 1), substr($qch2, $qk, 1)); } $d = strtolower($d); return $d; }
// You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt /** * GED-ged_documento * @author Rene Faustino Gabriel Junior <*****@*****.**> (Analista-Desenvolvedor) * @copyright © Pan American Health Organization, 2013. All rights reserved. * @access public * @version v0.13.45 * @package Class * @subpackage Ged */ require_once "_class/_class_ged.php"; $ged = new ged(); $path = $_SERVER['SCRIPT_FILENAME']; $path = troca($path, page(), '') . 'document/'; $ged_up_path = $path; $ged_up_maxsize = 1024 * 1024 * 2; /* 10 Mega */ $ged_up_format = array('*'); $ged_up_month_control = 1; $ged_up_doc_type = $tipo; $ged_del = 'delete'; $ged_tabela = 'ged_documento'; $ged_up_format = array('.pdf', '.doc', '.docx', '.rdf', '.ocx', '.xls', '.xlsx', '.odt'); $ged = new ged(); $ged->up_maxsize = $ged_up_maxsize; $ged->up_path = $ged_up_path; $ged->up_format = $ged_up_format; $ged->up_month_control = $ged_up_month_control; $ged->up_doc_type = $ged_up_doc_type;
function menus($menu, $tipo) { global $acao, $dd, $tab_max, $uploaddir, $include; ///////////////////////////////////////////////////// redirecionamento if (isset($dd[1]) and strlen($dd[1]) > 0) { $col = 0; for ($k = 0; $k <= count($menu); $k++) { if ($dd[1] == CharE($menu[$k][1])) { header("Location: " . $menu[$k][2]); } } } //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// /////////////////////////////////// Tipo 1 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($tipo == '1') { ?> <TABLE width="<?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify // ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt echo $tab_max; ?> " align="center" border="0"> <TR><TD colspan="4"> <FONT class="lt3"> </FONT><FORM method="post" action=""> </TD></TR> </TABLE> <TABLE width="<?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify // ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt echo $tab_max; ?> " align="center" border="0"> <TR> <?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify // ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt $xcol = 0; $seto = "X"; for ($x = 0; $x <= count($menu); $x++) { if (isset($menu[$x][2])) { $xseto = $menu[$x][0]; if (!($seto == $xseto)) { echo '<TR><TD colspan="10">'; echo '<TABLE width="100%" cellpadding="0" cellspacing="0">'; echo '<TR><TD class="lt3" width="1%"><BR><NOBR><B><font color="#0000a0">' . $xseto . ' </TD>'; echo '<TD><HR width="100%" size="2"></TD></TR>'; echo '</TABLE>'; echo '<TR class="lt3">'; $seto = $xseto; $xcol = 0; } if ($xcol >= 3) { echo '<TR><TD><img src="' . $img_dir . 'nada.gif" width="1" height="5" alt="" border="0"></TD><TR>'; $xcol = 0; } echo '<TD align="center">'; echo '<input type="submit" name="dd1" value="' . CharE($menu[$x][1]) . '" ' . $estilo_admin . '>'; echo '</TD>'; $xcol = $xcol + 1; } } ?> </TABLE></FORM> <?php // This file is part of the ProEthos Software. // // Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify // ProEthos under the terms of the ProEthos License as published by PAHO, which // restricts commercial use of the Software. // // ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY // WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A // PARTICULAR PURPOSE. See the ProEthos License for more details. // // You should have received a copy of the ProEthos License along with the ProEthos // Software. If not, see // https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt } //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// /////////////////////////////////// Tipo 2 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($tipo == '2') { } //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// /////////////////////////////////// Tipo 3 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// if ($tipo == '3') { $tps = 0; $seto = ''; for ($x = 0; $x <= count($menu); $x++) { $xseto = $menu[$x][0]; if (!($seto == $xseto)) { $tps++; $seto = $xseto; } } ///////////////////////////////// $col = 0; $cola = 0; $mcol = intval($tps / 2); $cm1 = ''; $cm2 = ''; $seto = 'x'; for ($x = 0; $x <= count($menu); $x++) { $xseto = $menu[$x][0]; if (!($seto == $xseto)) { $cola++; if ($cola > $mcol) { $col = 1; } $seto = lowercasesql($xseto); $seto = troca($seto, ' ', '_'); $img_icone = 'img/icone_' . $seto . '.png'; $updir = $_SERVER['SCRIPT_FILENAME']; $xx = strlen($updir); while ($xx > 0) { if (substr($updir, $xx, 1) == '/') { $updir = substr($updir, 0, $xx); $xx = 0; } $xx--; } $image = trim($updir) . '/' . $img_icone; if (!file_exists($image)) { $img_icone = $include . 'img/icone_noimage.png'; } //////////////////////////////////////////// $sc = '<TR><TD colspan="10">'; $sc .= '<TABLE width="100%" cellpadding="0" cellspacing="2" border="0" class="menu_tit">'; $sc .= '<TR><TD rowspan="2" width="48"><img src="' . $img_icone . '" width="48" height="48" alt=""></TD>'; $sc .= '<TD width="80%"><BR><NOBR><B>' . $xseto . ' </TD>'; $sc .= '<TR><TD><HR width="100%" size="2"></TD></TR>'; $sc .= '</TABLE>'; $sc .= '<TR class="lt1"><TD><UL>'; $seto = $xseto; $xcol = 0; } else { $sc = ''; } if (isset($menu[$x][2])) { $link = '<A href="' . $menu[$x][2] . '" class="menu_item">'; if (strlen(trim($menu[$x][2])) == 0) { $link = ''; } $pre = ''; $pos = ''; //////////////////////////////////////////////////////////////////////////// Título Em BOld if (substr($menu[$x][1], 0, 2) != '__' and strlen($link) == 0) { $menu[$x][1] = '<B>' . $menu[$x][1] . '</B>'; } if (substr($menu[$x][1], 0, 2) == '__') { $menu[$x][1] = substr($menu[$x][1], 2, 100); $pre = '<UL>'; $pos = '</UL>'; } if ($col == 0) { $cm1 .= $sc; $cm1 .= $pre . '<LI class="menu_li">' . $link . $menu[$x][1] . '</A><BR>' . $pos; } else { $cm2 .= $sc; $cm2 .= $pre . '<LI class="menu_li">' . $link . $menu[$x][1] . '</A><BR>' . $pos; } } } $sm = '<TABLE width="' . $tab_max . '" border=0 align="center">'; $sm .= '<TR valign="top">'; $sm .= '<TD width="48%"><table width="100%">' . $cm1 . '</table></TD>'; $sm .= '<TD width="4%"></TD>'; $sm .= '<TD width="48%"><table width="100%">' . $cm2 . '</table></TD>'; $sm .= '</TR>'; $sm .= '</TABLE>'; echo $sm; } }
function mst_autor($autor, $tp) { if ($tp == 1 or $tp == 2) { $aut = array(); $autor = $autor . chr(13); while (strpos($autor, chr(13)) > 0) { $wd = trim(substr($autor, 0, strpos($autor, chr(13)))); if (strlen($wd) > 0) { array_push($aut, trim($wd) . ';'); } $autor = substr($autor, strpos($autor, chr(13)) + 1, strlen($autor)); } $autor = ''; for ($qk = 0; $qk < count($aut); $qk++) { if (strlen($autor) > 0) { if ($tp == '1') { $autor = $autor . ', '; } if ($tp == '2') { $autor = $autor . '<BR>'; } } $autor = $autor . substr($aut[$qk], 0, strpos($aut[$qk], ';')); if (strlen(substr($aut[$qk], strpos($aut[$qk], ';') + 1, 100)) > 0) { /* Qualificação */ if ($tp == '2') { $nx = substr($aut[$qk], strpos($aut[$qk], ';'), 100); $nx = trim(troca($nx, ';', '')); if (strlen($nx) > 0) { $autor = $autor . '<sup> ' . ($qk + 1) . '</sup>'; } } } } if (strlen($autor) > 0 and $tp == '1') { $autor = $autor . '. '; } } if ($tp == 3) { $aut = array(); $autor = $autor . chr(13); while (strpos($autor, chr(13)) > 0) { $wd = trim(substr($autor, 0, strpos($autor, chr(13)))); if (strlen($wd) > 0) { array_push($aut, $wd); } $autor = substr($autor, strpos($autor, chr(13)) + 1, strlen($autor)); } $autor = ''; for ($qk = 0; $qk < count($aut); $qk++) { if (strlen($autor) > 0) { $autor = $autor . '<BR>'; } $mtautor = $aut[$qk]; if (strpos($mtautor, ';') > 0) { $ntautor = ' ' . substr($mtautor, strpos($mtautor, ';') + 1, strlen($mtautor)); if (strpos($ntautor, ';') > 0) { $bmautor = ""; $btautor = substr($ntautor, strpos($ntautor, ';') + 1, strlen($ntautor)); if ($btautor == '[DIR]') { $bmautor = "Diretor"; } if ($btautor == '[POS]') { $bmautor = "Aluno da Pós-Graduação"; } if ($btautor == '[GRA]') { $bmautor = "Aluno da Graduação"; } if ($btautor == '[ORI]') { $bmautor = "Orientador"; } if ($btautor == '[COL]') { $bmautor = "Colaborador"; } if ($btautor == '[COO]') { $bmautor = "Co-orientador"; } if ($btautor == '[PUC]') { $bmautor = "Bolsista PUCPR"; } if ($btautor == '[CNPQ]') { $bmautor = "Bolsista CNPQ"; } if ($btautor == '[FA]') { $bmautor = "Bolsista Fundação Araucária"; } if ($btautor == '[ICV]') { $bmautor = "ICV"; } if (strlen($btautor . $bmautor) > 0) { $autor = $autor . ($qk + 1) . ' ' . substr($ntautor, 0, strpos($ntautor, ';') - 1); $autor = $autor . $bmautor; } } else { $autor = $autor . ($qk + 1) . ' ' . substr($ntautor, strpos($ntautor, ';') + 1, strlen($ntautor)); } } } } return $autor; }
function save_arq() { $sql = "select * from _committee limit 1"; $rlt = db_query($sql); if ($line = db_read($rlt)) { $site = trim($line['cm_site']); $namei = trim($line['cm_name']); $name = trim($line['cm_admin_name']); $email = trim($line['cm_admin_email']); $addr = trim($line['cm_address']); $city = trim($line['cm_city']); $coun = trim($line['cm_country']); $phon = trim($line['cm_phone']); $code = trim($line['cm_committe']); $harvk = trim($line['cm_admin_key_harveting']); $harv = trim($line['cm_admin_key']); $chas = trim($line['cm_charcode']); $lang = trim($line['cm_language']); $type = trim($line['cm_type']); } $sx = "<?php\n// This file is part of the ProEthos Software. \n// \n// Copyright 2013, PAHO. All rights reserved. You can redistribute it and/or modify\n// ProEthos under the terms of the ProEthos License as published by PAHO, which\n// restricts commercial use of the Software. \n// \n// ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY\n// WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A\n// PARTICULAR PURPOSE. See the ProEthos License for more details. \n// \n// You should have received a copy of the ProEthos License along with the ProEthos\n// Software. If not, see\n// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt\n\n\t\n\t\t\t\t#site='" . $site . "';\n\t\t\t\t#institution_name='" . $namei . "';\n\t\t\t\t#institution_site='" . $site . "';\n\t\t\t\t#institution_address='" . $addr . "';\n\t\t\t\t#institution_city='" . $city . "';\n\t\t\t\t#institution_country='" . $coun . "';\n\t\t\t\t#institution_phone='" . $phon . "';\n\t\t\t\t\n\t\t\t\t#harvestig='" . $harv . "';\n\t\t\t\t#harvesting_key='" . $harvk . "';\n\t\t\t\t#institution_logo='" . '' . "';\n\t\t\t\t#admin_nome='" . $name . "';\n\t\t\t\t#admin_email='" . $email . "';\n\t\t\t\t#email_adm='" . $email . "';\n\t\t\t\t#committe='" . $code . "';\n\t\t\t\t\n\t\t\t\t#language='" . $lang . "';\n\t\t\t\t#commite_type='" . $type . "';\n\n\t\t\t\t/* Screen - Config */\n\t\t\t\t#tab_max='98%';\n\t\t\t\t#charset='" . $chas . "';\n\t\t\t\t" . chr(13) . chr(10) . '?>'; $sx = troca($sx, '#', '$'); $file = $this->config_exist_file(); $file = $this->file; $flt = fopen($file, 'w'); fwrite($flt, $sx); fclose($flt); }
<?php include 'lib.php'; $link = opendb(); include 'cookies.php'; $userrow = checkcookies(); if (isset($_GET["do"])) { $do = $_GET["do"]; if ($do == "troca") { troca(); } elseif ($do == "troca2") { troca2(); } elseif ($do == "troca3") { troca3(); } elseif ($do == "troca4") { troca4(); } } function troca() { global $topvar; $topvar = true; $qual = $_GET['qual']; $jogador = $_GET['jogador']; $msg = $_GET['msg']; $html = $_GET['html']; if ($jogador != "") { $msg = "Para realizar uma troca com o jogador " . $jogador . ", pressione o botão Realizar Nova Troca."; } /* testando se está logado */ //include('cookies.php');
$sa .= '<sub_css>' . $line['sub_css'] . '</sub_css>' . cr(); $sa .= '<sub_descricao>' . $line['sub_descricao'] . '</sub_descricao>' . cr(); $sa .= '<sub_ativo>' . $line['sub_ativo'] . '</sub_ativo>' . cr(); $sa .= '<sub_codigo>' . $line['sub_codigo'] . '</sub_codigo>' . cr(); $sa .= '<sub_pag>' . $line['sub_pag'] . '</sub_pag>' . cr(); $sa .= '<sub_obrigatorio>' . $line['sub_obrigatorio'] . '</sub_obrigatorio>' . cr(); $sa .= '<sub_editavel>' . $line['sub_editavel'] . '</sub_editavel>' . cr(); $sa .= '<sub_informacao>' . $line['sub_informacao'] . '</sub_informacao>' . cr(); $sa .= '<sub_projeto_tipo>' . $line['sub_projeto_tipo'] . '</sub_projeto_tipo>' . cr(); $sa .= '<sub_ordem>' . $line['sub_ordem'] . '</sub_ordem>' . cr(); $sa .= '<sub_pdf_title>' . $line['sub_pdf_title'] . '</sub_pdf_title>' . cr(); $sa .= '<sub_pdf_mostra>' . $line['sub_pdf_mostra'] . '</sub_pdf_mostra>' . cr(); $sa .= '<sub_pdf_align>' . $line['sub_pdf_align'] . '</sub_pdf_align>' . cr(); $sa .= '<sub_pdf_font_size>' . $line['sub_pdf_font_size'] . '</sub_pdf_font_size>' . cr(); $sa .= '<sub_pdf_space>' . $line['sub_pdf_space'] . '</sub_pdf_space>' . cr(); $sa .= '<sub_limite>' . $line['sub_limite'] . '</sub_limite>' . cr(); $sa .= '<sub_caption>' . $line['sub_caption'] . '</sub_caption>' . cr(); $sa .= '<sub_id>' . $line['sub_id'] . '</sub_id>' . cr(); $sa .= '</reg>' . cr(); $sa = troca($sa, '&', '[e]'); echo $sa; } echo '</fields>' . cr(); function cr() { $sx = chr(13) . chr(10); return $sx; } ?>