Solución al Suministro Inmediato de Información
GtxSii

Novedad Soporte a la version 1.1

Descarga una DEMO

GTXSII SUMINISTRO INMEDIATO DE INFORMACION

Desde el 1 Julio de 2017 es obligatorio para una serie de empresas

un cambio en la gestión del sistema actual del IVA

Las empresas de software tienen que adaptar sus sistemas para poder soportarlo +info Agencia Tributaria
 

GTXSII ofrece una solución simple y potente, para ayudar a las empresas desarrolladoras de software a adaptar sus programas, con la finalidad de procesar su información y comunicarse con la Agencia Tributaria.

GTXSII es un conjunto de clases que abstrae de la complejidad que comporta procesar mensajes XML, implementando toda la especificación del procedimiento SII y su comunicación cifrada a través de certificados contra la AEAT.

GTXSII está preparada para trabajar con las haciendas forales de Araba, Bizkaia, Gipuzkoa y Nafarrora.

 

Libreria Harbour

Soporta componentes OLECOM y CURL para el compilador Harbour

Libreria xHarbour

Soporta componentes OLECOM para el compilador xHarbour.org y xHarbour.com

Componente DLL

Soporta componentes OLECOM para cualquier lenguaje de programación que acepte llamadas a DLL (Delphi, Visual Basic, Visual FoxPro, Alaska xbase++, scripting, etc.)

EJEMPLOS

Ejemplos en código fuente de algunos de los lenguajes soportados, para ilustrar la facilidad de implementación de GtxSii

(x)Harbour

#include "gtxsii.ch"

function TestFraReciDel()

  local oServicio, oFactura
  
  // Definición del servicio
  oServicio:= GtxSii():New("BajaLRFacturasRecibidas")
  oServicio:SetURLServiceSII( WS_FRAS_RECIBIDAS_SII ) 

  with object ( oServicio:oRequest )
    // Cabecera
    :Cabecera:Titular:NombreRazon    := "MI EMPRESA SL"
    :Cabecera:Titular:NIF            := "B12345679"
  
    // Detalle de factura
    oFactura := oServicio:oRequest:GetFactura()
    with object ( oFactura )
      :Ejercicio                      := "2017"
      :Periodo                        := "04"
      
     with object ( :IDFactura )
        :NombreRazon                  := "TU EMPRESA SL"
        :NIF                          := "B87654321"
        :NumSerieFacturaEmisor        := "FRA-00054"
        :FechaExpedicionFacturaEmisor := date()
      end with
    end with
    oServicio:oRequest:Add( oFactura ) 

  end with

  // Firma y envío
  if oServicio:Send()
     viewResponse( oServicio:oResponse )
  else
     ? oServicio:nHostError, oServicio:cHostErrorMsg
  endif

return NIL

Delphi

TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
  var
     oGtxSii    : OleVariant;
     oServicio  : OleVariant;
     oRequest   : OleVariant;
     oCabecera  : OleVariant;
  begin
     CoInitialize(nil);
     try
        oGtxSii   := CreateOleObject('gtxsii');
        oServicio := oGtxSII.New('SuministroLRFacturasEmitidas');
        oRequest  := oServicio.oRequest;
        oCabecera := oRequest.Cabecera;
        oCabecera.Titular.NombreRazon      := 'MI EMPRESA SL';
        oCabecera.Titular.NIFRepresentante := 'MI REPRESENTANTE';
        oCabecera.Titular.NIF              := 'B123456789';
        oCabecera.TipoComunicacion         := 'A0';

        ShowMessage( oCabecera.Titular.NombreRazon  );

      except
        ShowMessage( 'Error' );
      end;
     CoUnInitialize;
  end;
end.

Visual Basic

Public oGtxSII, oServicio, oRequest

Sub Window_OnLoad

   window.resizeTo 1000,700
    
   Set oGtxSII   = CreateObject( "GtxSII" ) 
   Set oServicio = oGtxSII.New("SuministroLRFacturasEmitidas")
   Set oRequest  = oServicio.oRequest 
  
   oRequest.Cabecera.Titular.NombreRazon = "MI EMPRESA SL"
   oRequest.Cabecera.Titular.NIF         = "A12345679"
   oRequest.Cabecera.TipoComunicacion    = "A0"  
  
   nif.innerText    = "NIF:" + oRequest.Cabecera.Titular.NIF
   razon.innerText  = "Razon Social:" + oRequest.Cabecera.Titular.NombreRazon
   
End Sub

Sub OnClickButtonsend()
   If oServicio.Send()Then 
      MsgBox "Factura enviada"
   Else
      MsgBox "Incidencia detectada"
   End if   
End Sub

Visual Basic Script

Main()
Sub Main()
  test( ) 
End Sub  

Public Function test()  
WScript.Echo "Inicializando..."
 
Set oGtxSii = WScript.CreateObject( "GtxSII" ) 
Set oServicio = oGtxSii.New("SuministroLRFacturasEmitidas")
WScript.Echo oGtxSii.cUrlService

Set oRequest = oServicio.oRequest 
  
oRequest.Cabecera.Titular.NombreRazon      = "MI EMPRESA SL"
oRequest.Cabecera.Titular.NIFRepresentante = ""
oRequest.Cabecera.Titular.NIF              = "B12345679"
oRequest.Cabecera.TipoComunicacion         = "A0"  
  
WScript.Echo oRequest.Cabecera.Titular.NombreRazon 
WScript.Echo oRequest.Cabecera.Titular.NIFRepresentante 
WScript.Echo oRequest.Cabecera.Titular.NIF              
WScript.Echo oRequest.Cabecera.TipoComunicacion           

oServicio.Send()

End Function

Empresas

Algunas de las empresas que han confiado en nuestra solución al Suministro Inmediato de Información.

S.I.G.E.V., S.L.

Servicios de Informática y Gestión Empresarial Vinaròs, S.L

Aplitec Informàtica, S.L.


Consultoria i assessoria informàtica

Grupo Atisa

Líderes en asesoramiento y externalización de procesos

Biel Maimó

Desarrollo a medida de aplicaciones de gestión

Ibertabaco

 

Ibertabaco Sociedad Cooperativa

PIEMA


Piensos Equilibrados Mallorca, S.A.U.

Desarrollo

Implementaciones realizadas

  • Julio 2017

    Versión 0.7

    Facturas Emitidas, Facturas Recibidas

    Verificador de NIF y VIES

    Soporte para Operaciones Intracomunitarias

    Soporte para Operaciones de Seguros

    Soporte para Bienes de Inversión

  • Enero 2018

    Versión 1.0

    Soporte para régimen especial criterio de caja.

    Soporte para Haciendas Forales

  • Mayo 2018

    Beta 1.1

    Adaptación a cambios v.1.1 AEAT

    Soporte para Inmuebles Adicionales

Nuestra tripulación

Ponemos mucho esfuerzo y cariño en conseguir nuestras aspiraciones.

Rafa Carmona (TheFull)

Co-desarrollador

Lourdes Febrer

Social media

Joaquim Ferrer

Co-desarrollador

Contáctanos también en nuestro foro de soporte técnico, para usuarios registrados

Foro SII

Rellena los datos si estás interesado en recibir una DEMO

Indícanos en el mensaje cuál es lenguaje de programación que utilizas