12438024 DMINA-13780 DT Nodo de Exportación al generar ATS EQU

01. DATOS GENERALES

Producto

TOTVS Backoffice

Línea de producto:

Línea Protheus

Segmento:

Backoffice

Módulo:

SIGAFIS - Libros Fiscales

SIGAFAT - Facturación

Función:

Rutina(s)	Nombre Técnico	Fecha
LOCXNF	Notas Fiscales	16/11/2021
LOCXEQU	Funciones genéricas Notas Fiscales Ecuador	16/11/2021
GERXMLA1	Funciones genéricas XML para ATS	18/11/2021
FISA814	Carga de catálogos en formato .csv	16/11/2021
MATA468N	Generación de Notas	16/11/2021

Archivo relacionado	Nombre Técnico	Fecha
EQUATF.INI	Estructura de Archivo Transaccional Simplificado (ATS)	18/11/2021

País:

Ecuador

Ticket:

12438024

Requisito/Story/Issue (informe el requisito vinculado):

DMINA-13780

02. SITUACIÓN/REQUISITO

Se solicita añadir a la generación del documento Anexo Transaccional Simplificado (ATS) la funcionalidad para documentos de tipo Exportación conforme se indica en la resolución No. NAC-DGER2007-1319, ver sitio del SRI sección Anexo Transaccional Simplificado (ATS) subsección Base legal:

En la sección Guia para el contribuyente, dentro del documento Ficha Técnica ATS podrá encontrar más información sobre el llenado de la sección Exportaciones en el punto 2.4 EXPORTACIONES O INGRESOS DEL EXTERIOR.

03. SOLUCIÓN

Se realizan las actualizaciones al Diccionario de Datos (indicadas en la sección 04. INFORMACIÓN ADICIONAL) y rutinas para la generación del nodo "Exportaciones" al generar el Anexo Transaccional Simplificado (ATS):

En la rutina Funciones genéricas XML para ATS (GERXMLA1):
- En las funciones TRelAN1DeF() y PrTRepAN1() se añade una sección adicional para la impresión de la información de los documentos de Exportación desde TReport.
- Se crea la función LFeXMLaVEx() para añadir a una tabla temporal, los documentos de Tipo Exportación (F2_TPACTIV = S).
- Se crea la función GXMLCarEsp() para eliminar caracteres especiales en la impresion de los nodos razonSocial y denoExpCli.
En la rutina Funciones genéricas Notas Fiscales Ecuador (LOCXEQU) se añade la función LxEquNFExp() para validar que, si se esta capturando una factura de venta de tipo Exportación, se valide que sean capturados los campos requeridos para la generación del XML para ATS.
En la rutina Notas Fiscales (LOCXNF) se añade e uso de la función LxEquNFExp() localizado para país Ecuador y al realizar una factura de venta.
En la rutina Generación de Notas (MATA468N) se actualiza la función a468nGravF2() para grabar los campos de manera correcta al generar una factura a partir de un pedido de venta que cuente con los campos para exportación.
En la rutina Carga de catálogos en formato .csv (FISA814):
- Se crea función F814CpsTab() para cargar campos de un catálogo a tabla F3H.
- Se actualiza la función f814CatEcu() para añadir la carga de los siguientes catálogos:
  - 27TiposRegimenFiscalExterior.csv
  - 28Paises.csv
  - 29ParaisosFiscales.csv
  - 30TipoExportacionIngresoExterior.csv
  - 31TiposIngresoExterior.csv
  - 32TiposComprobantesAutorizados.csv
  - 33DistritoAduanero.csv
  - 34CodigoRegimen.csv
En el archivo Estructura de Archivo Transaccional Simplificado (ATS) (EQUATF.INI) se añade el tratamiento requerido para la impresión de los documentos de exportación obtenidos y añadidos a la tabla temporal generada en la función LFeXMLaVEx().

Importante

Al momento de la generación de la presente solución, las validaciones fueron realizadas con la versión DIMM 1.15 y Plugin ATS 1.3.0

Realizar un respaldo del repositorio (RPO).
Contar con las rutinas actualizadas conforme a la sección 01. DATOS GENERALES.
Contar con las actualizaciones al Diccionario de Datos, indicadas en la sección 04. INFORMACIÓN ADICIONAL:
- Creación de Campos.
- Creación de Gatillos.
- Creación de Consultas.
- Actualización de catálogos.
- Configuración de Archivo ".ini".

Ingresar al módulo Facturación (SIGAFAT).
Ir al menú "Actualizaciones | Archivos | Clientes" (MATA030).
Incluir/Actualizar un Cliente informando los siguientes campos:
- Folder de Registro
  - Tipo - 2 - Persona Jurídica
  - Provincia - Extranjero (EX)
  - Cd. Ciudad - Extranjero (EX)
  - Tipo Doc. - 06 (Pasaporte)
- Folder Fiscales
  - Tp. Reg. Fis - 01 (Régimen General)
  - País/Estab. - 105 (Colombia)
  - País P. Fisc - Vacío
  - Ps. Exp. Ing. - 105 (Colombia)
- Folder Otros
  - Código NIF - Informar un código de NIF
Ir al menú "Actualizaciones | Facturación | Facturaciones" (MATA467N).
Incluir un nuevo título indicando lo siguiente:
- Utilizar el Cliente del punto 3.
- Informar los siguientes campos del encabezado, correspondientes a los datos de Exportación:
  - Exportación? - S - Si
  - Tp. Expor.? - 01 (Exportación de bienes con refrendo)
  - Ref.Dis.Adu - 073 (Tulcán)
  - Ref.Régimen? - 40 (Exportación definitiva)
  - Ref. Correl.? - Informar correlativo
  - No.Doc Trans - Informar Num. de documento de transporte
  - Tip. Comp.? - 01 (Factura)
  - Fch Reg Cont - Informar la fecha requerida
Concluir la captura del documento y confirmar el guardado.
Ingresar al módulo Libros Fiscales (SIGAFIS).
Ir al menú "Miscelánea | Cálculos | Archivos Magnéticos" (MATA950).
Indicar los parámetros requeridos:
- Indicar un parámetro de fechas entre las cuales se encuentre la factura generada.
- Seleccionar el archivo EQUATF.INI.
- Indicar el directorio y nombre del archivo a generar.
En el Wizard para la captura de información del encabezado, informar los parámetros requeridos hasta finalizar y realizar la generación del archivo indicado.
En el XML indicado, se deberá contar con la sección de exportaciones con la información capturada en el cliente y en el encabezado de la factura.

04. INFORMACIÓN ADICIONAL

Diccionario de Datos:

Paquete de actualización

Las siguientes actualizaciones al Diccionario de Datos, fueron incluidas en el paquete: 009798.

Creación de Consultas Estándar

Consulta Específica ECU027 - Tip. Reg. Fis. Ext.

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU027	1	01	RE	Tip. Reg. Fis. Ext.	F3I
ECU027	2	01	01		F812SXB("S027","Codigo")
ECU027	5	01			VAR_IXB

Consulta Específica ECU028 - Países

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU028	1	01	RE	Países	F3I
ECU028	2	01	01		F812SXB("S028","Codigo")
ECU028	5	01			VAR_IXB

Consulta Específica ECU029 - Paraísos Fiscales

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU029	1	01	RE	Paraísos Fiscales	F3I
ECU029	2	01	01		F812SXB("S029","Codigo")
ECU029	5	01			VAR_IXB

Consulta Específica ECU030 - Tip. Exp. Ing. Exte.

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU030	1	01	RE	Tip. Exp. Ing. Exte.	F3I
ECU030	2	01	01		F812SXB("S030","Codigo")
ECU030	5	01			VAR_IXB

Consulta Específica ECU031 - Tip. Ing. Exterior

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU031	1	01	RE	Tip. Ing. Exterior	F3I
ECU031	2	01	01		F812SXB("S031","Codigo")
ECU031	5	01			VAR_IXB

Consulta Específica ECU032 - Tp. Comp. Autorizado

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU032	1	01	RE	Tp. Comp. Autorizado	F3I
ECU032	2	01	01		F812SXB("S032","Codigo")
ECU032	5	01			VAR_IXB

Consulta Específica ECU033 - Distrito Aduanero

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU033	1	01	RE	Distrito Aduanero	F3I
ECU033	2	01	01		F812SXB("S033","Codigo")
ECU033	5	01			VAR_IXB

Consulta Específica ECU034 - Código Régimen

Alias	Tipo	Secuencia	Columna	Descripción	Contiene
ECU034	1	01	RE	Código Régimen	F3I
ECU034	2	01	01		F812SXB("S034","Codigo")
ECU034	5	01			VAR_IXB

Creación de campos en SX3

Tabla SF2 - Encabezado de Facturas de Salida

Campo F2_TPACTIV

Campo	Contenido
Campo	F2_TPACTIV
Tipo	1 - Carácter
Tamaño	1
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Exportación?
Des. Español	¿Exportación?
Lista Español	S=Si;N=No
Inic. Estándar	'N'
Modo Edición
Consulta
Val. Sistema	LxEquCExp('SF2')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Indica si el documento será de exportación.

Campo F2_REGIME

Campo	Contenido
Campo	F2_REGIME
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tp. Expor.?
Des. Español	¿Tipo Exportación?
Lista Español
Inic. Estándar
Modo Edición	M->F2_TPACTIV == 'S'
Consulta	ECU030 - Tip. Exp. Ing. Exte.
Val. Sistema	Vazio() .Or. ValidF3I("S030",M->F2_REGIME,1,2) .And. LxEquCExp('SF2')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Tipo de transacción realizada, de acuerdo al tipo de documento que la sustenta: refrendo, factura de exportación y documento emitido en el exterior.

Campo F2_TPRENTA

Campo	Contenido
Campo	F2_TPRENTA
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tp. Ing Ext?
Des. Español	¿Tipo Ingreso Exterior?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == '03'
Consulta	ECU031 - Tip. Ing. Exterior
Val. Sistema	Vazio() .Or. ValidF3I("S031",M->F2_TPRENTA,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Tipo de transacción realizada por concepto de ingresos del exterior.

Campo F2_EXPCONF

Campo	Contenido
Campo	F2_EXPCONF
Tipo	1 - Carácter
Tamaño	1
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ing Ext Grav
Des. Español	¿Ingreso Ext Gravado?
Lista Español	S=Si;N=No
Inic. Estándar	'N'
Modo Edición	M->F2_REGIME == '03'
Consulta
Val. Sistema	LxEquCExp('SF2')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Campo de respuesta afirmativa o negativa (SI o NO) respectivamente. Debe ser ingresado en forma obligatoria de ser un tipo de exportación 03.

Campo F2_VALIMPD

Campo	Contenido
Campo	F2_VALIMPD
Tipo	2 - Numérico
Tamaño	14
Decimal	2
Formato	@E 99,999,999,999.99
Propiedad	1 - Modificar
Tit. Español	Vl Imp Rent?
Des. Español	¿Valor Impuesto Renta?
Lista Español
Inic. Estándar
Modo Edición	M->F2_TPACTIV == 'S'
Cons.
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Valor del impuesto a la renta o similar pagado en el exterior de los ingresos percibidos en exterior, que consta en el comprobante o documento sustento de la transacción.

Campo F2_TCOMP

Campo	Contenido
Campo	F2_TCOMP
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tip. Comp.?
Des. Español	¿Tipo Comprobante?
Lista Español
Inic. Estándar
Modo Edición	M->F2_TPACTIV == 'S'
Consulta	ECU032 - Tp. Comp. Autorizado
Val. Sistema	Vazio() .Or. ValidF3I("S032",M->F2_TCOMP,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Corresponde al tipo de comprobante utilizado en la transacción que se va a registrar. Este campo debe ser ingresado en forma obligatoria en el registro de exportaciones.

Campo F2_FECHSE

Campo	Contenido
Campo	F2_FECHSE
Tipo	4 - Fecha
Tamaño	8
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Fch Reg Cont
Des. Español	¿Fecha Registro Contable?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == 'S'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Este campo se debe llenar únicamente cuando se informó “Con refrendo” en el campo “Tipo Exportación”. Se debe ingresar la fecha efectiva en la que se realizó el embarque. En el caso de ingresos del exterior o exportación de servicios, se registrará la fecha en la que se realizó el cobro y se registró contablemente, es decir, al mes al que corresponde el ingreso.

Campo F2_MUNDESC

Campo	Contenido
Campo	F2_MUNDESC
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ref.Dis.Adu.
Des. Español	¿No. Refrendo-Disr. Adua?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == '01'
Consulta	ECU033
Val. Sistema	Vazio() .Or. ValidF3I("S033",M->F2_MUNDESC,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. de refrendo - Distrito Aduanero

Campo F2_CMUNDE

Campo	Contenido
Campo	F2_CMUNDE
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Ref.Régimen?
Des. Español	¿No. Refrendo-Régimen?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == '01'
Consulta	ECU034
Val. Sistema	Vazio() .Or. ValidF3I("S034",M->F2_CMUNDE,1,2)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. del refrendo - Régimen

Campo F2_DOCMAN

Campo	Contenido
Campo	F2_DOCMAN
Tipo	1 - Carácter
Tamaño	8
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ref.Correl.?
Des. Español	¿No. Refrendo-Correlati.?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == '01'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. del refrendo - Correlativo

Campo F2_LTRAN

Campo	Contenido
Campo	F2_LTRAN
Tipo	1 - Carácter
Tamaño	13
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	No.Doc.Trans
Des. Español	¿No. Doc. Transporte?
Lista Español
Inic. Estándar
Modo Edición	M->F2_REGIME == '01'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. de documento de transporte.

Tabla SC5 - Pedidos de Venta

Campo C5_TPACTIV

Campo	Contenido
Campo	C5_TPACTIV
Tipo	1 - Carácter
Tamaño	1
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Exportación?
Des. Español	¿Exportación?
Lista Español	S=Si;N=No
Inic. Estándar	'N'
Modo Edición
Consulta
Val. Sistema	LxEquCExp('SC5')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Indica si el documento será de exportación.

Campo C5_REGIME

Campo	Contenido
Campo	C5_REGIME
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tp. Expor.?
Des. Español	¿Tipo Exportación?
Lista Español
Inic. Estándar
Modo Edición	M->C5_TPACTIV == 'S'
Consulta	ECU030 - Tip. Exp. Ing. Exte.
Val. Sistema	Vazio() .Or. ValidF3I("S030",M->C5_REGIME,1,2) .And. LxEquCExp('SC5')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Tipo de transacción realizada, de acuerdo al tipo de documento que la sustenta: refrendo, factura de exportación y documento emitido en el exterior.

Campo C5_TPRENTA

Campo	Contenido
Campo	C5_TPRENTA
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tp. Ing Ext?
Des. Español	¿Tipo Ingreso Exterior?
Lista Español
Inic. Estándar
Modo Edición	M->C5_REGIME == '03'
Consulta	ECU031 - Tip. Ing. Exterior
Val. Sistema	Vazio() .Or. ValidF3I("S031",M->C5_TPRENTA,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Tipo de transacción realizada por concepto de ingresos del exterior.

Campo C5_EXPCONF

Campo	Contenido
Campo	C5_EXPCONF
Tipo	1 - Carácter
Tamaño	1
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Ing Ext Grav
Des. Español	¿Ingreso Ext Gravado?
Lista Español	S=Si;N=No
Inic. Estándar	'N'
Modo Edición	M->C5_REGIME == '03'
Consulta
Val. Sistema	LxEquCExp('SC5')
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Campo de respuesta afirmativa o negativa (SI o NO) respectivamente. Debe ser ingresado en forma obligatoria de ser un tipo de exportación 03.

Campo C5_VALIMPD

Campo	Contenido
Campo	C5_VALIMPD
Tipo	2 - Numérico
Tamaño	14
Decimal	2
Formato	@E 99,999,999,999.99
Propiedad	1 - Modificar
Tit. Español	Vl Imp Rent?
Des. Español	¿Valor Impuesto Renta?
Lista Español
Inic. Estándar
Modo Edición	M->C5_TPACTIV == 'S'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Valor del impuesto a la renta o similar pagado en el exterior de los ingresos percibidos en exterior, que consta en el comprobante o documento sustento de la transacción.

Campo C5_TCOMP

Campo	Contenido
Campo	C5_TCOMP
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tip. Comp.?
Des. Español	¿Tipo Comprobante?
Lista Español
Inic. Estándar
Modo Edición	M->C5_TPACTIV == 'S'
Consulta	ECU032 - Tp. Comp. Autorizado
Val. Sistema	Vazio() .Or. ValidF3I("S032",M->C5_TCOMP,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	Corresponde al tipo de comprobante utilizado en la transacción que se va a registrar. Este campo debe ser ingresado en forma obligatoria en el registro de exportaciones.

Campo C5_FECHSE

Campo	Contenido
Campo	C5_FECHSE
Tipo	4 - Fecha
Tamaño	8
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Fch Reg Cont
Des. Español	¿Fecha Registro Contable?
Lista Español
Inic. Estándar
Modo Edición	M->C5_TPACTIV == 'S'
Consulta
Val. Sistema
Obligatoorio	No
Usado	Si
Browse	No
Folder
Help	Este campo se debe llenar únicamente cuando se informó “Con refrendo” en el campo “Tipo Exportación”. Se debe ingresar la fecha efectiva en la que se realizó el embarque. En el caso de ingresos del exterior o exportación de servicios, se registrará la fecha en la que se realizó el cobro y se registró contablemente, es decir, al mes al que corresponde el ingreso.

Campo C5_MUNDESC

Campo	Contenido
Campo	C5_MUNDESC
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ref.Dis.Adu.
Des. Español	¿No. Refrendo-Disr. Adua?
Lista Español
Inic. Estándar
Modo Edición	M->C5_REGIME == '01'
Consulta	ECU033
Val. Sistema	Vazio() .Or. ValidF3I("S033",M->C5_MUNDESC,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. de refrendo - Distrito Aduanero

Campo C5_CMUNDE

Campo	Contenido
Campo	C5_CMUNDE
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Ref.Régimen?
Des. Español	¿No. Refrendo-Régimen?
Lista Español
Inic. Estándar
Modo Edición	M->C5_REGIME == '01'
Consulta	ECU034
Val. Sistema	Vazio() .Or. ValidF3I("S034",M->C5_CMUNDE,1,2)
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. del refrendo - Régimen

Campo C5_DOCMAN

Campo	Contenido
Campo	C5_DOCMAN
Tipo	1 - Carácter
Tamaño	8
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ref.Correl.?
Des. Español	¿No. Refrendo-Correlati.?
Lista Español
Inic. Estándar
Modo Edición	M->C5_REGIME == '01'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. del refrendo - Correlativo

Campo C5_LTRAN

Campo	Contenido
Campo	C5_LTRAN
Tipo	1 - Carácter
Tamaño	13
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	No.Doc.Trans
Des. Español	¿No. Doc. Transporte?
Lista Español
Inic. Estándar
Modo Edición	M->C5_REGIME == '01'
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder
Help	No. de documento de transporte.

Tabla SA1 - Clientes

Campo A1_TFN

Campo	Contenido
Campo	A1_TFN
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Tp. Reg. Fis
Des. Español	Tp. De Reg. Fis. Exterior
Lista Español
Inic. Estándar
Modo Edición
Cons.	ECU027 - Tip. Reg. Fis. Ext.
Val. Sistema	Vazio() .Or. ValidF3I("S027",M->A1_TFN,1,2)
Obligatorio	No
Usado	Si
Browse	No
Folder	3
Help	Indica si el pago realizado fue a un no residente.

Campo A1_TP

Campo	Contenido
Campo	A1_TP
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	País/Estab.
Des. Español	País/Estab. Pago
Lista Español
Inic. Estándar
Modo Edición	M->A1_TFN=='01'
Consulta	ECU028 - Países
Val. Sistema	Vazio() .Or. ValidF3I("S028",M->A1_TP,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder	3
Help	País de residencia o establecimiento permanente a quién se efectúa el pago régimen general.

Campo A1_GLN

Campo	Contenido
Campo	A1_GLN
Tipo	1 - Carácter
Tamaño	2
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Pais P. Fisc
Des. Español	País paraíso fiscal
Lista Español
Inic. Estándar
Modo Edición	M->A1_TFN=='02'
Consulta	ECU029 - Paraísos Fiscales
Val. Sistema	Vazio() .Or. ValidF3I("S029",M->A1_GLN,1,2)
Obligatorio	No
Usado	Si
Browse	No
Folder	3
Help	País de residencia o establecimiento permanente a quién se efectúa el pago paraíso fiscal.

Campo A1_RETIR

Campo	Contenido
Campo	A1_RETIR
Tipo	1 - Carácter
Tamaño	3
Decimal	0
Formato	@!
Propiedad	1 - Modificar
Tit. Español	Ps. Exp Ing
Des. Español	Pais Exp. Ing. Exterior
Lista Español
Inic. Estándar
Modo Edición	M->A1_EST=='EX'
Consulta	ECU028 - Países
Val. Sistema	Vazio() .Or. ValidF3I("S028",M->A1_RETIR,1,3)
Obligatorio	No
Usado	Si
Browse	No
Folder	3
Help	País de residencia o establecimiento permanente a quién se efectúa el exportación o ingreso del exterior.

Campo A1_ACN

Campo	Contenido
Campo	A1_ACN
Tipo	1 - Carácter
Tamaño	1
Decimal	0
Formato
Propiedad	1 - Modificar
Tit. Español	Pt. Relac.?
Des. Español	¿Parte Relacionada?
Lista Español
Inic. Estándar	'N'
Modo Edición	S=Si; N=No
Consulta
Val. Sistema
Obligatorio	No
Usado	Si
Browse	No
Folder	3
Help

Relación de atributos en XML con campos:

Campo XML	Contenido	Observaciones
tpIdClienteEx	A1_TIPDOC	Tipo de Identificación del Cliente, si se informa 04 el nodo contendrá el valor 20, si es informado 06 o 08 el nodo contendrá el valor 21.
idClienteEx	A1_CGC/A1_NIF	No. de Identificación del Cliente, si el tipo de identificación de cliente es informado como 04 contendrá A1_CGC, si es informado como 06 o 08 contendrá A1_TFN.
parteRelExp	A1_ACN	Parte Relacionada informada como SI o NO.
tipoCli	A1_TIPO	Tipo de Cliente si el nodo tpIdClienteEx es informado con valor 21, si A1_TIPO = 1 se informara 01, si A1_TIPO = 2 se informara 02.
denoExpCli	A1_NOME	Razón o denominación social del exportador, si el nodo tpIdClienteEx es informado con valor 21, contendrá A1_NOME.
tipoRegi	A1_TFN	Tipos de régimen fiscal del exterior
paisEfecPagoGen	A1_TP
paisEfecPagoParFis	A1_GLN
denopagoRegFis		Si A1_TFN = '01' se obtiene descripcion de tabla S028 a partir de codigo informado en A1_TP, si A1_TFN = '02' se obtiene descripcion de tabla S029 a partir de codigo informado en A1_GLN.
paisEfecExp	A1_RETIR	País de residencia o establecimiento permanente a quien se efectúa la exportación o ingreso del exterior.
exportacionDe	F2_REGIME	Tipo de Exportación / Ingreso del exterior
tipIngExt	F2_TPRENTA	Tipos de Ingresos del exterior
ingExtGravOtroPais	F2_EXPCONF	¿El ingreso del exterior fue gravado con impuesto a la renta o uno similar, en el país en el que se obtuvo?
impuestoOtroPais	F2_VALIMPD	Valor del impuesto a la renta o impuesto similar pagado en el exterior por el ingreso obtenido.
tipoComprobante	F2_TCOMP	Tipo de Comprobante
distAduanero	F2_MUNDESC	No. de refrendo - Distrito Aduanero
anio	F2_FECHSE	No. de refrendo - Año
regimen	F2_CMUNDE	No. del refrendo - Régimen
correlativo	F2_DOCMAN	No. del refrendo - Correlativo
docTransp	F2_LTRAN	No. de documento de transporte
fechaEmbarque	F2_FECHSE	Fecha de registro contable
valorFOB	F2_VALBRUT	Valor FOB / Valor del ingreso del exterior
valorFOBComprobante	F2_VALBRUT	Valor del Comprobante local / exterior
puntoEmision	F2_PTOEMIS	No. de serie del comprobante de venta - punto de emisión.
secuencial	F2_DOC	No. secuencial del comprobante de venta.
autorizacion	F2_NUMAUT	No. de autorización del comprobante de venta.
fechaEmision	F2_EMISSAO	Fecha de emisión del comprobante de venta.

Actualización de Catálogos

Iniciar el SmartClient en el módulo "Configurador - SIGACFG".
Entrar a la rutina "Base de Datos > Base de Datos > Parámetros (CFGX031)".
Configurar el parámetro MV_PATH814, especificando la ruta de ubicación para los catálogos, archivos en formato CSV.
Realizar las sugerencias de la sección "Formato de Catálogos".
En la ruta especificada en el parámetro MV_PATH814, colocar los catálogos:
- 27TiposRegimenFiscalExterior.csv
- 28Paises.csv
- 29ParaisosFiscales.csv
- 30TipoExportacionIngresoExterior.csv
- 31TiposIngresoExterior.csv
- 32TiposComprobantesAutorizados.csv
- 33DistritoAduanero.csv
- 34CodigoRegimen.csv

Archivos de ejemplo

Catalogos.zip

Formato de Catálogos

Se recomienda considerar los siguientes puntos al realizar la creación de los archivos CSV de los catálogos:

En la configuración regional del Sistema Operativo de la computadora, establecer el carácter pipe ('|') como separador de campos.
Entrar al mini-sitio del SRI, descargar los catálogos (sección Anexo Transaccional Simplificado, Guía para el contribuyente, Catálogo ATS para Reporte Mensual Semestral, folder TABLAS REFERENCIALES), los cuales son distribuidos en planilla de cálculo.
En el catálogo requerido, observar que la cantidad y distribución de las columnas coincida con el catálogo previo.
Copiar las celdas de datos, sin encabezados, del catálogo requerido a una nueva planilla.
Grabar la planilla obtenida, es importante que el nombre sea el mismo que las mostradas a continuación, y que sea con el Tipo de archivo CSV (MS_DOS) .csv:
- 27TiposRegimenFiscalExterior.csv
- 28Paises.csv
- 29ParaisosFiscales.csv
- 30TipoExportacionIngresoExterior.csv
- 31TiposIngresoExterior.csv
- 32TiposComprobantesAutorizados.csv
- 33DistritoAduanero.csv
- 34CodigoRegimen.csv
Posteriormente, si es necesario, reestablecer el separador de campos en la configuración regional del Sistema Operativo de la computadora.
Comprobar que el archivo .csv obtenido tenga codificación UTF-8 sin BOM, en caso contrario, se deberá cambiar a través de un editor de texto con la capacidad de manejo de codificación, por ejemplo con Notepad++:
- Cargar el archivo .csv en el editor.
- Las vocales con acento, eñes y otros caracteres especiales se deben visualizar correctamente. Además, en el menú "Codificación" debe indicar la opción "UTF-8 sin BOM".
- En caso de que no se cumplan esas condiciones, en el menú "Codificación" seleccionar "Juego de caracteres > Europeo Occidental > OEM 850".
- A continuación, nuevamente abrir el menú "Codificación", seleccionar Convertir a "UTF-8 sin BOM".
- En este punto, las vocales con acento, eñes y otros caracteres especiales deben visualizarse correctamente.
- Grabar el archivo de texto.

Carga de catálogos

Ingresar al módulo "Facturación - SIGAFAT".
Entrar a la rutina "Actualizaciones > Archivos > Mantenimiento de Catálogos. (FISA814)".
El catálogo será actualizado en el sistema.
En el módulo de Facturación (SIGAFAT) desde "Actualizaciones | Archivos | Mantenimiento de Catálogos" validar que se creen los siguientes catálogos:

Catálogo de Régimen Fiscal del Exterior

Catálogo de Países

Catálogo de Paraísos Fiscales

Catálogo de Tipo de Exportación / Ingreso del Exterior

Catálogo de Tipos de Ingresos del Exterior

Catálogo de Tipos de Comprobantes Autorizados

Catálogo de Distritos Aduaneros

Catálogo de Códigos de Régimen

Archivo de Configuración (.ini)

Para la generación del nodo de Exportaciones en la generacion del Anexo Transaccional Simplificado (ATS), la funcionalidad debe ser añadida al archivo EQUATF.INI el cual debe ser estar ubicado en la carpeta System ('Protheus_data\System').

**Importante**

En caso de tener personalizaciónes en el archivo EQUATF.INI, se recomienda realizar un respaldo del mismo y posteriormente incluir las siguientes actualizaciones para generar nodo de Exportaciones:

En la seccion [XXX Header] se añade tratamiento para eliminar caracteres especiales en el nodo razonSocial.
Se añade la seccion [XXX Identificação do Exportaciones] en donde se finaliza el seccion ventasEstablecimiento y se inicia la seccion de exportaciones
Se añade la seccion [XXX Criacao do arquivo notas exportacion] donde se almacena en pocicion del arreglo _aTotal el llamado a la función LFeXMLaVEx() para la creación de la tabla con los documentos de tipo exportación.
Se añade la seccion [TEX Geração do XML] en la cual se procesan todos los documentos obtenidos en la seccion anterior.
Se actualiza la seccion [XXX Identificação do Contribuinte] para finalizar la seccion de exportaciones e iniciar la seccion anulados.
Se actualiza la seccion [XXX Criacao do arquivo notas canceladas] indicando una posicion posterior a las utilizadas en el arreglo _aTotal al llamar la funcion LFeqXMLcan()

EQUATF.INI

EQUATF.INI (Estandar)

?{"Nombre del Archivo INI","EQUATF.INI"}
?{"Descripcion Completa del Archivo Magnetico","Declaracion de Retencion del Impuesto de Renta - IR."}
?{"Comentarios",""}

@XML

[XXX Inicializacao variaveis]
(PRE) _aTotal[001] := MV_PAR01                     
(PRE) _aTotal[002] := MV_PAR02
(PRE) _aTotal[003] := {}
(PRE) _aTotal[004] := {}
(PRE) _aTotal[005] := .F.
(PRE) _aTotal[006] := {}
(PRE) _atotal[020] := 0
(PRE) _aTotal[021] := IIf(SF2->(ColumnPos("F2_TPDOC"))==0 .OR. SF2->(ColumnPos("F2_TPVENT"))==0 .OR. SF2->(ColumnPos("F2_TIPOPE"))==0,.F.,.T.)
(PRE) _aTotal[022] := {}
(PRE) _aTotal[023] := {}
(PRE) _aTotal[024] := 0
(PRE) _aTotal[025] := ""

[XXX Montagem do CFP Utilizado pela rotina - PRINCIPAL]
(PRE) aAdd (_aTotal[003], "Formulario 103 - Declaracion de Retencion del Impuesto de Renta - IR")
(PRE) aAdd (_aTotal[003], "")
(PRE) aAdd (_aTotal[003], "Rellene correctamente la informacion solicitada.")
(PRE) aAdd (_aTotal[003], "Informacion necesarias para el rellenado automatico del Formulario 103: Declaracion de Retencion del Impuesto de Renta - IR.")

[XXX Montagem do CFP Utilizado pela rotina - COMPLEMENTAR]
(PRE) aAdd (_aTotal[004], {})
(PRE) aAdd (_aTotal[004][1], "Formulario 103 - Declaracion de Retencion del impuesto de Renta - IR")
(PRE) aAdd (_aTotal[004][1], "Rellene correctamente la informacion solicitada.")
(PRE) aAdd (_aTotal[004][1], {})
(PRE) aAdd (_aTotal[004][1][3], {1, "",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {0, "",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {0, "",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {0, "",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Tipo Declaracion",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Si fuera sustitutiva:",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {3,,,,,{"O=Original", "S=Sustitutiva"},,})
(PRE) aAdd (_aTotal[004][1][3], {0, "",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Version Formulario",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Nº Formulario",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {2,,"@E 9.9",2,1,,,3})
(PRE) aAdd (_aTotal[004][1][3], {2,,"9999999999999",2,0,,,13})
(PRE) aAdd (_aTotal[004][1][3], {1, "Cod. Version Form.",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Impuesto Pagado",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {2,,"9999999999",2,0,,,10})
(PRE) aAdd (_aTotal[004][1][3], {2,,"@E 999,999,999.99",2,2,,,14})
(PRE) aAdd (_aTotal[004][1][3], {1, "ID Representante legal",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Mora / Interesses",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {2,,"@E 9999999999999",2,0,,,13})
(PRE) aAdd (_aTotal[004][1][3], {2,,"@E 999,999,999.99",2,2,,,14})
(PRE) aAdd (_aTotal[004][1][3], {1, "RUC Contador",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {1, "Multa / Intereses",,,,,,})
(PRE) aAdd (_aTotal[004][1][3], {2,,"@E 9999999999999",2,0,,,13})

[XXX Chamada do Wizard]
(PRE) _atotal[005] := xMagWizard (_aTotal[003], _atotal[04], "EQUATF")
(PRE) Iif (_atotal[005], xMagLeWiz ("EQUATF", @_atotal[06], .T.), Nil)
(PRE) lAbtMT950	:= !_atotal[005]

[XXX - monta o Nome do arquivo] 
(PRE) mv_par04 := Alltrim(mv_par04) + "."
(PRE) mv_par04 := stuff(mv_par04,rat(".",mv_par04),rat(".",mv_par04),".XML")
(PRE) _aTotal[07] := mv_par04
(PRE) _aTotal[15] := .F.
//(PRE) _aTotal[16] := .F.


[XXX Header]
//(IMP) {.T.,1,1,"IVA"}
//(CMP) {{"NUMRUC","Contribuyente"},{"RAZSOC","Razon Social"},{"MES","Mes"},{"ANIO","Ano"}}
(PRE) _aTotal[010] := "version="+'"1.0"'+" encoding="+'"ISO-8859-1"'+" standalone="+'"yes"'+" ?"
(PRE) _atotal[30] := LFeqXMLanV(DTOS(MV_PAR01),DTOS(MV_PAR02)) 
Linha1     C 000 0 MontaXML("?xml"				,						,,,,,  ,.T.,.F.,.T.,_aTotal[010])
IVA        C 003 0 MontaXML("iva"				,						,,,,,1 ,.T.,.F.,.T.)
TIdInf     C 015 0 MontaXML("TipoIDInformante"	,"R"					,,,,,4 ,.T.,.T.,.T.)
NUMRUC     C 015 0 MontaXML("IdInformante"      ,SM0->M0_CGC			,,,,,4 ,.T.,.T.,.T.)
RAZSOC     C 100 0 MontaXML("razonSocial"    	,GXMLCarEsp(SM0->M0_NOMECOM),,,,,4 ,.T.,.T.,.T.)
ANIO       C 004 0 MontaXML("Anio"           	,substr(dTOs(MV_PAR01),1,4)	,,,,,4 ,.T.,.T.,.T.)
MES        C 002 0 MontaXML("Mes"            	,substr(dTOs(MV_PAR01),5,2)	,,,,,4 ,.T.,.T.,.T.)
NUMESTRUC  C 015 0 MontaXML("numEstabRuc"      	,_atotal[30][2]			,,,,,4 ,.T.,.T.,.T.)
TVentas    C 015 0 MontaXML("totalVentas"      	,STRTRAN(TRANSFORM(0 ,"@E 9999999999.99"),',','.')  ,,,,,4 ,.T.,.T.,.T.)
CodOpera   C 015 0 MontaXML("codigoOperativo"   ,"IVA"					,,,,,4 ,.T.,.T.,.T.)
Compras    C 000 0 MontaXML("compras"        	,						,,,,,4 ,.T.,.F.,.T.)
(POS)

[XXX Extraindo Livro fiscal Compras]
(PRE) _atotal[31] := LFeqXMLan1(DTOS(MV_PAR01),DTOS(MV_PAR02)) 

[TRA Geração do XML]
//(IMP) {.T.,1,1,"Compras"}
//(CMP) {{"CODSUST","Sustento"},{"IDPROV","Ident."},{"TPCOMPROV","Tipo Compr."},{"ESTABL","Estab."},{"PONTOVEND","Punto Venta"},{"SEQUEN","Secu."}}
//,{"Autoriz","Autoriz"},{"BasNoGRiva","Base IVA 0%"},{"BasImponib","Base IVA Dif 0%"},{"BasImpGrav","Base obj IVA"},{"ValIVA","Monto IVA"}}
(PRE) TRA->(dbGoTop())
(PREREG) _aTotal[024] := IIF(_aTotal[021], IIF(Alltrim(TRA->TPDOC) =='01' .AND. Alltrim(TRA->TPVENT) =='1' .AND. Alltrim(TRA->TIPOPE) =='41', 1,0),0)
(PREREG) _aTotal[012] := RetIR(TRA->FILIAL, TRA->CLIEFOR, TRA->LOJA, TRA->NFISCAL, TRA->SERIE)
(PREREG) _aTotal[022] := IIF(_aTotal[024] > 0 , obtTotReem(TRA->NFISCAL,TRA->SERIE, TRA->CLIEFOR, TRA->LOJA),{})
(PREREG) _aTotal[023] := IIF(_aTotal[024] > 0 , ObtReem (TRA->FILIAL, TRA->NFISCAL, TRA->SERIE, TRA->CLIEFOR, TRA->LOJA),{})
(PREREG) _aTotal[025] := IIf(_aTotal[024] > 0 .AND. LEN(_aTotal[023])>0,_aTotal[023][1], "" )

DetCompr   C 000 0 MontaXML("detalleCompras" 	,						,,,,,8 ,.T.,.F.,.T.)
CODSUST    C 002 0 MontaXML("codSustento"    	,TRA->CDSUSTEN			,,,,,12,.T.,.T.,.T.)
TpIdProv   C 000 0 MontaXML("tpIdProv"       	,TRA->TPLDPROV			,,,,,12,.T.,.T.,.T.)
IDPROV     C 013 0 MontaXML("idProv"         	,TRA->IDPROV      		,,,,,12,.T.,.T.,.T.)
TPCOMPROV  C 002 0 MontaXML("tipoComprobante"	,TRA->TPCOMPRO    		,,,,,12,.T.,.T.,.T.)
PARRELC    C 002 0 MontaXML("parteRel"			,"NO"    				,,,,,12,.T.,.T.,.T.)
dTReg      C 000 0 MontaXML("fechaRegistro"  	,DToC(TRA->DTFECH)     	,,,,,12,.T.,.T.,.T.)

ESTABL     C 003 0 MontaXML("establecimiento"	,TRA->ESTABEL			,,,,,12,.T.,.T.,.T.)
PONTOVEND  C 003 0 MontaXML("puntoEmision"		,TRA->PTEMIS			,,,,,12,.T.,.T.,.T.)
SEQUEN     C 009 0 MontaXML("secuencial"		,TRA->SEQUENC			,,,,,12,.T.,.T.,.T.)
DtEmis     C 000 0 MontaXML("fechaEmision"		,TRA->DTEMISS 			,,,,,12,.T.,.T.,.T.)
Autoriz    C 000 0 MontaXML("autorizacion"		,TRA->AUTORIZ			,,,,,12,.T.,.T.,.T.)
BasNoGRiva C 000 0 MontaXML("baseNoGraIva"		,STRTRAN(TRANSFORM(TRA->BASNOGRV ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
BasImponib C 000 0 MontaXML("baseImponible"		,STRTRAN(TRANSFORM(TRA->BASIMPON ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
BasImpGrav C 000 0 MontaXML("baseImpGrav"		,STRTRAN(TRANSFORM(TRA->BASIMPGR ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
BasImpEx   C 000 0 MontaXML("baseImpExe"		,STRTRAN(TRANSFORM(_aTotal[012][5] ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValICE     C 000 0 MontaXML("montoIce"			,STRTRAN(TRANSFORM(TRA->TOTALICE ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValIVA     C 000 0 MontaXML("montoIva"			,STRTRAN(TRANSFORM(TRA->TOTALIVA ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValRetB10  C 000 0 MontaXML("valRetBien10"		,STRTRAN(TRANSFORM(_aTotal[012][2] ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValRetS20  C 000 0 MontaXML("valRetServ20"		,STRTRAN(TRANSFORM(_aTotal[012][3] ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValIvaBens C 000 0 MontaXML("valorRetBienes"	,STRTRAN(TRANSFORM(_aTotal[012][6] ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValRetS20  C 000 0 MontaXML("valRetServ50"		,STRTRAN(TRANSFORM(_aTotal[012][4],"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValIvaServ C 000 0 MontaXML("valorRetServicios"	,STRTRAN(TRANSFORM(_aTotal[012][7] ,"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValRet100  C 000 0 MontaXML("valRetServ100"		,STRTRAN(TRANSFORM(_aTotal[012][8],"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
ValReemb   C 000 0 MontaXML("totbasesImpReemb"	,STRTRAN(TRANSFORM(IIF(LEN(_aTotal[022])>0,_aTotal[022][1][2],0 ),"@E 9999999999.99"),',','.') ,,,,,12,.T.,.T.,.T.)
PagExt     C 003 0 MontaXML("pagoExterior"		,						,,,,,12 ,.T.,.F.,.T.)
PagoLocE   C 002 0 MontaXML("pagoLocExt"		,"01"					,,,,,16,.T.,.T.,.T.)
EPagoGen   C 002 0 MontaXML("paisEfecPago"		,"NA"					,,,,,16,.T.,.T.,.T.)
Convenio   C 002 0 MontaXML("aplicConvDobTrib"	,"NA"					,,,,,16,.T.,.T.,.T.)
EPagoPar   C 002 0 MontaXML("pagExtSujRetNorLeg"		,"NA"			,,,,,16,.T.,.T.,.T.)
PagExtF    C 000 0 MontaXML("pagoExterior"		,						,,,,,12 ,.F.,.T.,.T.)
ForPag     C 000 0 MontaXML("formasDePago"		,						,,,,,12 ,.T.,.F.,.T.)
PagoLocE   C 000 0 MontaXML("formaPago"		    ,TRA->FORPAGO			,,,,,16,.T.,.T.,.T.)
ForPagF    C 000 0 MontaXML("formasDePago"		,						,,,,,12 ,.F.,.T.,.T.)
Air        C 000 0 _aTotal[012][1]
Reembol    C 000 0 _aTotal[025]
DetComprF  C 000 0 MontaXML("detalleCompras"		,					,,,,,8 ,.F.,.T.,.T.)

[XXX - livro Fiscal Vendas]
ComprasF   C 000 0 MontaXML("compras"				,					,,,,,4 ,.F.,.T.,.T.)
Vendas     C 000 0 MontaXML("ventas"				,					,,,,,4 ,.T.,.F.,.T.)


[TRB Geração do XML]
(PRE) TRB->(dbGoTop())

DtVendas   C 000 0 MontaXML("detalleVentas"	,							,,,,,8 ,.T.,.F.,.T.)
TpIdClie   C 000 0 MontaXML("tpIdCliente"	,TRB->TIPDOC				,,,,,12,.T.,.T.,.T.)
IdClien    C 000 0 MontaXML("idCliente"		,TRB->CDCGC					,,,,,12,.T.,.T.,.T.)
PARRELV    C 000 0 MontaXML("parteRelVtas"	,"NO"						,,,,,12,.T.,.T.,.T.)
Tpcomprova C 000 0 MontaXML("tipoComprobante"	,TRB->ESPECIE			,,,,,12,.T.,.T.,.T.)
TEmision   C 000 0 MontaXML("tipoEmision"	,"E"						,,,,,12,.T.,.T.,.T.)
NumComprov C 000 0 MontaXML("numeroComprobantes",cvaltochar(TRB->QTDNF)		,,,,,12,.T.,.T.,.T.)
BS2NoGrIva C 000 0 MontaXML("baseNoGraIva"	,STRTRAN(TRANSFORM(TRB->EXENTAS ,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
BS2Imponib C 000 0 MontaXML("baseImponible"	,STRTRAN(TRANSFORM(TRB->ALQZERO ,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
BS2ImpGrav C 000 0 MontaXML("baseImpGrav"	,STRTRAN(TRANSFORM(TRB->ALQNOZER,"@E 9999999999.99"),',','.') 	,,,,,12,.T.,.T.,.T.)
Vl2IVA     C 000 0 MontaXML("montoIva"		,STRTRAN(TRANSFORM(TRB->VALIMP  ,"@E 9999999999.99"),',','.') 	,,,,,12,.T.,.T.,.T.)
MontoICE   C 000 0 MontaXML("montoIce"		,STRTRAN(TRANSFORM(TRB->VALICE  ,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
Vl2RetIVA  C 000 0 MontaXML("valorRetIva"	,STRTRAN(TRANSFORM(TRB->IVARET  ,"@E 9999999999.99"),',','.') 	,,,,,12,.T.,.T.,.T.)
Vl2RetRent C 000 0 MontaXML("valorRetRenta"	,STRTRAN(TRANSFORM(TRB->VALIRR  ,"@E 9999999999.99"),',','.') 	,,,,,12,.T.,.T.,.T.)
ForPago    C 000 0 MontaXML("formasDePago"	,							,,,,,12 ,.T.,.F.,.T.)
TEmision   C 000 0 MontaXML("formaPago"		,TRB->FORPAGO				,,,,,16,.T.,.T.,.T.)
ForPagoF   C 000 0 MontaXML("formasDePago"	,							,,,,,12 ,.F.,.T.,.T.)
DtVendasF  C 000 0 MontaXML("detalleVentas"	,							,,,,,8 ,.F.,.T.,.T.)

[XXX - livro Fiscal Ventas Establecimiento]
ComprasF   C 000 0 MontaXML("ventas"		,							,,,,,4 ,.F.,.T.,.T.)
Vendas     C 000 0 MontaXML("ventasEstablecimiento"		,				,,,,,4 ,.T.,.F.,.T.)

[TRV Geração do XML]
(PRE) TRV->(dbGoTop())
VenEstab   C 000 0 MontaXML("ventaEst"		,							,,,,,8 ,.T.,.F.,.T.)
CodEstab   C 000 0 MontaXML("codEstab"		,TRV->CODEST				,,,,,12,.T.,.T.,.T.)
VenEstab   C 000 0 MontaXML("ventasEstab"	,STRTRAN(TRANSFORM(0 ,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
IvaComp    C 000 0 MontaXML("ivaComp"		,STRTRAN(TRANSFORM(0 ,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
VenEstabF  C 000 0 MontaXML("ventaEst"		,							,,,,,8 ,.F.,.T.,.T.)

[XXX Identificação do Exportaciones]
VendasF    C 000 0 MontaXML("ventasEstablecimiento"		,				,,,,,4 ,.F.,.T.,.T.)
Exporta    C 000 0 MontaXML("exportaciones"				,				,,,,,4 ,.T.,.F.,.T.)

[XXX Criacao do arquivo notas exportacion]
(PRE) _atotal[32] := LFeXMLaVEx(DTOS(MV_PAR01),DTOS(MV_PAR02)) 

[TEX Geração do XML]
(PRE) TEX->(dbGoTop())
(PREREG) _aTotal[33]	:= IIf(TEX->TIPCLIE == '01', TEX->FCHREGCONT, TEX->COMPFCHEMI)

dtexporta  C 000 0 MontaXML("detalleExportaciones"	,				,,,,,8 ,.T.,.F.,.T.)
tpidcliext C 000 0 MontaXML("tpIdClienteEx"			,TEX->TPIDCLIEXT,,,,,12,.T.,.T.,.T.)
idclienext C 000 0 MontaXML("idClienteEx"			,TEX->IDCLIEXT	,,,,,12,.T.,.T.,.T.)
ptrelac    C 000 0 MontaXML("parteRelExp"			,TEX->PARTREL	,,,,,12,.T.,.T.,.T.)
tipoclient C 000 0 IIf(TEX->TPIDCLIEXT == "21", MontaXML("tipoCli"			,TEX->TIPCLIE	,,,,,12,.T.,.T.,.T.), "")
denomexpor C 000 0 IIf(TEX->TPIDCLIEXT == "21", MontaXML("denoExpCli"		,GXMLCarEsp(TEX->DENEXPCLI)	,,,,,12,.T.,.T.,.T.), "")
tpregfsext C 000 0 MontaXML("tipoRegi"				,TEX->TIPREGI	,,,,,12,.T.,.T.,.T.)
paising    C 000 0 IIf(TEX->TIPREGI == "01", MontaXML("paisEfecPagoGen"		,TEX->PEFEPAGGEN,,,,,12,.T.,.T.,.T.), "")
paisparfis C 000 0 IIf(TEX->TIPREGI == "02", MontaXML("paisEfecPagoParFis"	,TEX->PPAGPARFIS,,,,,12,.T.,.T.,.T.), "")
denoregfis C 000 0 MontaXML("denopagoRegFis"		,TEX->DENREGFIS	,,,,,12,.T.,.T.,.T.)
paisexp    C 000 0 MontaXML("paisEfecExp"			,TEX->PAISEFEEXP,,,,,12,.T.,.T.,.T.)
tipoexp    C 000 0 MontaXML("exportacionDe"			,TEX->TPEXPING	,,,,,12,.T.,.T.,.T.)
tipoingres C 000 0 IIf(TEX->TPEXPING == "03", MontaXML("tipIngExt"			,TEX->TPINGEXT	,,,,,12,.T.,.T.,.T.), "")
ingextgrav C 000 0 IIf(TEX->TPEXPING == "03", MontaXML("ingExtGravOtroPais"	,TEX->INGEXTGAV	,,,,,12,.T.,.T.,.T.), "")
valimpext  C 000 0 IIf(TEX->INGEXTGAV == 'SI', MontaXML("impuestoOtroPais"	,STRTRAN(TRANSFORM(TEX->IMPOTROPA	,"@E 999999999.99"),',','.'),,,,,12,.T.,.T.,.T.), "")
tipcompr   C 000 0 MontaXML("tipoComprobante"		,TEX->TPCOMP	,,,,,12,.T.,.T.,.T.)
distaduan  C 000 0 IIf(TEX->TPEXPING == '01', MontaXML("distAduanero"		,TEX->REFDISADUA,,,,,12,.T.,.T.,.T.), "")
refanio    C 000 0 IIf(TEX->TPEXPING == '01', MontaXML("anio"				,STR(YEAR(_aTotal[33])),,,,,12,.T.,.T.,.T.), "")
refregim   C 000 0 IIf(TEX->TPEXPING == '01', MontaXML("regimen"			,TEX->REFREGIME	,,,,,12,.T.,.T.,.T.), "")
refcorrel  C 000 0 IIf(TEX->TPEXPING == '01', MontaXML("correlativo"		,TEX->REFCORREL1,,,,,12,.T.,.T.,.T.), "")
nodoctrans C 000 0 IIf(TEX->TPEXPING == '01', MontaXML("docTransp"			,TEX->DOCTRANSP	,,,,,12,.T.,.T.,.T.), "")
fchregcont C 000 0 MontaXML("fechaEmbarque"			,DToC(_aTotal[33]),,,,,12,.T.,.T.,.T.)
valfob     C 000 0 MontaXML("valorFOB"				,STRTRAN(TRANSFORM(TEX->VALORFOB	,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
valcompr   C 000 0 MontaXML("valorFOBComprobante"	,STRTRAN(TRANSFORM(TEX->VLFOBCOMP	,"@E 9999999999.99"),',','.')	,,,,,12,.T.,.T.,.T.)
nsercomest C 000 0 MontaXML("establecimiento"		,TEX->NOSERCOMPR,,,,,12,.T.,.T.,.T.)
nsercomemi C 000 0 MontaXML("puntoEmision"			,TEX->PTOEMISION,,,,,12,.T.,.T.,.T.)
nseccompve C 000 0 MontaXML("secuencial"			,TEX->COMPRSECU	,,,,,12,.T.,.T.,.T.)
nautoriza  C 000 0 MontaXML("autorizacion"			,TEX->COMPRAUTOR,,,,,12,.T.,.T.,.T.)
fchemision C 000 0 MontaXML("fechaEmision"			,DToC(TEX->COMPFCHEMI)	,,,,,12,.T.,.T.,.T.)
dtexportaF C 000 0 MontaXML("detalleExportaciones"	,				,,,,,8 ,.F.,.T.,.T.)

[XXX Identificação do Contribuinte]
ExportaF   C 000 0 MontaXML("exportaciones"			,				,,,,,4 ,.F.,.T.,.T.)
Anulados   C 000 0 MontaXML("anulados"				,				,,,,,4 ,.T.,.F.,.T.)

[XXX Criacao do arquivo notas canceladas]
(PRE) _atotal[34] := LFeqXMLcan(DTOS(MV_PAR01),DTOS(MV_PAR02)) 

[TRC Geração do XML]
(PRE) TRC->(dbGoTop())
Dtanulado  C 000 0 MontaXML("detalleAnulados"	,				,,,,,8 ,.T.,.F.,.T.)
tpcompro   C 000 0 MontaXML("tipoComprobante"	,TRC->TIPDOC	,,,,,12,.T.,.T.,.T.)
estabelec  C 000 0 MontaXML("establecimiento"	,TRC->ESTAB		,,,,,12,.T.,.T.,.T.)
ptemissao  C 000 0 MontaXML("puntoEmision"		,TRC->PTEMIS	,,,,,12,.T.,.T.,.T.)
sequenIni  C 000 0 MontaXML("secuencialInicio"  ,TRC->SEQINI	,,,,,12,.T.,.T.,.T.)
sequenfin  C 000 0 MontaXML("secuencialFin"		,TRC->SEQFIM	,,,,,12,.T.,.T.,.T.)
autoriz    C 000 0 MontaXML("autorizacion"		,TRC->AUTORIZ	,,,,,12,.T.,.T.,.T.)
Dtanuladof C 000 0 MontaXML("detalleAnulados"	,				,,,,,8 ,.F.,.T.,.T.)

[XXX Finalização]
AnuladosF  C 000 0 MontaXML("anulados"			,				,,,,,4 ,.F.,.T.,.T.)
IVAF       C 000 0 MontaXML("iva"				,				,,,,,4 ,.F.,.T.,.T.)

[XXX - Nome do Arquivo]
(ARQ) &('_aTotal[7]')

¡IMPORTANTE!

Esta solución aplica para versión 12.1.17, 12.1.25 y superior; siempre y cuando se cuente con las rutinas correspondientes actualizadas como se indica en la sección 01. DATOS GENERALES

05. ASUNTOS RELACIONADOS

Documento de Referencia:

Anexo Transaccional Simplificado (ATS) - Ecuador

Árvore de páginas