-----Mensaje original-----
De: [email protected] [mailto:[email protected]] En nombre de Flores Sistemas
(Pablo Flores)
Enviado el: viernes, 02 de agosto de 2013 15:48
Para: GUFA List Member
Asunto: [GUFA] cantidad en tmu220afII
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
