uf_load_variables();
$io_sql->begin_transaction();
$lb_flag = true;
if ($ls_existe == "FALSE") {
$ls_fecha = date('Y-m-d');
if ($ls_basdatcmp != "") {
$lb_flag = $io_cmpret->uf_crear_comprobante_consolida($ls_codret, &$ls_numcom, $ls_fecha, $ls_ano . $ls_mes, $ls_codigo, $ls_nomsujret, $ls_dirsujret, $ls_rif, "", "1", $ls_logusr, "", "M", $la_seguridad);
}
$lb_flag = $io_cmpret->uf_crear_comprobante($ls_codret, $ls_numcom, $ls_fecha, $ls_ano . $ls_mes, $ls_codigo, $ls_nomsujret, $ls_dirsujret, $ls_rif, "", "1", $ls_logusr, "", "M", $la_seguridad);
}
if ($lb_flag) {
// $lb_flag=$io_modcmpret->uf_liberar_rd($ls_codret,$ls_probene,$ls_codigo,$li_totrowrecepciones);
$lb_flag = $io_modcmpret->uf_liberar_recepciones($ls_codret, $ls_numcom, $ls_probene, $ls_codigo);
}
if ($lb_flag) {
$lb_flag = $io_modcmpret->uf_update_cmpret($ls_numcom, $ls_codret, $li_totrowrecepciones, $ls_probene, $ls_codigo, $la_seguridad);
}
// $lb_flag=false;
if ($lb_flag) {
$io_msg->message("El comprobante se proceso satisfactoriamente");
$io_sql->commit();
} else {
$io_msg->message("Ocurrio un error al procesar el comprobante");
$io_sql->rollback();
}
uf_load_data(&$ls_parametros);
break;
case "ELIMINAR":
uf_load_variables();
$io_sql->begin_transaction();
$ls_bdorigen = $io_modcmpret->uf_obtener_bdorigen($ls_numcom, $ls_codret);
