Ver Mensaje Individual
  #4
Antiguo 11 de enero de 2021, 20:11
Gusaiello
Forero Activo
Concurso: Segundo puesto: Ganador/a del Segundo puesto en un concurso - Issue reason: Generador de código QR encriptado Activista del Foro: Activista del Foro - Issue reason: Por aportar ejecrcicios para los novatos 
Última Actividad 17.09.2026 14:29
Posts Posts: 236
Likes enviados Enviados: 150
Likes recibidos Recibidos: 139

Si, claro, como no.
Son dos archivos : uno lleva el detalle de la venta (TXTVENTAS) y el otro el detalle del iva facturado (TXTALICVENTAS).

Los formatos son :

Código COBOL:
  1.        FD  TXTVENTAS.
  2.        01  REGTXTVENTAS.
  3.            03 FECHA-TXTVENTAS.
  4.               05 ANI-TXTVENTAS                          PIC 9(4).
  5.               05 MES-TXTVENTAS                          PIC 9(2).
  6.               05 DIA-TXTVENTAS                          PIC 9(2).
  7.            03 TIPOCOMPROBANTE-TXTVENTAS                 PIC X(3).
  8.            03 PUNTODEVENTAS-TXTVENTAS                   PIC 9(5).
  9.            03 NUMEROCOMPROBANTEDESDE-TXTVENTAS          PIC X(20).
  10.            03 NUMEROCOMPROBANTEHASTA-TXTVENTAS          PIC X(20).
  11.            03 CODIGODEDOCUMENTO-TXTVENTAS               PIC 9(2).
  12.            03 NUMERODOCUMENTO-TXTVENTAS                 PIC X(20).
  13.            03 NOMBRECLIENTE-TXTVENTAS                   PIC X(30).
  14.            03 IMPORTETOTAL-TXTVENTAS                    PIC 9(13)V99.
  15.            03 NOGRAVADO-TXTVENTAS                       PIC 9(13)V99.
  16.            03 PERCEPCIONESNOCATEGORIZADAS-TXTVENTAS     PIC 9(13)V99.
  17.            03 EXENTOS-TXTVENTAS                         PIC 9(13)V99.
  18.            03 PERCEPCIONESIMPUESTOSNACIONALES-TXTVENTAS PIC 9(13)V99.
  19.            03 PERCEPCIONESINGRESOSBRUTOS-TXTVENTAS      PIC 9(13)V99.
  20.            03 PERCEPCIONESMUNICIPALES-TXTVENTAS         PIC 9(13)V99.
  21.            03 IMPUESTOSINTERNOS-TXTVENTAS               PIC 9(13)V99.
  22.            03 CODIGOMONEDA-TXTVENTAS                    PIC X(3).
  23.            03 TIPODECAMBIO-TXTVENTAS                    PIC 9(4)V9(6).
  24.            03 CANTIDADDEALICUOTAS-TXTVENTAS             PIC 9(1).
  25.            03 CODIGODEOPERACION-TXTVENTAS               PIC X(1).
  26.            03 OTROSTRIBUTOS-TXTVENTAS                   PIC 9(15).
  27.            03 FECHAVENCIMIENTO-TXTVENTAS                PIC 9(8).

Código COBOL:
  1.        FD  TXTALICVENTAS.
  2.        01  REGTXTALICVENTAS.
  3.            03 TIPOCOMPROBANTE-TXTALICVENTAS             PIC X(3).
  4.            03 PUNTODEVENTAS-TXTALICVENTAS               PIC 9(5).
  5.            03 NUMERODECOMPROBANTE-TXTALICVENTAS         PIC X(20).
  6.            03 NETOGRAVADO-TXTALICVENTAS                 PIC 9(13)V9(2).
  7.            03 ALICUOTADECIVA-TXTALICVENTAS              PIC 9(4).
  8.            03 IMPORTELIQIDADO-TXTALICVENTAS             PIC 9(13)V9(2).
@fastpho,
Gusaiello is offline   Responder Con Cita