Oscar te envio como tengo, probalo, ya que estoy migrando un sistema y no
esta implementado, pero lo probe con un Imp.Fiscal y anda Ok
Tambien podes hacer ajustes de Importe, comparando el total del comprobante
del sistema contra el envio dl comando "subtotal" del comprobante con el
parametro "N" y
luego consultando el campo nº5 de respuesta que trae el total del
comprobante segun el IF. (Avisame si te interesa esta opcion y te envio el
ejemplo)
Ejemplo de como trabajo La tasa de Ajuste variable por permutar la cantidad
por el precio para imprimir con 3 decimales
Codigo que imprime el item al Imp.Fiscal
IF totimpuinter>0
** Tiene Impuesto Interno
** recordar que se cambia la cantidad por importe para que den los
decimales
** recordar de pasar precios unitarios
lnTAV=TasaAjusteVariable(cLetra_comprobante,lnPrecioUni,iva,lnImpuInter)
nError = IF_WRITE("@FACTITEM|"+;
SUBSTR(deta_cor,1,20)+"|"+;
STR(lnPrecioUni,9,3)+"|"+; --------> el IF toma esto como cantidad
STR(cantidad,10,2)+"|"+; --------> el IF toma esto como Precio
STR(iva,5,2)+"|"+;
"M|0|"+ALLTRIM(STR(lnTAV,10,8))+;
"||||0.0|0.0")
ELSE
** No tiene Impuesto Interno, se imprime normalmente
nError = IF_WRITE("@FACTITEM|"+;
SUBSTR(deta_cor,1,20)+"|"+;
STR(cantidad,9,3)+"|"+;
STR(lnPrecioUni,10,2)+"|"+;
STR(iva,5,2)+"|"+;
"M|0|0.0||||0|0")
ENDIF
.................................
La funcion TasaAjusteVariable
LPARAMETERS lcLetra, lnMonto, lnTasaIva, lnImpInterno
* el Monto llega precio final o Neto Segun la letra del Comprobante
* Los precios son unitarios
PRIVATE ALL EXCEPT GO*
IF TYPE("lcLetra")<>"C"
lcLetra="B"
ENDIF
vuelta=0
IF UPPER(ALLTRIM(lcLetra))=="A"
lnNeto=lnMonto && en A biene el Neto
vuelta=ROUND(lnNeto/(lnNeto+lnImpInterno),8) && esta es la tasa de
ajuste variable
ELSE
** si es B o C llega el precio final
lnNeto=ROUND((lnMonto-lnImpInterno)/(1+lnTasaIva/100),4)
lnIva=lnMonto-lnImpInterno-lnNeto
vuelta=ROUND(lnIva/lnMonto,8) && esta es la tasa de ajuste variable
ENDIF
RETURN vuelta
Saludos
Pablo Flores
-----Mensaje original-----
From: Oscar Obregon
Sent: Friday, August 02, 2013 11:30 AM
To: GUFA List Member
Subject: [GUFA] cantidad en tmu220afII
El 02/08/2013 11:14, Flores Sistemas (Pablo Flores) escribió:
Oscar:
Lo que se me ocurre (que se hace asi con los combustibles en las
tm2000/tm2002) es permutar la cantidad con el precio
siempre y cuando la cantidad no tenga mas de 2 decimales
EJ: Cantidad=10 , Precio 3.015
Envias cantidad=3.015 y Precio 10.00
En caso de que el producto tenga impuesto interno fijo (lo pasas a tasa de
ajuste variable, y en vez de pasar la tasa de imp.interno fijo pasas la
variable)
Si queres te paso la formula de la tasa variable
Saludos
Pablo Flores
Espero te Sirva
Saludos
Pablo Flores
-----Mensaje original----- From: Oscar Obregon
Sent: Friday, August 02, 2013 9:04 AM
To: GUFA List Member
Subject: [GUFA] cantidad en tmu220afII
Buen dia!, al enviar a imprimir el ticket en esta epson fiscal no me
permite enviarle como cantidad 3.015, solo me permite dos caracteres
despues del decimal y tengo problemas porque no me coincide el calculo
de precios con el de la balanza, a alguien le paso o sabria como resolver?
muchas gracias
si por favor enviame
