Viewing file:  geraWSCobrancaRegistrada.php (6.12 KB) -rwxr-xr-x
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
require_once 'inc_Conexao.php';
include('./includes/inc_sicrediAutenticacaoWS.php');
if (isset($_GET["PED_RowID"]))
{
$SBV_RowID = $_GET["PED_RowID"];
}else{
$SBV_RowID = NULL;
}
//$SBV_RowID =
// REGISTRA TODOS OS BOLETOS
$sql = "
SELECT SVB_RowID, CON_CPF, CON_Descricao,CID_Descricao, OFI_Endereco, OFI_Cep, OFI_DDD,
OFI_Fone, DATE_FORMAT(SVB_DataVencimento, '%d/%m/%Y') AS SVB_DataVencimento, SVB_Valor
FROM irp_servicos_mensalidades
INNER JOIN irp_servicos_boletos ON SRM_RowID = SVB_Mensalidade_DR
INNER JOIN contatos ON CON_Oficios_DR = SRM_Oficio_DR
INNER JOIN oficios ON OFI_RowID = SRM_Oficio_DR
INNER JOIN cidades ON CID_RowID = OFI_Cidades_DR
WHERE SVB_RowID >= 23986
AND CON_AtivoSN = 'S'
AND SVB_EntradaConfirmadaRegistroSN = 'N'
AND SVB_BoletoRegistradoSN = 'N'
AND SVB_NossoNumeroWS = 0
";
// REGISTRA UM BOLETO ESPECIFICO
if ($SBV_RowID)
{
$sql .= " AND SVB_RowID = '$SBV_RowID' ";
}
$sql .= " LIMIT 2000";
// RELACIONA OS BOLETOS PARA REGISTRO
$rs_query = mysql_query($sql);
while ($rst_query = mysql_fetch_array($rs_query))
{
$seuNumero = "";
$idPedido = "";
$cpfCnpj = "";
$cep = "";
$idPedido = $rst_query['SVB_RowID'];
$cpfCnpj = $rst_query['CON_CPF'];
$nome = $rst_query['CON_Descricao'];
$endereco = $rst_query['OFI_Endereco'];
$cidade = $rst_query['CID_Descricao'];
$cep = $rst_query['OFI_Cep'];
$telefone = $rst_query['OFI_DDD'] . $rst_query['OFI_Fone'];
$seuNumero = $rst_query['SVB_RowID'];
$dataVencimento = $rst_query['SVB_DataVencimento'];
$valor = $rst_query['SVB_Valor'];
$mensagem = "MENSALIDADE";
if (strlen($cpfCnpj) < 15)
{
$tipoPessoa = "1";
}else{
$tipoPessoa = "2";
}
$nossoNumero = "";
$hora = date("H");
$diaSemana = date("w", mktime(0,0,0,date('m'),date('d'),date('Y')));
$cedente = "00981";
include('./includes/inc_sicrediEmissaoWS.php');
// HOUVE O REGISTRO DO BOLETO
if ($situacaoBoleto == 1)
{
$sql_01 = "
UPDATE irp_servicos_boletos
SET SVB_NossoNumeroWS = $nossoNumero,
SVB_EnvioWSSN = 'S',
SVB_EntradaConfirmadaRegistroSN = 'S',
SVB_BoletoRegistradoSN = 'S',
SVB_LinhaDigitavelWS = '$linhaDigitavel',
SVB_RegistroConfiguracaoComunicacaoWS_DR = '$situacaoBoleto'
WHERE SVB_RowID = $idPedido
";
$rs_query_01 = mysql_query($sql_01);
//echo "<pre>"; echo $sql_01; echo "</pre>";
if (!$rs_query_01)
{
die("ERRO AO SALVAR EM SISTEMA");
}
}else{
$sql_01 = "
UPDATE irp_servicos_boletos
SET SVB_RegistroConfiguracaoComunicacaoWS_DR = '$situacaoBoleto'
WHERE SVB_RowID = '$idPedido'
";
$rs_query_01 = mysql_query($sql_01);
echo "<pre>"; echo $sql_01; echo "</pre>";
if (!$rs_query_01)
{
die("ERRO AO SALVAR EM SISTEMA");
}
}
$diaAtual = date('Y-m-d H:i:s');
$sql_registro = "
INSERT INTO IRP_RegistroSolicitacaoComunicacaoWS
VALUES ('', '$idPedido', '$seuNumero', '$nossoNumero',
'$stringRetorno', '$stringRetornoFormatada', '$situacaoBoleto', 'R', '$diaAtual', 'S')
";
$rs_query_01 = mysql_query($sql_registro);
//echo "<pre>"; echo $sql_registro; echo "</pre>";
if (!$rs_query_01)
{
die("ERRO AO SALVAR EM SISTEMA");
}
/*
// ENVIO DE BOLETO
$subject = "BOLETO: $seuNumero ";
$mailto = "oscar@roko.com.br";
$xheader = "From: * EMISSAO DE BOLETO DO IRPEN * <oscar@roko.com.br> \n";
$xheader .= "Content-Type: text/html \n";
$xheader .= "Return-Path: <oscar@roko.com.br>"."\n";
$xheader .= "X-Priority: 1\n"; // Urgent message!
$sucesso = mail("$mailto", "$subject", "$stringRetornoFormatada", $xheader);
*/
sleep(2);
}
echo "\n\n CONCLUIDA A ROTINA PARA GERAR OS BOLETOS DA NOITE E FINAIS DE SEMANA | SELOS DIGITAIS ";
?>
<?
function calculaNossoNumero($sequenciaEnvio, $codigoAgencia, $posto, $benificiarioContaCorrente, $ano)
{
$sequenciaEnvio = str_pad("$sequenciaEnvio", 5, "0", STR_PAD_LEFT);
$nossoNumero[] = substr($codigoAgencia, 0, 1);
$nossoNumero[] = substr($codigoAgencia, 1, 1);
$nossoNumero[] = substr($codigoAgencia, 2, 1);
$nossoNumero[] = substr($codigoAgencia, 3, 1);
$nossoNumero[] = substr($posto, 0, 1);
$nossoNumero[] = substr($posto, 1, 1);
$nossoNumero[] = substr($benificiarioContaCorrente, 0, 1);
$nossoNumero[] = substr($benificiarioContaCorrente, 1, 1);
$nossoNumero[] = substr($benificiarioContaCorrente, 2, 1);
$nossoNumero[] = substr($benificiarioContaCorrente, 3, 1);
$nossoNumero[] = substr($benificiarioContaCorrente, 4, 1);
$nossoNumero[] = substr($ano, 2, 1);
$nossoNumero[] = substr($ano, 3, 1);
//$nossoNumero[] = "2";
$nossoNumero[] = substr($sequenciaEnvio, 0, 1);
$nossoNumero[] = substr($sequenciaEnvio, 1, 1);
$nossoNumero[] = substr($sequenciaEnvio, 2, 1);
$nossoNumero[] = substr($sequenciaEnvio, 3, 1);
$nossoNumero[] = substr($sequenciaEnvio, 4, 1);
$nossoNumero[] = substr($sequenciaEnvio, 5, 1);
//print_r($nossoNumero);
$DVNossoNumero = ($nossoNumero[0] * 4) + ($nossoNumero[1] * 3) + ($nossoNumero[2] * 2) +
($nossoNumero[3] * 9) + ($nossoNumero[4] * 8) + ($nossoNumero[5] * 7) +
($nossoNumero[6] * 6) + ($nossoNumero[7] * 5) + ($nossoNumero[8] * 4) +
($nossoNumero[9] * 3) + ($nossoNumero[10] * 2) +
($nossoNumero[11] * 9) + ($nossoNumero[12] * 8) + ($nossoNumero[13] * 7) +
($nossoNumero[14] * 6) + ($nossoNumero[15] * 5) + ($nossoNumero[16] * 4) +
($nossoNumero[17] * 3) + ($nossoNumero[18] * 2);
//echo $DVNossoNumero . "<br>";
$restoDivisao = $DVNossoNumero % 11;
$DVNossoNumero = 11 - $restoDivisao;
if ($DVNossoNumero == 10 || $DVNossoNumero == 11)
{
$DVNossoNumero = 0;
}
//echo $DVNossoNumero . "<br><br>";
//$nossoNumero = substr($ano, 2, 2) . "2" . $sequenciaEnvio . $DVNossoNumero;
$nossoNumero = substr($ano, 2, 2) . $sequenciaEnvio . $DVNossoNumero;
return($nossoNumero);
}
?>
|