Entrar
¿Nuevo usuario? Inscribirme
ifclipper · Impresoras Fiscales & Clipper
? ¿Ya estás suscrito? Entra a Yahoo!

Consejos

¿Sabías que...?
Podés cambiar el orden de los mensajes. Simplemente hacé clic en el enlace de columna fecha. Tus preferencias se guardarán, por lo tanto no necesitarás hacerlo otra vez cuando vuelvas a entrar.

Mensajes

  Mensajes Ayuda
Avanzado
Fw: [ifclipper] RETENCIONES EN HASAR 320   Lista de mensajes  
Responder | Reenviar Mensaje #8305 de 8399 |
Hola Silvina, te cuento como lo hago yo:

FUNCTION IFPercep( aDoc, cDescri, nMonto )
LOCAL lRsp := TRUE
LOCAL aData := {}

IF GetMarca() == "HASAR"

AAdd( aData, "**.**" )
AAdd( aData, PadR( cDescri, 20 ) )
AAdd( aData, NtoStr( nMonto, 10, 02 ) )

IF ! PF_SendCMD( 96, aData )
aDoc[ PFDI_LASTERROR ] := { "096", cDescri, aData }
lRsp := FALSE
ENDIF

ELSE
Alert( "Percepciones no soportadas!" )
ENDIF

IF !lRsp .AND. PF_BreakOnError()
BREAK
ENDIF

RETURN lRsp

Luego, antes de cerrar el comprobante:

IFPercep( aDoc, "PERC.IIBB. " + Str( nAlicuota, 5, 2 ) + "%", nMontoPerc )

Cualquier duda preguntá.

--------------------------------------------------------------
Fernando Piazza
Coronel Suárez
República Argentina
e-mail: soporte@...
Matrícula Nº 801 CPCIBA Ley 13016


----- Original Message -----
From: Silvina Mazzaro
To: ifclipper@...
Sent: Thursday, September 03, 2009 12:00 PM
Subject: [ifclipper] RETENCIONES EN HASAR 320


Hola todos: tengo un programa en clipper DOS con las rutinas de Torrillo con
una fiscal Hasar 320 . Necesito imprimir ademas de neto e IVA una eventual
retención/percepcion. No encuentro la rutina donde imprime la deducción para
agregarsela. alguien tiene alguna idea?
mil gracias
silvina

[Se han eliminado los trozos de este mensaje que no contenían texto]





[Se han eliminado los trozos de este mensaje que no contenían texto]




Jue, 3 de Sep, 2009 4:47 pm

psi_sistemas
Sin conexión Sin conexión
Enviar correo Enviar correo

Reenviar Mensaje #8305 de 8399 |
Desplegar mensajes Autor Ordenar por fecha

Hola Silvina, te cuento como lo hago yo: FUNCTION IFPercep( aDoc, cDescri, nMonto ) LOCAL lRsp := TRUE LOCAL aData := {} IF GetMarca() == "HASAR" AAdd( aData,...
Piazza Sistemas
psi_sistemas
Sin conexión Enviar correo
3 de Sep, 2009
4:48 pm
Avanzado

Copyright © 2009 Yahoo! de Argentina S.R.L. Todos los derechos reservados.
Política de privacidad - Condiciones del Servicio - Reglas de la comunidad de Yahoo! - Ayuda