$vir = ",";
}
$fornecedor_cgm = $fornecedores;
$fornecedores = " and z01_numcgm in ({$fornecedores}) ";
} else {
if (isset($forne) && $forne == "branco") {
$imprimirbranco = "branco";
}
}
if (isset($cgm) && $cgm != "" && $fornecedores == "") {
$fornecedor_cgm = $cgm;
$fornecedores = " and z01_numcgm = {$fornecedor_cgm}";
}
$branco = false;
$sCampos = "distinct \n pc20_codorc,\n pc20_dtate,\n pc20_hrate,\n pc20_obs,\n z01_nome,\n z01_numcgm,\n z01_cgccpf,\n z01_ender,\n z01_compl,\n z01_munic,\n z01_uf,\n z01_cep,\n z01_telef,\n z01_fax,\n z01_contato";
$result_pcorcamforne = $clpcorcamforne->sql_record($clpcorcamforne->sql_query_fornec(null, $sCampos, "", "pc21_codorc = {$pc20_codorc} {$fornecedores}"));
$numrows_pcorcamforne = $clpcorcamforne->numrows;
if ($numrows_pcorcamforne == 0) {
if (isset($gera_branco) && $gera_branco == true) {
$numrows_pcorcamforne = 1;
$branco = true;
} else {
db_redireciona("db_erros.php?fechar=true&db_erro=Nenhum registro encontrado ou orçamento sem fornecedores!");
}
}
$sCampos2 = "distinct\n pc11_codigo,\n pc11_quant,\n pc01_descrmater,\n pc11_resum,\n pc11_pgto,\n pc11_prazo,\n pc81_codprocitem,\n pc10_numero,\n pc81_codproc as pc80_codproc,\n m61_usaquant,\n m61_descr,\n pc17_codigo,\n pc17_quant,\n pc01_servico,\n pc23_valor,\n pc23_obs,\n pc23_vlrun,\n pc23_validmin";
$sWhere = " pc22_codorc={$pc20_codorc} \n and pc23_orcamforne in ( select pc21_orcamforne \n from pcorcamforne \n where pc21_numcgm in ({$fornecedor_cgm}) )";
$result_itens = $clpcorcamitemproc->sql_record($clpcorcamitemproc->sql_query_solicitem(null, null, $sCampos2, "pc81_codprocitem", $sWhere));
$numrows_itens = $clpcorcamitemproc->numrows;
if ($numrows_itens == 0) {
db_redireciona("db_erros.php?fechar=true&db_erro=Nenhum item encontrado neste orçamento!");
$fornecedores = "";
$vir = "";
if (isset($forne) && $forne != "branco") {
$arr_forne = split("forn_", $forne);
for ($i = 1; $i < sizeof($arr_forne); $i++) {
$fornecedores .= $vir . $arr_forne[$i];
$vir = ",";
}
$fornecedores = " and z01_numcgm in ({$fornecedores}) ";
} else {
if (isset($forne) && $forne == "branco") {
$imprimirbranco = "branco";
}
}
//die($clpcorcamforne->sql_query(null,"pc20_codorc,pc20_dtate,pc20_hrate,z01_nome,z01_numcgm,z01_cgccpf,z01_ender,z01_compl,z01_munic,z01_uf,z01_cep,z01_telef,z01_fax,z01_contato","z01_numcgm","pc21_codorc=$pc20_codorc and pc21_numcgm=97454 $fornecedores"));
$result_pcorcamforne = $clpcorcamforne->sql_record($clpcorcamforne->sql_query(null, "pc20_codorc,pc20_dtate,pc20_hrate,z01_nome,z01_numcgm,z01_cgccpf,z01_ender,z01_compl,z01_munic,z01_uf,z01_cep,z01_telef,z01_fax,z01_contato", "z01_numcgm", "pc21_codorc={$pc20_codorc} and pc21_numcgm={$cgm} {$fornecedores}"));
$numrows_pcorcamforne = $clpcorcamforne->numrows;
if ($numrows_pcorcamforne == 0) {
db_redireciona("db_erros.php?fechar=true&db_erro=Nenhum registro encontrado ou orçamento sem fornecedores!");
}
//die($clpcorcamitemsol->sql_query_pcmater(null,null,"pc23_valor,pc23_obs,pc23_vlrun,pc23_validmin,pc11_codigo,pc11_quant,pc01_descrmater,pc11_resum,pc11_pgto,pc11_prazo,pc11_seq,pc10_numero,m61_usaquant,m61_descr,pc17_codigo,pc17_quant,pc05_servico","pc11_seq","pc22_codorc=$pc20_codorc"));
$result_itens = $clpcorcamitemsol->sql_record($clpcorcamitemsol->sql_query_pcmater(null, null, "pc23_valor,pc23_obs,pc23_vlrun,pc23_validmin,pc11_codigo,pc11_quant,pc01_descrmater,pc11_resum,pc11_pgto,pc11_prazo,pc11_seq,pc10_numero,m61_usaquant,m61_descr,pc17_codigo,pc17_quant,pc05_servico", "pc11_seq", "pc22_codorc={$pc20_codorc}"));
$numrows_itens = $clpcorcamitemsol->numrows;
if ($numrows_itens == 0) {
db_redireciona("db_erros.php?fechar=true&db_erro=Nenhum item encontrado neste orçamento!");
}
$pdf = new scpdf();
$pdf->Open();
$pdf1 = new db_impcarne($pdf, '13');
//$pdf1->modelo = 13;
$pdf1->objpdf->SetTextColor(0, 0, 0);
