}
$codigobarras = $oConvenio->getCodigoBarra();
$linhadigitavel = $oConvenio->getLinhaDigitavel();
$pdf1->tipo_convenio = $oConvenio->getTipoConvenio();
if ($oRegraEmissao->isCobranca()) {
$pdf1->agencia_cedente = $oConvenio->getAgenciaCedente();
$pdf1->carteira = $oConvenio->getCarteira();
if (strlen(trim($oConvenio->getConvenioCobranca())) == 7) {
$pdf1->nosso_numero = trim($oConvenio->getConvenioCobranca()) . str_pad($k03_numpre . "00", 10, 0, STR_PAD_LEFT);
} else {
$pdf1->nosso_numero = $oConvenio->getNossoNumero();
}
}
$dtbase = $datavencimento;
$datavencimento = db_formatar($datavencimento, "d");
$numpre = db_sqlformatar($k03_numpre, 8, '0') . '000999';
$numpre = $numpre . db_CalculaDV($numpre, 11);
//concatena todos os parametros
$pdf1->uf_config = $db12_uf;
$pdf1->modelo = 2;
if (!empty($src)) {
$pdf1->logo = $src;
} else {
$pdf1->logo = 'logo_boleto.jpg';
}
$pdf1->prefeitura = $db_nomeinst;
$pdf1->enderpref = $db_ender;
$pdf1->numeropref = $db_numero;
$pdf1->municpref = $db_munic;
$pdf1->telefpref = $db_telef;
$pdf1->cgcpref = $db_cgc;
function db_barras($banco, $moeda, $valortit, $nossonumero, $codcedente, $agencia = "", $carteira = "", $dtvenc)
{
global $linha_digitavel;
global $codigo_barras;
if ($banco == 104) {
//db_barras(104,9,100,1111111,'8200','0461','00600000037');
//echo "linha:".$linha_digitavel."<br>";
//echo "barras".$barras."<br>";
// CAIXA ECONOMICA FEDERAL
//
// 0 0 1 1 2 2 3 3 4 4
// 1...5....0....5....0....5....0....5....0...4
//
// 104MDVVVVVVVVVVVVVVNNNNNNNNNNCCCCCCCCCCCCCCC
//
// onde: 104: codigo do banco
// M: 2=moeda variavel ou 9=real
// D: digito do codigo de barras
// V: valor do titulo
// N: nosso numero
// C: codigo cedente
//
// obs.: o "nosso numero" deve vir sem o digito de controle
//
if ($moeda == 2) {
$valortit = "0000000000";
} else {
if ($moeda == 9) {
$valortit = db_sqlformatar($valortit * 100, 10, '0');
// $valortit = db_sqlformat($valortit*100,14,"0");
// echo $valortit."<br>";
}
}
if ($dtvenc < date("d/m/a", mktime(0, 0, 0, 7, 3, 2000))) {
$favorecido = "1000";
} else {
$favorecido = db_sqlformatar($dtvenc - date("d/m/a", mktime(0, 0, 0, 10, 7, 1997)), 4, "0");
}
$barras = db_sqlformatar($banco, 3, " ", "0") . $moeda . $valortit . substr($nossonumero, 0, 10) . $agencia . $carteira;
$y = 4;
$tot_x = 0;
for ($i = 0; $i < 43; $i++) {
$tot_x = $tot_x + substr($barras, $i, 1) * $y;
$y = $y - 1;
if ($y < 2) {
$y = 9;
}
}
$digito = (intval($tot_x / 11) * 11 - $tot_x) * -1;
$digito = 11 - $digito;
if ($digito < 2 || $digito > 9) {
$digito = 1;
}
if ($digito == "0") {
$digito = "1";
}
// nossonumero = 8200031740
// codigocedente = 00600000094
// banco = 104
// moeda = 2
$codigo_barras = db_sqlformatar($banco, 3, "0") . $moeda . $digito . $valortit . substr($nossonumero, 0, 10) . "{$agencia}" . "{$carteira}";
//$digito1 = db_calcula_mod10($banco.$moeda.substr($barras,20,5));
//$digito2 = db_calcula_mod10($banco.$moeda.substr($barras,25,10));
//$digito3 = db_calcula_mod10($banco.$moeda.substr($barras,30,10));
$digito1 = db_calcula_dac(db_sqlformatar($banco, 3, "0") . $moeda . substr($barras, 18, 5));
$digito2 = db_calcula_dac(substr($barras, 23, 10));
$digito3 = db_calcula_dac(substr($barras, 33, 10));
//
if ($moeda == 2) {
$linha1 = db_sqlformatar($banco, 3, "0") . $moeda . substr($barras, 18, 5) . $digito1 . substr($barras, 23, 10) . $digito2 . substr($barras, 33, 10) . $digito3 . $digito . "000";
//
$linha_digitavel = substr($linha1, 0, 5) . "." . substr($linha1, 5, 5) . " " . substr($linha1, 10, 5) . "." . substr($linha1, 15, 6) . " " . substr($linha1, 21, 5) . "." . substr($linha1, 26, 6) . " " . substr($linha1, 32, 1) . " " . substr($linha1, 0, 3);
} else {
$linha1 = $banco . $moeda . substr($barras, 18, 5) . $digito1 . substr($barras, 23, 10) . $digito2 . substr($barras, 33, 10) . $digito3 . $digito . $valortit;
//
$linha_digitavel = substr($linha1, 0, 5) . "." . substr($linha1, 5, 5) . " " . substr($linha1, 10, 5) . "." . substr($linha1, 15, 6) . " " . substr($linha1, 21, 5) . "." . substr($linha1, 26, 6) . " " . substr($linha1, 32, 1) . " " . $valortit;
}
//
} else {
$barras = "0";
$linha_digitavel = "0";
}
}
$result = pg_exec("select * from proprietario where j01_matric = '{$matric}'");
if (pg_num_rows($result) == 0) {
echo "<script>js_erromatric('{$matric}');</script>";
echo "<script>history.back();</script>";
exit;
} else {
$tipodados = "matric";
$acesso = $matric;
$result = pg_exec("select * from proprietario where j01_matric = '{$matric}'");
db_fieldsmemory($result, 0);
$result = pg_exec("select * from cgm inner join iptubase on j01_matric = '{$matric}'");
db_fieldsmemory($result, 0);
}
} elseif (isset($inscr)) {
$where = "inner join arreinscr on arreinscr.k00_numpre = arrecad.k00_numpre \n where k00_inscr = {$inscr} ";
$inscr = db_sqlformatar($inscr, 6, ' ');
$result = pg_exec("select * from cgm inner join issbase on q02_inscr = '{$inscr}'");
if (pg_num_rows($result) == 0) {
echo "<script>js_erroinscr('{$inscr}');</script>";
echo "<script>history.back();</script>";
exit;
} else {
$tipodados = "inscr";
$acesso = $inscr;
db_fieldsmemory($result, 0, 0);
}
} else {
redireciona("gerador.php?" . base64_encode('verifica=' . @$verifica));
}
$dblink = "certidao.php";
$sql = "select k00_dtvenc\n from arrecad \n {$where}\n and k00_dtvenc < '" . date("Y-m-d", db_getsession("DB_datausu")) . "' limit 1";
