jose alberto storti <jass...@gmail.com>: Jan 26 05:45AM -0800
Alguien tiene información sobre la situación del servidor de homologación
para el servicio wsfev1????
Desde el día jueves pasado que devuelve error 501.
Muchas gracias
AUS José Alberto Storti
carlos Morandin <carlos....@gmail.com>: Jan 26 12:11PM -0300
Hola ! yo hoy estuve haciendo pruebas y funciona normalmente
El lun, 26 ene 2026 a las 10:45, jose alberto storti (<jass...@gmail.com>)
escribió:
Walter Astiz <wast...@gmail.com>: Jan 26 09:29AM -0300
Buen dia Foro. Estamos implementando Certificado Digital ARBA R122 y nos
encontramos con un error que no podemos superar.
Tomamos el codigo de la Planilla ARBAA122.xls.
Generamos el .LIC desde el ambiente MisDatos incorporando el servicio ARBA
retenciones R122 como servicio A Prueba. Desde el ambiente MisDatos hicimos
el proceso de Lectura del .LIC y los datos estan correctos.
Trabajamos con el Instalador 100.90.
Probamos el codigo y al ejecutar la sentencia gFE.iniciar("30536984344",
"") pasamos sin problema y nos devuele los siguientes datos:
Instalador: 100.90.0.0
Cuit: 30536984344
Vencimiento: 25/02/2026
Lo que nos indica que el .LIC esta bien generado.
Luego seguimos al proximo paso que seria OBTENER TICKET, cargamos todos los
datos tal cual dice la planilla excel y al ejecutar la sentencia
gFE.apiEjecutar("ARBA2025.OBTENERTICKET") no encontramos con el error
LICENCIA NO VALIDA USERNAME. 305369894344, que suponemos es un error
interno que nos impide avanzar.
Copio el codigo VB6 que estamos usando, por si alguien nos puede sugerir
alguna idea o ve en que nos equivocamos.
Private Sub WebSolicitarCertificado_Click()
Status = " Por favor espere ... Intentando conectarse "
'Set gFe = CreateObject("WSAFIPFE.misdatos")
Set gFe = New WSAFIPFE.misdatos
gFe_CuitAgente = "30536984344"
WEB_LicenciaSoft = "c:\afipws\pd\arba.lic"
If gFe.iniciar(gFe_CuitAgente, "") Then
gFe.archivolicencia = WEB_LicenciaSoft
WEB_MotivoDesc = gFe.Revision
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.getLicenciaInfo(45, 0)
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.LicenciaDatos
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.LicenciaHasta
'Obtener Ticket Acceso
WEB_Enviado = "c:\afipws\pd"
WEB_Recibido = "c:\afipws\pd"
WEB_LicenciaSoft = "c:\afipws\pd\arba.lic"
gFe.ArchivoXMLEnviado = WEB_Enviado
gFe.ArchivoXMLRecibido = WEB_Recibido
gFe.archivolicencia = WEB_LicenciaSoft
bresultado = gFe.apiCargarPropiedad("LIMPIAR", "", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.URLMETODO", "
https://idp.test.arba.gov.ar/realms/ARBA/protocol/openid-connect/token", 0,
0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.TIPOMETODO", "POST", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.client_id", "A122RServicios", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.client_secret",
"44cqahkhERKtkkDGmcqrPApCMtez3XxT", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.userName", "30536984344", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.password", "", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.grant_type", "password", 0, 0)
bresultado = bresultado And
gFe.apiCargarPropiedad("ARBA2025.DATOS.Scope", "openid", 0, 0)
If bresultado Then
bresultado = gFe.apiEjecutar("ARBA2025.OBTENERTICKET")
WEB_MotivoDesc = bresultado
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.UltimoMensajeError
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.ArchivoXMLError
If bresultado Then
WEB_Respuesta = gFe.apiLeerPropiedad("ARBA2025",
"obtenerticket", "", 0, 0)
WEB_MotivoDesc = "Token Exitoso"
If gFe.UltimoMensajeError = "" Then
Else
WEB_MotivoDesc = gFe.UltimoMensajeError
bresultado = False
End If
Else
WEB_MotivoDesc = "Error al cargar propiedad"
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf &
gFe.UltimoMensajeError
End If
Else
WEB_MotivoDesc = "Error al cargar propiedad"
WEB_MotivoDesc = WEB_MotivoDesc & vbCrLf & gFe.UltimoMensajeError
End If
Else
MsgBox ("fallo iniciar " + gFe.UltimoMensajeError)
End If
Status = String(44, " ")
End Sub
Gracias.
Saluodos.
<http://www.avg.com/email-signature?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
Libre
de virus.www.avg.com
<http://www.avg.com/email-signature?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail>
<#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
El dom, 25 ene 2026 a las 17:59, <
factura-electronica-y-otros-...@googlegroups.com>
escribió:
Has recibido este resumen porque estás suscrito a las actualizaciones de este grupo. Puedes modificar la configuración en la página de pertenencia al grupo.
Para cancelar la suscripción a este grupo y dejar de recibir correos electrónicos, envía un correo electrónico a factura-electronica-y-otros-servic...@googlegroups.com.