Reimpresión de Y con datos de la Y anterior

1. El problema

Reportado en varias sucursales. En San Vicente (PV 841 / POS 15) se emitieron las Y 12504–12506 y al pedir la 12507 se volvía a emitir la 12506. En RB Vesta (POS 75) al pedir la Y 763 salía la 762. En ambos casos la Y contenía la facturación de una cuenta corriente.

Verificación previa: en el servidor, los archivos de dos Y consecutivas tenían el mismo tamaño, y el log del POS mostraba el contenido correcto de la Y nueva mientras el archivo quedaba con el de la anterior.

2. Causa raíz

El cierre de cajero arma la Y en un archivo spool y luego lo copia a YLOG\NNNNNNNN.y y .2se, que viajan al servidor y a la base CierresImpresosPOS. El mecanismo del fallo:

3. La corrección

Tres archivos de fuente. El binario resultante es POS_MAIN.EXE (no cambian DLLs).

3.1 · pos_info.cpp — guarda al iniciar el cierre + validación de NroY

Antes de abrir el spool del cierre: si quedó ocupado, se loguea y se cierra a la fuerza; si aun así no abre, se aborta el cierre con aviso, antes de tocar contadores. Y antes de copiar la Y, se verifica que el spool contenga el NroY actual.

  if (Modo==MODO_Z){
    NoPrintPorFacturacion=1;
    // si el spool quedó ocupado por otro flujo, lo cerramos a la fuerza
    if (fpl || StaLog2File){
      Log(LOGERROR, LOG_ZETAMANUAL, GCmos.NroZ, fs_SpoolBusyAtClose, CurrentLogFName);
      StopLog2File();
      }
    if (StaLogPrn2File(Alcance==aPOS ? LogPrnCIEZCAJA : LogPrnCIEZCAJR)!=OK){
      Log(LOGERROR, LOG_ZETAMANUAL, GCmos.NroZ, fs_SpoolOpenFailed, ...);
      NoPrintPorFacturacion=0;
      PError(msg_ErrorImpresEnCurso_141);
      return BAD;   // cierre abortado, sin generar Y falsa
      }

  // antes de copiar el spool a YLOG:
  sprintf(cNroYEsperado, "Y%08ld", NroY);
  while (!feof(fp)){ if(!fgets(cLineaSpool,sizeof(cLineaSpool),fp)) break;
    if(strstr(cLineaSpool, cNroYEsperado)!=NULL){ iNroYEncontrado=1; break; } }
  if(!iNroYEncontrado)   // avisa si el spool no trae el NroY del cierre
    Log(LOGERROR, LOG_ZETAMANUAL, GCmos.NroZ, fs_SpoolMissingNroY, LogPrnCIEZCAJR, cNroYEsperado);

3.2 · pos_misc.cpp — EndLog2File resetea el flag

Dejaba StaLog2File en "ocupado" con fpl en NULL, marcando el spool como ocupado para siempre.

void POS_EXPORT EndLog2File(char* FileLog){
  if (fpl!=NULL) fclose(fpl);
  remove(FileLog); fpl=NULL;
  StaLog2File=0;   // mantiene el flag consistente con fpl
  }

3.3 · pos_main.cpp — SaveYNoImpresa (recuperación tras apagón)

En la ruta de recuperación al reiniciar el POS, no genera la Y si el spool no contiene su NroY (evita publicar una Y equivocada). Además corrige una fuga del handle fpx.

  sprintf(cNroYEsperado, "Y%08ld", lNroY);
  while (!feof(fp)){ ... if(strstr(cLineaSpool, cNroYEsperado)) { iNroYEncontrado=1; break; } }
  if(!iNroYEncontrado){
    Log(LOGERROR, LOG_ZETAMANUAL, GCmos.NroZ, fs_SpoolNoNroYNoGen, LogPrnCIEZCAJR, cNroYEsperado);
    Error(fs_WarnSpoolNoNroYNoGen, lNroY); fclose(fp); return;   // NO genera Y
    }

Nota técnica: los mensajes nuevos se declararon como static char _far fs_*[N] porque el segmento DGROUP (datos near de 16 bits) tenía sólo 190 bytes libres. No se tocó ninguna cadena preexistente.

Decisión: NO se descomentan los StopLog2File de DeleteAll. Estaban deshabilitados a propósito por un historial de "doble impresión de Y". El fix neutraliza la fuga en el cierre, sin tocar esa rama.

4. Validación (POS real, DOSBox)

Escenario del reclamo: caja sin fiscal / CAEA, bases del kit. Secuencia: habilitar cajero → vender ítem → Factura A (cuenta corriente) → anular el ticket → cierre de cajero.

'20260914 17:09:21','1','165',...,'Spool ocupado al iniciar cierre (logprnti.$X$), se fuerza cierre'

5. Archivos y despliegue

Despliegue: copiar POS_MAIN.EXE a las cajas (afecta sólo al EXE; las DLLs no cambian). En producción, la nueva línea Spool ocupado al iniciar cierre (<archivo>) permite identificar qué operación deja el spool abierto, para corregirlo también en el origen si se decide.