$lb_existe = $io_class_apertura->uf_spg_existe_fuefin_estructura($ls_empresa,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_cuenta,$ls_codfuefin); if(!$lb_existe) { $lb_existe = $io_class_apertura->uf_spg_existe_fuefin_estructura($ls_empresa,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_cuenta,"--"); if(!$lb_existe) { $lb_valido=$io_class_apertura->uf_spg_insert_fuefin_estructura($ls_empresa,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_cuenta,"--",0); } if($lb_valido) { $lb_valido=$io_class_apertura->uf_spg_insert_fuefin_estructura($ls_empresa,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_cuenta,$ls_codfuefin,$ld_monto); } } else { $lb_valido=$io_class_apertura->uf_spg_update_fuefin_estructura($ls_empresa,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla,$ls_cuenta,$ls_codfuefin,$ld_monto); } } if($lb_valido) { $io_msg->message("La Distribucion de lo Asignado por Fuente de Financiamiento fue registrado con Exito....."); $ls_evento="PROCESS"; $ls_estrutura = ""; if($li_estmodest==1) { $ls_estrutura = substr($ls_codestpro1,-$ls_loncodestpro1)."-".substr($ls_codestpro2,-$ls_loncodestpro2)."-".substr($ls_codestpro3,-$ls_loncodestpro3); } elseif($li_estmodest==1) { $ls_estrutura = substr($ls_codestpro1,-$ls_loncodestpro1)."-".substr($ls_codestpro2,-$ls_loncodestpro2)."-".substr($ls_codestpro3,-$ls_loncodestpro3)."-".substr($ls_codestpro4,-$ls_loncodestpro4)."-".substr($ls_codestpro5,-$ls_loncodestpro5); }