if ($ls_tiporeporte == 1) { $la_cargos = $io_report->uf_select_rowdata($io_sql, "SELECT monobjretaux as basimp,porcar,monretaux as impiva" . " FROM cxp_rd_cargos " . " WHERE codemp='" . $ls_codemp . "'" . " AND numrecdoc='" . $ls_numrecdoc . "'" . " AND cod_pro='" . $ls_codpro . "'" . " AND ced_bene='" . $ls_cedben . "'"); } else { $la_cargos = $io_report->uf_select_rowdata($io_sql, "SELECT monobjret as basimp,porcar,monret as impiva" . " FROM cxp_rd_cargos " . " WHERE codemp='" . $ls_codemp . "'" . " AND numrecdoc='" . $ls_numrecdoc . "'" . " AND cod_pro='" . $ls_codpro . "'" . " AND ced_bene='" . $ls_cedben . "'"); } if (count($la_cargos) > 0) { $ldec_porcar = $la_cargos["porcar"]; $ldec_baseimp = $la_cargos["basimp"]; $ldec_monimp = $la_cargos["impiva"]; } else { $ldec_porcar = ""; $ldec_baseimp = 0; $ldec_monimp = 0; } $ldec_totbaseimp = $ldec_totbaseimp + $ldec_baseimp; $li_anticipos = $io_report->uf_buscar_asientomanual($ls_numrecdoc, $ls_codtipdoc, $ls_cedben, $ls_codpro); $ldec_montodoc = $ldec_montodoc + $ldec_mondeddoc; $ldec_sinderiva = $ldec_montodoc + $li_anticipos - ($ldec_baseimp + $ldec_monimp); // Total de la Compra sin Derecho a Crédito Iva. $li_porcentaje = intval($ldec_porcar); if ($ldec_porcar > 0) { switch ($li_porcentaje) { case '8': $ldec_totimp8 = $ldec_totimp8 + $ldec_monimp; $ldec_totbasimp8 = $ldec_totbasimp8 + $ldec_baseimp; break; case '9' || '14' || '11': $ldec_totimp9 = $ldec_totimp9 + $ldec_monimp; $ldec_totbasimp9 = $ldec_totbasimp9 + $ldec_baseimp; break; case '25':