} elseif ($tpautorizacao == '1' or $tpautorizacao == '') { $tpautoriz = 'A'; } if (!isset($unimed_nova)) { $repassado = 'N'; } else { $repassado = 'S'; } if ($repassado != 'N') { if (F_ACHA_CONTRATO($unimed_nova, $contrato_nova, $familiag_nova, $dependencia_nova, $digito_nova) and $cdtipo_guia != '3') { $result = F_VALIDA_USUARIO($unimed_nova, $dependencia_nova, $digito_nova, $dthratendimento, $contrato_nova, $familiag_nova, 'WEB', '1', '', $txsenhaautempr, '0', $rn, $cdabrangenciausu, $tpautoriz, $dtnascc, '', $dtvalidc); } else { $result = F_VALIDA_USUARIO($unimed, $dependencia, $digito, $dthratendimento, $contrato, $familiag, 'WEB', '1', '', $txsenhaautempr, '0', $rn, $cdabrangenciausu, $tpautoriz, $dtnascc, '', $dtvalidc); } } else { $result = F_VALIDA_USUARIO($unimed, $dependencia, $digito, $dthratendimento, $contrato, $familiag, 'WEB', '1', '', $txsenhaautempr, '0', $rn, $cdabrangenciausu, $tpautoriz, $dtnascc, '', $dtvalidc); } if ($liberafinger == 'S') { $usario_liberadofinger = F_VALIDA_FINGER('', $nrsequencial, $nrregistro_usuario, $contrato, $result1, ''); //$pTpTransacao } if ($telaOrigemCart != 'INTERNACAO' and $telaOrigemCart != 'INTERCAMBIO') { if ($passCart == 'N' && $liberatecladousuario == 'S') { if (is_file("custom/regraliberacao_semcm.php") && $AW0003CM) { include "custom/regraliberacao_semcm.php"; } } } //Luiz Barros - 30/10/2009 //Cliente: Unimed São José do Rio Preto //Tratamento de Numero de Segunda via de Cartão para São José do Rio Preto
$unimed = substr($data1, 0, 3); $contrato = substr($data1, 4, 4); $familia = substr($data1, 9, 6); $dependencia = substr($data1, 16, 2); $digito = substr($data1, 19, 1); $sit = F_ACHA_CODIGONOVO($unimed, $contrato, $familia, $dependencia, $digito); $sql = "SELECT COUNT(*) SVC FROM SERVICO WHERE CDSERVICO = '{$sv}'"; $result = $db->query($sql); $row = $db->fetch_array($result); $cdsv = $row[SVC]; if ($cdsv == !1) { print "<SCRIPT LANGUAGE=JAVASCRIPT>alert('Não foi encontrado Serviço com este Código!');</SCRIPT>"; } else { $datahora = $dtdigitacao . $hrdigitacao; $txsenhaautempr = 'N'; $result = F_VALIDA_USUARIO($unimed, $dependencia, $digito, $datahora, $contrato, $familia, 'Autorização', '0', '0', '', '0', 'N', $cdabrangenciausu, 'A', '', '', ''); if ($situsu == 'CORRETO') { $cdocorrencia1 = !1; $aoaprovacao = !1; } else { $cdocorrencia1 = $situsu; $aoaprovacao = 'N'; } $aocobrarco = 'N'; // echo "$datahora"; F_VALIDA_SERVICO($unimed, $contrato, $familia, $dependencia, $sv, $datahora, $data2, $data3, $cdespecialidade, $aocobrarco, $qt, $nivel, 'Autorização', $rn . $nmusu, strtoupper($cid), $nrocorrencia, 'A', '', '', $cdtipo_guia, '', $status_digital, ''); if ($sitserv == !1 or $sitserv == 'CORRETO') { $cdocorrencia2 = !1; $aoaprovacao = !1; } else { $cdocorrencia2 = $sitserv;