}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actualización /////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operaciones de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_doc->uf_load_documento($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codtipdoc')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'cxp_documento', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_doc->uf_delete_documento($ls_codemp, $ls_codigo, $ls_dendoc, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'cxp_documento', 'codtipdoc');
$ls_dendoc = "";
$ls_presu = "";
$ls_conta = "";
$ls_anticipo = "";
$ls_estatus = "NUEVO";
} else {
$io_sql->rollback();
$io_msg->message($io_doc->is_msg_error);
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actualizacion ///////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operaciones de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_deducciones->uf_select_deduccion($ls_codemp, $ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codded')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'sigesp_deducciones', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_deducciones->uf_delete_deduccion($ls_codemp, $ls_codigo, $ls_denominacion, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'sigesp_deducciones', 'codded');
$ls_denominacion = "";
$ls_contable = "";
$ls_denocuenta = "";
$ld_porcentaje = "0.0";
$ld_deducible = "0,00";
$ls_formula = "";
$ls_tipodeduccion = "";
$ls_estatus = "NUEVO";
$ls_codigoaux = $ls_codigo;
$lb_valido = $in_classagencia->uf_guardar_agencias($ls_codban, $ls_codigo, $ls_denominacion, $ls_status);
if ($lb_valido && $ls_codigoaux != $ls_codigo) {
$io_msg->message("Se le asigno el codigo " . $ls_codigo);
}
$io_msg->message($in_classagencia->is_msg_error);
$readonly = "readonly";
}
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $in_classagencia->uf_select_agencias($ls_codigo, $ls_codban);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codage')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'scb_agencias', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $in_classagencia->uf_delete_agencias($ls_codigo, $ls_codban, $ls_denominacion, $ls_status);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_keygen->uf_generar_numero_nuevo("CFG", "scb_agencias", "codage", "CFGAGE", 10, "", "", "");
//$ls_codigo = $fun_db->uf_generar_codigo(true,$ls_empresa,"scb_agencias","codage");
$ls_denominacion = "";
$ls_codban = "";
$ls_denban = "";
$readonly = "";
} else {
$io_sql->rollback();
$io_msg->message($in_classagencia->is_msg_error);
$object[$i][2] = "<input type=text name=txtdencla" . $i . " value='' class=sin-borde readonly style=text-align:left size=30>";
$object[$i][3] = "<a href=javascript:uf_delete(" . $i . ");><img src=../../shared/imagebank/tools20/eliminar.gif alt=Aceptar width=15 height=10 border=0></a>";
}
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ue_eliminar") {
$lb_existe = $io_modalidad->uf_select_modalidad($ls_codemp, $ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codtipmod')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, "soc_modalidadclausulas' AND table_name<>'soc_dtm_clausulas", $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_modalidad->uf_delete_modalidad($ls_codemp, $ls_codigo, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'soc_modalidadclausulas', 'codtipmod');
$ls_denominacion = "";
$ls_estatus = "NUEVO";
} else {
$io_sql->rollback();
$io_msg->message("Error en Eliminación !!!");
}
} else {
$io_msg->message($io_chkrel->is_msg_error);
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actulizacion //////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar //////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_tipo->uf_select_tiposep($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codtipsol')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'sep_tiposolicitud', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_tipo->uf_delete_tiposep($ls_codigo, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$lb_empresa = false;
$ls_operacion = "NUEVO";
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'sep_tiposolicitud', 'codtipsol');
$ls_denominacion = "";
$afepre = "";
$esttip = "";
} else {
$io_sql->rollback();
}
}
if ($ls_operacion == "ELIMINAR") {
/* $ls_ultimo= "select max(codunitri) from sigesp_unidad_tributaria ";
if ($ls_codigo!=$ls_ultimo)
{
$io_msg->message("Registro no se puede eliminar !!!");
}
else
{*/
$lb_existe = $io_unidad_tributaria->uf_select_unidad_tributaria($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codunitri' OR column_name='codigo_doc')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_empresa, $ls_condicion, 'sigesp_unidad_tributaria', $ls_codigo, $ls_mensaje);
if (!$lb_tiene) {
$lb_valido = $io_unidad_tributaria->uf_delete_unidad_tributaria($ls_codigo, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_unidad_tributaria->retonar_ultimo();
$ls_anno = "";
$ld_fecentvig = "";
$ls_gacofi = "";
$ld_fecpubgac = "";
$ls_decnro = "";
$ld_fecdec = "";
$ls_valunitri = "";
} else {
$io_sql->rollback();
if ($ls_operacion == "ELIMINAR") {
global $int_scg;
$ls_cuenta = $_POST["txtcuenta"];
$ls_denominacion = $_POST["txtdenominacion"];
$ls_mensaje_error = "";
$ls_cuenta_cero = "";
$ls_status = "";
$ls_denominacion = "";
$lb_valido = false;
$li_total_rows = 0;
$ls_condicion = " AND (column_name='sc_cuenta' OR column_name='scg_cuenta')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_valido = $int_scg->uf_delete_relacion_sin_movimiento($ls_codemp, $ls_cuenta);
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'scg_cuentas', $ls_cuenta, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if ($int_scg->ib_db_error) {
$io_msg->message($ls_mensaje_error);
$int_scg->ib_db_error = false;
}
if ($lb_tiene) {
$io_msg->message($io_chkrel->is_msg_error);
} else {
$ls_cuenta_cero = $int_scg->uf_scg_sin_ceros($ls_cuenta);
$li_total_rows = $int_scg->uf_scg_select_cuenta_sin_cero($ls_codemp, $ls_cuenta_cero);
if ($li_total_rows > 1) {
$io_msg->message("Existen cuentas de nivel inferior ... no se puede eliminar.");
} else {
$lb_valido = $int_scg->uf_scg_delete_cuenta($ls_codemp, $ls_cuenta);
if ($lb_valido) {
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actualizacion ///////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operaciones de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_clasificador->uf_select_clasificador($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codcla')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'cxp_clasificador_rd', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_clasificador->uf_delete_clasificador($ls_codemp, $ls_codigo, $ls_denclas, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'cxp_clasificador_rd', 'codcla');
$ls_estatus = "NUEVO";
$ls_denclas = "";
} else {
$io_sql->rollback();
$io_msg->message($io_clasificador->is_msg_error);
}
} else {
$io_msg->message($io_chkrel->is_msg_error);
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////// Fin de las Operaciones de Insercion y Actualizacion ///////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operaciones de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ue_eliminar") {
$lb_existe = $io_pais->uf_load_pais($ls_codpais);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codpai')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_empresa, $ls_condicion, 'sigesp_pais', $ls_codpais, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_pais->uf_delete_pais($ls_empresa, $ls_codpais, $ls_denpais, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codpais = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_empresa, 'sigesp_pais', 'codpai');
$ls_denpais = "";
} else {
$io_sql->rollback();
$io_msg->message($io_pais->is_msg_error);
}
} else {
$io_msg->message($io_chkrel->is_msg_error);
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "GUARDAR") {
$lb_valido = $io_procedencias->uf_guardar_procedencia($lr_datos, $la_seguridad);
$ls_codigo = "";
$ls_codigosistema = "";
$ls_operacionsis = "";
$ls_descripcion = "";
}
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_procedencias->uf_select_procedencia($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='procede' OR column_name='procede_doc')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_empresa, $ls_condicion, 'sigesp_procedencias', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_procedencias->uf_delete_procedencia($ls_codigo, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = "";
$ls_codigosistema = "";
$ls_operacionsis = "";
$ls_descripcion = "";
} else {
$io_sql->rollback();
$io_msg->message($io_procedencias->is_msg_error);
}
} else {
$object[$i][3] = "<input type=text name=txtporcar" . $i . " value='' class=sin-borde readonly style=text-align:center size=10>";
$object[$i][4] = "<a href=javascript:uf_delete(" . $i . ");><img src=../../shared/imagebank/tools20/eliminar.gif alt=Aceptar width=15 height=10 border=0></a>";
}
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ue_eliminar") {
$lb_existe = $io_con->uf_select_concepto($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codconsep')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'sep_conceptos', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_con->uf_delete_concepto($ls_codemp, $ls_codigo, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$lb_empresa = false;
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'sep_conceptos', 'codconsep');
$ls_denominacion = "";
$ld_monto = "0,00";
$ls_observacion = "";
$ls_cuenta = "";
$ls_denocuenta = "";
$ls_unidad = "";
$ls_denocuenta = "";
$object[$i][3] = "<input type=text name=txtporcar" . $i . " value='' class=sin-borde readonly style=text-align:center size=10>";
$object[$i][4] = "<a href=javascript:uf_delete(" . $i . ");><img src=../../shared/imagebank/tools20/eliminar.gif alt=Aceptar width=15 height=10 border=0></a>";
}
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_servicio->uf_select_servicio($ls_codemp, $ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codser')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, "soc_servicios' AND table_name<>'soc_serviciocargo", $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_servicio->uf_delete_servicio($ls_codemp, $ls_codigo, $ls_denominacion, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_denominacion = "";
$ld_precio = "0,00";
$ls_cuenta = "";
$ls_codtipser = "";
$ls_estatus = "NUEVO";
$li_lastrow = 0;
$ls_dentipser = '';
$ls_codunimed = "";
$ls_denunimed = "";
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actualizacion ///////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar ////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_clausula->uf_select_clausula($ls_codemp, $ls_codcla);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codcla')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'soc_clausulas', $ls_codcla, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_clausula->uf_delete_clausula($ls_codemp, $ls_codcla, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codcla = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'soc_clausulas', 'codcla');
$ls_dencla = "";
$ls_estatus = "NUEVO";
} else {
$io_sql->rollback();
$io_msg->message($io_clausula->is_msg_error);
}
} else {
$io_msg->message($io_chkrel->is_msg_error);
} else {
$io_msg->message("No se ha podido Registrar la Ciudad");
}
} else {
$io_msg->message("La Ciudad ya esta Registrada");
}
}
break;
case "ELIMINAR":
$lb_existe = $io_scv->uf_scv_select_ciudad($ls_codpai, $ls_codest, $ls_codciu);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codciu' OR column_name='codciuori' OR column_name='codciudes')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'scv_ciudades', $ls_codciu, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_scv->uf_scv_delete_ciudad($ls_codpai, $ls_codest, $ls_codciu, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codpai = "";
$ls_codest = "";
$ls_codciu = "";
$ls_desciu = "";
} else {
$io_sql->rollback();
$io_msg->message($io_scv->is_msg_error);
}
} else {
$lb_valido = $in_classcolocacion->uf_guardar_dt_colocacion($ls_colocacion, $ls_codban, $ls_cuenta_banco, $ls_fechareint, $ls_montoreint);
}
}
}
$io_msg->message($in_classcolocacion->is_msg_error);
$readonly = "readonly";
}
if ($ls_operacion == "ELIMINAR") {
$li_total = $_POST["totrows"];
$lb_existe = $in_classcolocacion->uf_select_colocacion($ls_codban, $ls_cuenta_banco, $ls_colocacion, $ls_cuentascg, $ls_cuentaspi);
if ($lb_existe) {
$ls_condicion = " AND (column_name='numcol')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, "scb_colocacion' AND table_name<> 'scb_dt_colocacion", $ls_colocacion . "' AND codban='" . $ls_codban . "' AND ctaban='" . $ls_cuenta_banco . "", $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
for ($i = 1; $i <= $li_total; $i++) {
$ls_fechareint = $_POST["txtfechrei" . $i];
$ls_montoreint = $_POST["txtmontorei" . $i];
$object[$i][1] = "<input type=text name=txtfechrei" . $i . " value='" . $ls_fechareint . "' class=sin-borde readonly style=text-align:center size=30>";
$object[$i][2] = "<input type=text name=txtmontorei" . $i . " value='" . $ls_montoreint . "' class=sin-borde readonly style=text-align:center size=50>";
}
if (!$lb_tiene) {
$lb_valido = $in_classcolocacion->uf_delete_dt_colocacion($ls_colocacion, $ls_codban, $ls_cuenta_banco, $ls_fechareint, $ls_montoreint);
if ($lb_valido) {
$lb_valido = $in_classcolocacion->uf_delete_colocacion($ls_colocacion, $ls_codban, $ls_cuenta_banco);
}
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigoaux = $ls_codigo;
$lb_valido = $in_classtipocta->uf_guardar_tipocta($ls_codigo, $ls_denominacion, $ls_status);
if ($lb_valido && $ls_codigoaux != $ls_codigo) {
$io_msg->message("Se le asigno el codigo " . $ls_codigo);
}
$io_msg->message($in_classtipocta->is_msg_error);
$readonly = "readonly";
}
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $in_classtipocta->uf_select_tipocta($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codtipcta')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'scb_tipocuenta', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $in_classtipocta->uf_delete_tipocta($ls_codigo, $ls_denominacion, $ls_status);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_keygen->uf_generar_numero_nuevo("CFG", "scb_tipocuenta", "codtipcta", "CFGTCA", 3, "", "", "");
$ls_denominacion = "";
$readonly = "";
} else {
$io_sql->rollback();
$readonly = "readonly";
$io_msg->message($in_classtipocta->is_msg_error);
}
} else {
$ls_codmun = "";
$ls_denmun = "";
} else {
$io_sql->rollback();
$io_msg->message("Error en Inclusión !!!");
}
}
}
if ($ls_operacion == "ue_eliminar") {
$lb_existe = $io_municipio->uf_load_municipio($ls_pais, $ls_estado, $ls_codmun);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codmun')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_empresa, $ls_condicion, 'sigesp_municipio', $ls_codmun, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_municipio->uf_delete_municipio($ls_codemp, $ls_pais, $ls_estado, $ls_codmun, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_pais = "";
$ls_estado = "";
$ls_codmun = "";
$ls_denmun = "";
} else {
$io_sql->rollback();
$io_msg->message("Error en Eliminación !!!");
}
} else {
if (empty($ls_ctaext)) {
$ls_ctaext = $ls_codigo;
}
$lb_valido = $in_classctabanco->uf_guardar_ctabanco($ls_codigo, $ls_denominacion, $ls_tipocta, $ls_codban, $ls_scg_cuenta, $ld_fec_aper, $ld_fec_cierre, $li_statuscta, $ls_status, $ls_ctaext);
//$ls_status es para sabere si la operacion es nuevo o el registro viene de un catalogo para ser actualizado
$io_msg->message($in_classctabanco->is_msg_error);
$readonly = "readonly";
}
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $in_classctabanco->uf_select_ctabanco($ls_codban, $ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='ctaban')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'scb_ctabanco', $ls_codigo . "' AND codban='" . $ls_codban . "", $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $in_classctabanco->uf_delete_ctabanco($ls_codigo, $ls_denominacion, $ls_codban);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = "";
$ls_denominacion = "";
$ls_tipocta = "";
$ls_dentipcta = "";
$ls_codban = "";
$ls_ctaext = "";
$ls_denban = "";
$ls_scg_cuenta = "";
$ld_fec_aper = "";
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Insercion y Actualizacion //////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar //////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion == "ELIMINAR") {
$lb_existe = $io_tipo->uf_select_tiposervicio($ls_codigo);
if ($lb_existe) {
$ls_condicion = " AND (column_name='codtipser')";
//Nombre del o los campos que deseamos buscar.
$ls_mensaje = "";
//Mensaje que será enviado al usuario si se encuentran relaciones a asociadas al campo.
$lb_tiene = $io_chkrel->uf_check_relaciones($ls_codemp, $ls_condicion, 'soc_tiposervicio', $ls_codigo, $ls_mensaje);
//Verifica los movimientos asociados a la cuenta
if (!$lb_tiene) {
$lb_valido = $io_tipo->uf_delete_tiposervicio($ls_codemp, $ls_codigo, $ls_denominacion, $la_seguridad);
if ($lb_valido) {
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa, $ls_codemp, 'soc_tiposervicio', 'codtipser');
$ls_denominacion = "";
$ls_codmil = "";
$ls_denmil = "";
$ls_estatus = "NUEVO";
} else {
$io_sql->rollback();
$io_msg->message($io_tipo->is_msg_error);
}
