} 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;
