}//if ($li_rtn>0)
}//operacion==""
if ($ls_operacion=="DISTRIBUIR")
{
$li_indice=1;
$la_empresa=$_SESSION["la_empresa"];
$ls_formcont=$la_empresa["formcont"];
$ls_codemp = $la_empresa["codemp"];
$ls_cod_report = $_SESSION["cod_report"];
$_SESSION["ld_asignado"]=$ld_asignado;
$ld_asignado=$_SESSION["ld_asignado"];
$li_lenCta = strlen(trim($ls_cuenta)) ;
//COLOCA FORMATO A LA CUENTA
$li_pos = $fun->uf_posocurrencia( $ls_formcont, "-", $li_indice );
$ls_sub = substr($ls_cuenta,0, $li_pos );
$ls_new_cad = $ls_sub . "-" . substr($ls_cuenta,$li_pos, $li_lenCta );
$li_max_nivel= 1;
for($i=1;$i<=$li_pos;$i++)
{
$li_indice = $li_indice + 1;
$li_lenCta = strlen(trim($ls_new_cad));
$li_pos = $fun->uf_posocurrencia( $ls_formcont, "-", $li_indice );
if ($li_pos > 0)
{
$ls_sub = substr($ls_new_cad, 0, $li_pos );
$len=$li_lenCta - $li_pos;
$ls_new_cad = $ls_sub . "-" . substr($ls_new_cad,$li_pos,$len );
