$ls_coduniadm = $_POST["txtcoduniadm"];
 $ls_denuniadm = $_POST["txtdenuniadm"];
 $ls_ubigeo = "";
 $ls_tiprespri = $_POST["cmbtiprespri"];
 $ls_tipresuso = $_POST["cmbtipresuso"];
 $ldt_fecent = $_POST["txtfecent"];
 $ls_fecent = $_POST["txtfecent"];
 $ld_feccmpbd = $io_fun->uf_convertirdatetobd($ld_feccmp);
 $lb_valido = $io_fec->uf_valida_fecha_mes($ls_codemp, $ld_feccmpbd);
 if ($lb_valido) {
     if ($ls_cmpmov != "" && $ls_codcau != "" && !empty($ls_numcmp)) {
         $ls_estpromov = "0";
         $ls_codpro = "----------";
         $ls_cedbene = "----------";
         $ls_codtipdoc = "";
         $lb_valido = $io_saf->uf_saf_guardar_en_lote($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd, $ls_descmp, $ls_codpro, $ls_cedbene, $ls_codtipdoc, $ls_codusureg, $ls_estpromov, $ls_codrespri, $ls_codresuso, $ls_coduniadm, $ls_ubigeo, $ls_tiprespri, $ls_tipresuso, $ldt_fecent, $la_seguridad, "IG", $ls_numcmp);
         // $lb_valido=$io_saf->uf_saf_guardar_en_lote($ls_codemp,$ls_cmpmov,$ls_codcau,$ld_feccmpbd,$ls_descmp,$ls_codpro,$ls_cedbene,$ls_codtipdoc,$ls_codusureg,$ls_estpromov,$la_seguridad);
         if ($lb_valido) {
             $io_msg->message("La incorporacion en lote fue procesada con exito");
             $ls_estpromov = 0;
             uf_limpiarvariables();
         } else {
             $io_msg->message("La incorporacion no fue procesada");
         }
     } else {
         $io_msg->message("Debe llenar todos los datos");
     }
 } else {
     $io_msg->message("El mes no esta abierto");
     uf_limpiarvariables();
 }