$ls_codestpro=$ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3;
}
else
{
$ls_codestpro=substr($ls_codestpro1,-2)."-".substr($ls_codestpro2,-2)."-".substr($ls_codestpro3,-2)."-".substr($ls_codestpro4,-2)."-".substr($ls_codestpro5,-2);
}
$la_data[$li_s]=array('codestpro'=>$ls_codestpro,'denominacion'=>$ls_dencuenta,
'cuenta'=>$ls_spg_cuenta,'monto'=>$ld_monto);
}
uf_print_detalle_cuentas($la_data,&$io_pdf);
unset($la_data);
}
}
$lb_validosep = true;
$li_totrow = 0;
$lb_validosep = $io_report->uf_select_soc_sep($ls_codemp,$ls_numordcom,$ls_estcondat);
if ($lb_validosep)
{
$li_totrow = $io_report->ds_soc_sep->getRowCount("numordcom");
for ($li_row=1;$li_row<=$li_totrow;$li_row++)
{
$ls_numsep = $io_report->ds_soc_sep->data["numsol"][$li_row];
$ls_denunadm = $io_report->ds_soc_sep->data["denuniadm"][$li_row];
$la_datasep[$li_row] = array('codigo'=>$ls_numsep,'denuniadm'=>$ls_denunadm);
}
uf_print_detalle_sep($la_datasep,$io_pdf);
}
}
}
}
}
