$con = $in->uf_conectar();
require_once "../shared/class_folder/class_sql.php";
$io_sql = new class_sql($con);
$ls_basdatcmp = $_SESSION["la_empresa"]["basdatcmp"];
if ($ls_basdatcmp != "") {
    $io_modcmpret->io_sqlaux = $io_cmpret->io_sqlaux;
    $io_sqlaux = $io_cmpret->io_sqlaux;
}
uf_limpiarvariables();
$ls_basdatcmp = $_SESSION["la_empresa"]["basdatcmp"];
switch ($ls_operacion) {
    case "NEW":
        uf_load_variables();
        $ls_ano = date('Y');
        $ls_mes = date('m');
        $io_cmpret->uf_get_nrocomprobante($ls_codret, $ls_ano . $ls_mes, &$ls_numcom);
        uf_load_data(&$ls_parametros);
        break;
    case "GUARDAR":
        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);