$ld_datefin=$io_function->uf_convertirdatetobd($ls_fecfinobr); $lb_existe=$io_obra->uf_select_obra ($ls_codobr,$la_datos); $ld_datecreacion=$io_function->uf_convertirdatetobd($ls_feccreobr); if($ls_hidstatus!="C") { $io_sql->begin_transaction(); $ls_codobraux=$ls_codobr; $lb_valido=$io_obra->uf_guardar_obra(&$ls_codobr,$ls_codten,$ls_codtipest,$ls_codest,$ls_codmun,$ls_codpar,$ls_codcom,$ls_codsiscon,$ls_codpro,$ls_codtob,$ls_nomobr,$ls_dirobr,$ls_obsobr,$ls_resobr,$ld_dateinicio,$ld_datefin,$li_monto,$ld_datecreacion,$la_seguridad); if ($lb_valido) { for ($li_i=1;$li_i<$li_filaspartidas;$li_i++)//Guardando las partidas asociadas a la obra { $ls_codigo=$_POST["txtcodpar".$li_i]; $ls_cantidad=$io_funsob->uf_convertir_cadenanumero($_POST["txtcanpar".$li_i]); $lb_partida=$io_obra->uf_guardar_dtpartidas($ls_codobr,$ls_codigo,$ls_cantidad,$la_seguridad); } for ($li_i=1;$li_i<$li_filasfuentes;$li_i++)//Guardando las fuentes de financiamiento asociadas a la obra { $ls_codigo=$_POST["txtcodfuefin".$li_i]; $ld_monto=$_POST["txtmonfuefin".$li_i]; $lb_fuente=$io_obra->uf_guardar_dtfuentesfinanciamiento($ls_codobr,$ls_codigo,$ld_monto,$la_seguridad); } } if ($lb_valido && $lb_partida && $lb_fuente) { if($ls_codobraux!=$ls_codobr) { $io_msg->message("Se le Asigno el Nuevo Código de Obra ".$ls_codobr.". ");