$ld_totartser=number_format($ld_totartser,2,",",".");
$ld_carartser=number_format($ld_carartser,2,",",".");
$la_data[$li_i]=array('codigo'=>$ls_codartser,
'denominacion'=>$ls_denartser,
'cantidad'=>$li_cantartser,
'unidad'=>$ls_unidad,
'cosuni'=>$ld_preartser,
'baseimp'=>$ld_subtotartser,
'porimp'=>$ld_porimp,
'cargo'=>$ld_carartser,
'montot'=>$ld_totartser);
}
uf_print_detalle($la_data,$ls_estcondat,&$io_pdf);
unset($la_data);
/////DETALLE DE LAS CUENTAS DE GASTOS DE LA ORDEN DE COMPRA
$rs_datos_cuenta=$io_report->uf_select_cuenta_gasto($ls_numordcom,$ls_estcondat,&$lb_valido);
if($lb_valido)
{
$li_totrows = $io_sql->num_rows($rs_datos_cuenta);
if ($li_totrows>0)
{
$li_s = 0;
while($row=$io_sql->fetch_row($rs_datos_cuenta))
{
$li_s=$li_s+1;
$ls_codestpro1=trim($row["codestpro1"]);
$ls_codestpro2=trim($row["codestpro2"]);
$ls_codestpro3=trim($row["codestpro3"]);
$ls_codestpro4=trim($row["codestpro4"]);
$ls_codestpro5=trim($row["codestpro5"]);
$ls_codestpro1 = substr($ls_codestpro1,-$_SESSION["la_empresa"]["loncodestpro1"]);
