Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > MicroFocus COBOL > AcuCobol
AcuCobol IDE y Compilador AcuCobol
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Actualizar libro de excel desde Powercobol dmosca PowerCOBOL (ActiveX, v4 - v11) 1 22 de agosto de 2020 14:14
[Petición] OCX WSAFIPFE facturas electronicas (en Argentina) marcelolarran Controles y Componentes Gratuitos 7 31 de agosto de 2019 14:36
[Componente] Factura Electronica Argentina JulioBenitez9470 PowerCOBOL (ActiveX, v4 - v11) 19 26 de abril de 2018 15:17
[Sintaxis] Firma digital sobre XML Kuk Object-Oriented COBOL 3 21 de diciembre de 2017 13:26
Respuesta
 
Herramientas

  #1
Antiguo 11 de enero de 2021, 13:29
IDENTIFICATION DIVISION
Alejo Gonzalez
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Alejo Gonzalez
DATA DIVISION
febrero 2015
Tucuman
23.06.2021 01:20
PROCEDURE DIVISION
Posts: 27
Enviado: 6
Recibido: 1
Soluiones: 0
Reputación: 0
Alejo Gonzalez is on a distinguished road
Predeterminado Libro IVA Digital (Argentina)

HOLA, ALGUIEN YA TRABAJO SOBRE EL LIBRO IVA DIGITAL?

Mensaje de MODERADOR
Por favor, no escribas sólo con mayúsculas.

Última edición por Kuk fecha: 11 de enero de 2021 a las 13:55. Razón: no escribas sólo con mayúsculas
Alejo Gonzalez no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 11 de enero de 2021, 15:37
IDENTIFICATION DIVISION
Gusaiello
 Novato Senior
Concurso: Segundo puesto: Ganador/a del Segundo puesto en un concurso - Razón: Generador de código QR encriptado  Activista del Foro: Activista del Foro - Razón: Por aportar ejecrcicios para los novatos 
ENVIRONMENT DIVISION
Avatar de Gusaiello
DATA DIVISION
febrero 2015
Quilmes, Buenos Aires
66 años
22.06.2021 15:55
PROCEDURE DIVISION
Posts: 141
Enviado: 54
Recibido: 98
Soluiones: 7
Reputación: 16
Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road
Predeterminado

Si ya tenes preparado un programa que pueda generar los .txt para importar al SiAp, no tenes que hacer mas nada por que es exactamente el mismo formato, y si no es asi, avisame y te paso el formato que requiere Afip.
Gusaiello no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Alejo Gonzalez (19 de enero de 2021)
  #3
Antiguo 11 de enero de 2021, 16:37
IDENTIFICATION DIVISION
fastpho
 Novato Senior
Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Razón: Acceso a datos Cobol vía web 
ENVIRONMENT DIVISION
Avatar de fastpho
DATA DIVISION
diciembre 2016
Mendoza
50 años
22.06.2021 21:04
PROCEDURE DIVISION
Posts: 146
Enviado: 99
Recibido: 84
Soluiones: 19
Reputación: 13
fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point
Predeterminado

Cita del post de Gusaiello Ver Mensaje
Si ya tenes preparado un programa que pueda generar los .txt para importar al SiAp, no tenes que hacer mas nada por que es exactamente el mismo formato, y si no es asi, avisame y te paso el formato que requiere Afip.
Podrias poner el formato del archivo .txt que requiere afip con ejemplo
Muchas Gracias @Gusaiello,
fastpho no ha iniciado sesión   Responder Con Cita
  #4
Antiguo 11 de enero de 2021, 19:11
IDENTIFICATION DIVISION
Gusaiello
 Novato Senior
Concurso: Segundo puesto: Ganador/a del Segundo puesto en un concurso - Razón: Generador de código QR encriptado  Activista del Foro: Activista del Foro - Razón: Por aportar ejecrcicios para los novatos 
ENVIRONMENT DIVISION
Avatar de Gusaiello
DATA DIVISION
febrero 2015
Quilmes, Buenos Aires
66 años
22.06.2021 15:55
PROCEDURE DIVISION
Posts: 141
Enviado: 54
Recibido: 98
Soluiones: 7
Reputación: 16
Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road
Predeterminado

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 no ha iniciado sesión   Responder Con Cita
Han dicho Gracias: 2
Alejo Gonzalez (19 de enero de 2021), fastpho (12 de enero de 2021)
  #5
Antiguo 12 de enero de 2021, 12:58
IDENTIFICATION DIVISION
fastpho
 Novato Senior
Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Razón: Acceso a datos Cobol vía web 
ENVIRONMENT DIVISION
Avatar de fastpho
DATA DIVISION
diciembre 2016
Mendoza
50 años
22.06.2021 21:04
PROCEDURE DIVISION
Posts: 146
Enviado: 99
Recibido: 84
Soluiones: 19
Reputación: 13
fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point
Predeterminado

@Gusaiello, Gracias por tu tiempo
fastpho no ha iniciado sesión   Responder Con Cita
  #6
Antiguo 13 de enero de 2021, 12:36
IDENTIFICATION DIVISION
Gusaiello
 Novato Senior
Concurso: Segundo puesto: Ganador/a del Segundo puesto en un concurso - Razón: Generador de código QR encriptado  Activista del Foro: Activista del Foro - Razón: Por aportar ejecrcicios para los novatos 
ENVIRONMENT DIVISION
Avatar de Gusaiello
DATA DIVISION
febrero 2015
Quilmes, Buenos Aires
66 años
22.06.2021 15:55
PROCEDURE DIVISION
Posts: 141
Enviado: 54
Recibido: 98
Soluiones: 7
Reputación: 16
Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road
Predeterminado

@fastpho, Olvide poner las definiciones de los .txt de compras, son parecidos, pero no exactamente iguales.
Aqui van .

Código COBOL:
  1.        FD  TXTCOMPRAS.
  2.        01  REGTXTCOMPRAS.
  3.            03 FECHA-TXTCOMPRAS.
  4.               05 ANI-TXTCOMPRAS                  PIC 9(4).
  5.               05 MES-TXTCOMPRAS                  PIC 9(2).
  6.               05 DIA-TXTCOMPRAS                  PIC 9(2).
  7.            03 TIPOCOMPROBANTE-TXTCOMPRAS         PIC X(3).
  8.            03 PUNTODEVENTAS-TXTCOMPRAS           PIC 9(5).
  9.            03 NUMERODECOMPROBANTE-TXTCOMPRAS     PIC X(20).
  10.            03 DESPIMP-TXTCOMPRAS     ----------- PIC X(16).
  11.            03 CODIGODOCUMENTO-TXTCOMPRAS         PIC 9(2).
  12.            03 NUMERODOCUMENTO-TXTCOMPRAS         PIC X(20).
  13.            03 NOMBREPROVEEDOR-TXTCOMPRAS         PIC X(30).
  14.            03 IMPORTETOTAL-TXTCOMPRAS            PIC 9(13)V99.
  15.            03 NOGRAVADO-TXTCOMPRAS               PIC 9(13)V99.
  16.            03 EXENTOS-TXTCOMPRAS                 PIC 9(13)V99.
  17.            03 PERCEPCIONIVA-TXTCOMPRAS           PIC 9(13)V99.
  18.            03 PERCEPCIONOTROS-TXTCOMPRAS         PIC 9(13)V99.
  19.            03 PERCEPCIONINGBRUTOS-TXTCOMPRAS     PIC 9(13)V99.
  20.            03 PERCEPCIONMUNICIPAL-TXTCOMPRAS     PIC 9(13)V99.
  21.            03 IMPUESTOSINTERNOS-TXTCOMPRAS       PIC 9(13)V99.
  22.            03 CODIGOMONEDA-TXTCOMPRAS            PIC X(3).
  23.            03 TIPODECAMBIO-TXTCOMPRAS            PIC 9(4)V9(6).
  24.            03 CANTIDADALICUOTAS-TXTCOMPRAS       PIC 9(1).
  25.            03 CODIGOOPERACION-TXTCOMPRAS         PIC X(1).
  26.            03 CREDITOFISCAL-TXTCOMPRAS           PIC 9(13)V99.
  27.            03 OTROSTRIBUTOS-TXTCOMPRAS           PIC 9(15).
  28.            03 CUITEMISOR-TXTCOMPRAS              PIC 9(11).
  29.            03 DENOEMI-TXTCOMPRAS     ----------- PIC X(30).
  30.            03 IVACOMI-TXTCOMPRAS     ----------- PIC 9(13)V99.
  31.                                                  

Código COBOL:
  1.        FD  TXTALICCOMPRAS.
  2.        01  REGTXTALICCOMPRAS.
  3.            03 TIPOCOMPROBANTE-TXTALICCOMPRAS     PIC X(3).
  4.            03 PUNTODEVENTAS-TXTALICCOMPRAS       PIC 9(5).
  5.            03 NUMERODECOMPROBANTE-TXTALICCOMPRAS PIC X(20).
  6.            03 CODIGODOCUMENTO-TXTALICCOMPRAS     PIC 9(2).
  7.            03 NUMERODOCUMENTO-TXTALICCOMPRAS     PIC X(20).
  8.            03 NETOGRAVADO-TXTALICCOMPRAS         PIC 9(13)V9(2).
  9.            03 ALICUOTADEIVA-TXTALICCOMPRAS       PIC 9(4).
  10.            03 IMPORTELIQIDADO-TXTALICCOMPRAS     PIC 9(13)V9(2).

En la definición del archivo TXTCOMPRAS hay algunos campos que marque con ---------- por que no recuerdo en que caso hay que llenarlos y el nombre del campo no ayuda mucho que digamos para identificarlo. La cosa es que en el sistema de donde lo saqué no se necesitan, pero si te metes en la página de Arba seguro que esta aclarado por que de ahi saque estas definiciones originalmente.
Gusaiello no ha iniciado sesión   Responder Con Cita
Han dicho Gracias: 2
Alejo Gonzalez (19 de enero de 2021), fastpho (13 de enero de 2021)
  #7
Antiguo 13 de enero de 2021, 23:51
IDENTIFICATION DIVISION
JCantero
 Novato Senior
ENVIRONMENT DIVISION
Avatar de JCantero
DATA DIVISION
junio 2016
Albacete
55 años
23.06.2021 04:27
PROCEDURE DIVISION
Posts: 181
Enviado: 53
Recibido: 120
Soluiones: 8
Reputación: 18
JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road JCantero is on a distinguished road
Predeterminado

Una curiosidad,

Si hay un abono, una devolucion de compra, como se realiza.

Aqui,en España, el formato lleva signo para efectuar la devolucion.

Se denominan facturas rectificativas o de devolucion.
JCantero no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Kuk (15 de enero de 2021)
  #8
Antiguo 14 de enero de 2021, 09:23
IDENTIFICATION DIVISION
Gusaiello
 Novato Senior
Concurso: Segundo puesto: Ganador/a del Segundo puesto en un concurso - Razón: Generador de código QR encriptado  Activista del Foro: Activista del Foro - Razón: Por aportar ejecrcicios para los novatos 
ENVIRONMENT DIVISION
Avatar de Gusaiello
DATA DIVISION
febrero 2015
Quilmes, Buenos Aires
66 años
22.06.2021 15:55
PROCEDURE DIVISION
Posts: 141
Enviado: 54
Recibido: 98
Soluiones: 7
Reputación: 16
Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road Gusaiello is on a distinguished road
Predeterminado

@JCantero, el campo TIPOCOMPROBANTE indica si se trata de factura, nota de crédito o nota de débito.
De ahi se puede determinar si el importe suma o si resta.
Gusaiello no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
JCantero (14 de enero de 2021)
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 15:32.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2021, Jelsoft Enterprises Ltd.