} if ($ls_operacion == "NUEVO") { $ls_codestpro1 = ""; $ls_denestpro1 = ""; $ls_clasificacion = "P"; $disabled = "disabled"; $readonly = ""; $ls_chkintercom = "0"; $ls_cuenta = ""; $ls_denocuenta = ""; $ls_status = "NUEVO"; } if ($ls_operacion == "GUARDAR") { //$ls_clasificacion = $_POST["rbclasificacion"]; $ls_codestpro1 = $io_funcion->uf_cerosizquierda($ls_codestpro1, 25); $lb_existe = $io_estpro1->uf_spg_select_estprog1($ls_codemp, $ls_codestpro1, $ls_clasificacion); if (!$lb_existe) { $lb_valido = $io_estpro1->uf_spg_insert_estprog1($ls_codemp, $ls_codestpro1, $ls_denestpro1, $ls_clasificacion, $ls_chkintercom, $ls_cuenta, $la_seguridad); if ($lb_valido) { $io_sql->commit(); $io_msg->message("Registro Incluido !!!"); $ls_codestpro1 = ""; $ls_denestpro1 = ""; $ls_chkintercom = ""; $ls_cuenta = ""; $ls_denocuenta = ""; $ls_status = "NUEVO"; } else { $io_sql->rollback(); $io_msg->message($io_estpro1->is_msg_error); }
} if ($ls_operacion == "NUEVO") { $ls_codestpro1 = $_POST["txtcodestpro1"]; $ls_codestpro2 = ""; $ls_denestpro1 = $_POST["txtdenestpro1"]; $ls_clasificacion = $_POST["txtclasificacion"]; $ls_denestpro2 = ""; $readonly = ""; $disabled = "disabled"; $ls_status = "NUEVO"; } if ($ls_operacion == "GUARDAR") { $ls_clasificacion = $_POST["txtclasificacion"]; $ls_codestp1 = $io_funcion->uf_cerosizquierda($ls_codestpro1, 25); $ls_codestp2 = $io_funcion->uf_cerosizquierda($ls_codestpro2, 25); $lb_encontrado = $io_estpro1->uf_spg_select_estprog1($ls_codemp, $ls_codestp1, $ls_estcla); if ($lb_encontrado) { $lb_existe = $io_estpro2->uf_spg_select_estprog2($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_estcla); if (!$lb_existe) { $lb_valido = $io_estpro2->uf_spg_insert_estprog2($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_denestpro2, $li_estmodest, $ls_estcla, $la_seguridad); if ($lb_valido) { $io_sql->commit(); $io_msg->message("Registro Incluido !!!"); /* if ($li_estmodest=='2') { $ls_codestpro1 = substr($ls_codestpro1,18,2); }*/ $ls_codestpro2 = ""; $ls_denestpro2 = ""; } else { $io_sql->rollback();