problema ta.xml

[Miguel VC]

Hola a todos, les comento:

la interfaz me funciona de 10. ya estuve facturando desde mi aplicacion. ahora, un problemita que no se como resolverlo. el archivo ta.xml que se genera al pedir autorizacion con el token y sign lo tengo que borrar (el contenido) para seguir facturando, sino me devuelve el cae en blanco. les dejo un fragmento del codigo en vb6.

Function aut_A()
cae_cae = ""
T_F = "tipo A"

    ' Crear objeto interface Web Service Autenticación y Autorización
    Dim WSAA As Object, WSFE As Object
   
    Set WSAA = CreateObject("WSAA")
    ' verifico la versión:
    Debug.Assert WSAA.Version >= "2.04a"
    ' deshabilito errores no manejados (version 2.04 o superior)'
    WSAA.LanzarExcepciones = False
       
' inicializo las variables:
Token = ""
Sign = ""

' busco un ticket de acceso previamente almacenado:
If Dir("ta.xml") <> "" Then
    ' leo el xml almacenado del archivo
    Open "ta.xml" For Input As #1
    Line Input #1, ta_xml
    Close #1
    ' analizo el ticket de acceso previo:
    ok = WSAA.AnalizarXml(ta_xml)
    '
    ' verificar CUIT
    If Not WSAA.Expirado() Then
        ' puedo reusar el ticket de acceso:
        Token = WSAA.ObtenerTagXml("token")
        Sign = WSAA.ObtenerTagXml("sign")
    End If
End If

' Si no reuso un ticket de acceso, solicito uno nuevo:
If Token = "" Or Sign = "" Then



' produccion:
 cert = CurDir() + "\cert.crt"  ' certificado de prueba
   clave = CurDir() + "\key.key" ' clave privada de prueba
   wsaa_url = "https://wsaahomo.afip.gov.ar/ws/services/LoginCms"
     wsdl_url = "https://wswhomo.afip.gov.ar/wsfev1/service.asmx?WSDL"


   

     
     
    ' Generar un Ticket de Requerimiento de Acceso (TRA)
    tra = WSAA.CreateTRA("wsfe", 43200) ' 3600*12hs
    ' Especificar la ubicacion de los archivos certificado y clave privada
    Path = CurDir() + "\"
    ' Especificar la ubicacion de los archivos certificado y clave privada
   
    ' Generar el mensaje firmado (CMS)
    cms = WSAA.SignTRA(tra, cert, clave)
    If cms <> "" Then
   
        cache = ""
        ' Llamar al web service para autenticar:
        ok = WSAA.conectar(cache, wsaa_url)
        ta_xml = WSAA.LoginCMS(cms)
        If ta_xml <> "" Then
            ' guardo el ticket de acceso en el archivo
            Open "ta.xml" For Output As #1
            Print #1, ta_xml
            Close #1
        End If
        Token = WSAA.Token
        Sign = WSAA.Sign
    End If
    ' reviso que no haya errores:
    Debug.Print "excepcion", WSAA.Excepcion
    If WSAA.Excepcion <> "" Then
        Debug.Print WSAA.Traceback
        MsgBox WSAA.Excepcion, vbCritical, "Excepción"
    End If
End If

' Imprimir los datos del ticket de acceso: ToKen y Sign de autorización
' MsgBox "Token: " + Token
' MsgBox "Sign: " + Sign
form1.Text1.Text = Token
form1.Text2.Text = Sign


 
    ':::::::::::::::::::::::::::::: Crear objeto interface Web Service de Factura Electrónica de Mercado Interno
    Set WSFEv1 = CreateObject("WSFEv1")
   
    Debug.Print WSFEv1.Version
    If WSAA.Version < "1.12" Then
        MsgBox "Debe instalar una versión mas actualizada de PyAfipWs WSFEv1!"
        End
    End If
    'Debug.Print WSFEv1.InstallDir
   
    ' Setear tocken y sing de autorización (pasos previos)
    WSFEv1.Token = Token
    WSFEv1.Sign = Sign

[Cristian Conte]

Te recomiendaria reutilizar el ta.

Gracias

--
Proyecto PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT:
http://www.pyafipws.com.ar/ - http://www.github.com/reingart/pyafipws - http://www.sistemasagiles.com.ar/
---
Has recibido este mensaje porque estás suscrito al grupo "PyAfipWs Factura Electrónica Libre y temas relacionados AFIP ARBA ANMAT" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a pyafipws+u...@googlegroups.com.
Para publicar en este grupo, envía un correo electrónico a pyaf...@googlegroups.com.
Visita este grupo en https://groups.google.com/group/pyafipws.
Para acceder a más opciones, visita https://groups.google.com/d/optout.

[Franco Nelson Javier Montti]

hola como estan alguno que haya hecho algo en java yo estoy utilizando el ejemplo que me dan en los manuales instale todo e hice las configuraciones del JACOB el error es el siguiente estoy trabajando en homologacion no puedo generar un cae por favor si alguien me puede dar alguna referencia les agradeceria 

C:\PyAfipWs2.10h Homologación

Excepcion: WindowsError: [Error 2] El sistema no puede encontrar el archivo especificado

Token: Sign: 

Ultimo comprobante: 0

Excepcion: 

XmlRequest: <?xml version="1.0" encoding="UTF-8"?><soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">

<soap:Header/>

<soap:Body>

    <FECAESolicitar xmlns="http://ar.gov.afip.dif.FEV1/">

    <Auth><Token></Token><Sign></Sign><Cuit>20267565393</Cuit></Auth><FeCAEReq><FeCabReq><CantReg>1</CantReg><PtoVta>1</PtoVta><CbteTipo>1</CbteTipo></FeCabReq><FeDetReq><FECAEDetRequest><Concepto>1</Concepto><DocTipo>80</DocTipo><DocNro>33693450239</DocNro><CbteDesde>1</CbteDesde><CbteHasta>1</CbteHasta><CbteFch>20190425</CbteFch><ImpTotal>124.00</ImpTotal><ImpTotConc>2.00</ImpTotConc><ImpNeto>100.00</ImpNeto><ImpOpEx>0.00</ImpOpEx><ImpTrib>1.00</ImpTrib><ImpIVA>21.00</ImpIVA><FchVtoPago></FchVtoPago><MonId>PES</MonId><MonCotiz>1.000</MonCotiz><Tributos><Tributo><Id>4</Id><Desc>Impuestos internos</Desc><BaseImp>100.00</BaseImp><Alic>1.00</Alic><Importe>1.00</Importe></Tributo></Tributos><Iva><AlicIva><Id>5</Id><BaseImp>100.00</BaseImp><Importe>21.00</Importe></AlicIva></Iva></FECAEDetRequest></FeDetReq></FeCAEReq></FECAESolicitar>

</soap:Body>

</soap:Envelope>

XmlResponse: <?xml version="1.0" encoding="utf-8"?><soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Header><FEHeaderInfo xmlns="http://ar.gov.afip.dif.FEV1/"><ambiente>Homologacion - efa</ambiente><fecha>2019-04-25T15:12:15.2377061-03:00</fecha><id>2.12.24.0</id></FEHeaderInfo></soap:Header><soap:Body><FECAESolicitarResponse xmlns="http://ar.gov.afip.dif.FEV1/"><FECAESolicitarResult><Errors><Err><Code>600</Code><Msg>ValidacionDeToken: Parametro nulo o vacio (token)</Msg></Err></Errors></FECAESolicitarResult></FECAESolicitarResponse></soap:Body></soap:Envelope>

Excepcion: 

ErrMsg: 600: ValidacionDeToken: Parametro nulo o vacio (token)

Obs: 

CAE: 

Resultado: 

--

[Romina L. Castrogiovani]

Hola Franco,

Ese error suele ser por problemas con el certificado, que esté vencido, que no sea para el ambiente en el que estás operando, que no esté en la ubicación donde lo estás llamando ...

Fijate también de instalar OpenSSL

Podes hacer una prueba con el ejemplo interactivo de autenticación y ver si autoriza con ese certificado que estás utilizando.

https://www.sistemasagiles.com.ar/soft/pyafipws/ej-wsaa.exe

Debés completar la ruta del certificado y clave y seleccionar URL para el ambiente para el cual fue generado dicho certificado.

Saludos

Castrogiovani L. Romina

Sistemas Ágiles

www.sistemasagiles.com.ar

011 4450-0716 / 153048-9211

L a V de 10 a 17hs

Skype: romina.castrogiovani