codigo qr de afip

[marcelo.s...@gmail.com]

hola, tengo implementado el código qr pero no me dirije correctamente a la consulta del comprobante en afip , he visto que otros colegas si llegan a la consulta, esto es lo que tengo en el código

    QR_cMoneda='PES'
    QR_cTipocodaut='E'  &&autorización por cae
    QR_nCodaut=cae

    TEXT TO lcString NOSHOW
       {"ver":1,"fecha":<<QR_cFecha>>,"cuit":<<QR_nCuit>>,"ptoVta":<<QR_nPtovta>>,"tipoCmp":<<QR_nTipocpte>>,
        "nroCmp":<<QR_nNrocpte>>,"importe":<<QR_nImporte>>,"moneda":<<QR_cMoneda>>,"ctz":<<QR_nCotizacion>>,
        "tipoDocRec":<<QR_nTipodocrec>>,"nroDocRec":<<QR_nNrodocrec>>,"tipoCodAut":<<QR_cTipocodaut>>,"codAut":<<QR_nCodaut>>}
    ENDTEXT

    lcString64 = STRCONV(lcString, 13)

    lcQR = [https://www.afip.gob.ar/fe/qr/?p=] + lcString64

algun error que este cometiendo y no me doy cuenta?

muchas gracias

[Dsan]

Si usas,  esto   <<QR_cFecha>>,  he notado que si o si, debes usar TEXT TO lcString NOSHOW  TEXTMERGE    

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" 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 publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/78035b8c-13cc-4f25-b2ec-852f6a6fada3n%40googlegroups.com.

[Sergio Rojas]

Yo lo hago así:

LOCAL _https_qr, _fecha_qr, _cod_qr
_https_qr = ALLTRIM(RESTPARAM('HTTPS_QR','https://www.afip.gob.ar/fe/qr/?p='))
_fecha_qr = DTOS(fe.f_com)
_cod_qr = '{"ver":1,'
_cod_qr = _cod_qr + '"fecha":"' + SUBSTR(_fecha_qr,1,4) + '-' + SUBSTR(_fecha_qr,5,2) + '-' + SUBSTR(_fecha_qr,7,2) + '",'
_cod_qr = _cod_qr + '"cuit":' + ALLTRIM(p_cuit) + ','
_cod_qr = _cod_qr + '"ptoVta":' + ALLTRIM(STR(VAL(fe.p_com))) + ','
_cod_qr = _cod_qr + '"tipoCmp":' + ALLTRIM(STR(VAL(fe.t_com))) + ','
_cod_qr = _cod_qr + '"nroCmp":' + ALLTRIM(STR(VAL(fe.n_com))) + ','
_cod_qr = _cod_qr + '"importe":' + ALLTRIM(IIF(fe.i_tot - ROUND(fe.i_tot,0) = 0, STR(fe.i_tot,15,0),STR(fe.i_tot,15,2))) + ','
_cod_qr = _cod_qr + '"moneda":"PES","ctz":1,"tipoDocRec":' + fe.t_doc + ','
_cod_qr = _cod_qr + '"nroDocRec":' + ALLTRIM(STR(VAL(fe.n_doc),11,0)) + ','
_cod_qr = _cod_qr + '"tipoCodAut":"E","codAut":' + fe.n_cae + '}'
_cod_qr = _https_qr + STRCONV(_cod_qr,13)
RETURN _cod_qr

No se si implementaste STRCONV

[Hector Kuhn]

Buen dia, si llegas a la pagina de al AFIP , pero no te muestra los datos, puede ser porque los datos numericos como ptoVta / tipoCmp / NroCmp, no deben tener ceros a la izquierda

Saludos

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/93471150-9429-f4f2-2e0d-d3443810c7dc%40gmail.com.

[marcelo.s...@gmail.com]

muchas gracias por responder, estoy mandando mal los números del comprobante