$ls_apebene = $io_report->DS->data["apebene"][$li_i]; $ls_nacben = $io_report->DS->data["nacben"][$li_i]; $ls_cedbene = $io_report->DS->data["ced_bene"][$li_i]; $ls_numpasben = $io_report->DS->data["numpasben"][$li_i]; $ls_dirbene = $io_report->DS->data["dirbene"][$li_i]; $ls_telbene = $io_report->DS->data["telbene"][$li_i]; if ($ls_tipproben == "P") { $ls_codigo = $io_report->DS->data["cod_pro"][$li_i]; } else { $ls_codigo = $io_report->DS->data["ced_bene"][$li_i]; } $io_cabecera = $io_pdf->openObject(); // Creamos el objeto cabecera uf_print_cabecera($ls_tipproben, $ls_nompro, $ls_nacpro, $ls_rifpro, $ls_nitpro, $ls_dirpro, $ls_telpro, $ls_nombene, $ls_apebene, $ls_nacben, $ls_cedbene, $ls_numpasben, $ls_dirbene, $ls_telbene, &$io_cabecera, &$io_pdf); // Imprimimos la cabecera del registro $lb_valido = $io_report->uf_arc_detalle($ls_codigo, $ls_tipproben); // Obtenemos el detalle del reporte if ($lb_valido) { $li_totrow_det = $io_report->ds_detalle->getRowCount("cod_pro"); $li_totalacumulado = 0; $li_retencionacumulada = 0; for ($li_s = 1; $li_s <= $li_totrow_det; $li_s++) { $ls_fecha = substr($io_report->ds_detalle->data["fecemidoc"][$li_s], 8, 2); $ls_fecha = $ls_fecha . " " . substr($io_report->ds_detalle->data["fecemidoc"][$li_s], 5, 2); $ls_fecha = $ls_fecha . " " . substr($io_report->ds_detalle->data["fecemidoc"][$li_s], 0, 4); $li_montotdoc = number_format($io_report->ds_detalle->data["montotdoc"][$li_s], 2, ",", "."); $li_monobjret = number_format($io_report->ds_detalle->data["monobjret"][$li_s], 2, ",", "."); $li_porded = number_format($io_report->ds_detalle->data["porded"][$li_s], 2, ",", "."); $li_monret = number_format($io_report->ds_detalle->data["monret"][$li_s], 2, ",", "."); $li_total_pagado = $li_total_pagado + $io_report->ds_detalle->data["montotdoc"][$li_s]; $li_total_retencion = $li_total_retencion + $io_report->ds_detalle->data["monobjret"][$li_s];