Ayuda en Remito Hasar 330F
Publicado por Nicolas (3 intervenciones) el 27/07/2012 15:56:57
Hola, tengo un incomeniente al imprimir Remitos o Cotizaciones en los controladores fiscales Hasar, logro que se abra y se cierre correctamente los DNFH, pero no puedo hacer que me imprima los item de cada docuento.
Cotizaciones:
* Genera comando: OpenDNFH
* ------------------------
s = CHR(128) + .Se + "u" + .Se + "T" + .Se + "1"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: Item en Cotizacion
* ------------------------------
s = "ä" + .Se + "Articulo 1" + .Se + "0"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: CloseDNFH
* -------------------------
s = CHR(129)
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
Remitos:
* Genera comando: OpenDNFH
* ------------------------
s = CHR(128) + .Se + "r" + .Se + "T" + .Se + "1"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: Item en Remitos
* ------------------------------
s = "é" + .Se + "Mandioca por KG" + .Se + "11" + .Se + "0"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: CloseDNFH
* -------------------------
s = CHR(129)
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
Se = CHR( 28 )
Espero una pronta respuesta a mi duda, y desde ya muchas gracias.
Saludos, Nicolas.
Cotizaciones:
* Genera comando: OpenDNFH
* ------------------------
s = CHR(128) + .Se + "u" + .Se + "T" + .Se + "1"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: Item en Cotizacion
* ------------------------------
s = "ä" + .Se + "Articulo 1" + .Se + "0"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: CloseDNFH
* -------------------------
s = CHR(129)
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
Remitos:
* Genera comando: OpenDNFH
* ------------------------
s = CHR(128) + .Se + "r" + .Se + "T" + .Se + "1"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: Item en Remitos
* ------------------------------
s = "é" + .Se + "Mandioca por KG" + .Se + "11" + .Se + "0"
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
* Genera comando: CloseDNFH
* -------------------------
s = CHR(129)
if .Enviar (s) < 0
? "Error enviando el comando: " + s
endif
Se = CHR( 28 )
Espero una pronta respuesta a mi duda, y desde ya muchas gracias.
Saludos, Nicolas.
Valora esta pregunta
0