Recibo de Pago en Duplicado
Miér Feb 08, 2012 1:26 pm
Buen día, parecerá una tontería, pero no he podido configurar el reporte de Recibo de Pago Detallado del Premium Nomina 7.x (2011.9. para imprimir, en duplicado, los recibos de pago.
El cliente requiere que, en una pagina, se impriman a media carta dos recibos de pago para cada trabajador, esto con la finalidad de cortar la pagina a la mitad y tener así 2 copias de cada Recibo de Pago.
Si alguien puede orientarme en este sentido, le agradecería.
Saludos.
El cliente requiere que, en una pagina, se impriman a media carta dos recibos de pago para cada trabajador, esto con la finalidad de cortar la pagina a la mitad y tener así 2 copias de cada Recibo de Pago.
Si alguien puede orientarme en este sentido, le agradecería.
Saludos.
- syhcomputacion
- Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008
Re: Recibo de Pago en Duplicado
Jue Feb 09, 2012 7:17 am
buenos dias,
amigo te voy a dar una referencia para que te guies, en los formatos de facturacion, hay un reportes que hace lo que buscas, el reporte se llama factur2b, editalo y fijate como se hace alli para que lo dupliques en los recibos de nomina.
cualquier cosa me escribes.
Saludos
amigo te voy a dar una referencia para que te guies, en los formatos de facturacion, hay un reportes que hace lo que buscas, el reporte se llama factur2b, editalo y fijate como se hace alli para que lo dupliques en los recibos de nomina.
cualquier cosa me escribes.
Saludos
Re: Recibo de Pago en Duplicado
Jue Feb 09, 2012 7:53 am
Gracias por responder syhcomputacion, justo anoche estuve revisando el reporte que mencionas y he notado que el Data Enviroment de "factur2b" esta modificado; se crea un "myalias2" que sirve (creo yo) para independizar la banda "Detail2" de la banda "Detail1".
Hice la prueba con el reporte de Recibos de Pago, pero el Detail2 lo toma como un subdetalle de Detail1 y no es lo que se necesita.
El problema es que, en el caso de la nómina, no he visto la opción de "Editar DataEnviroment" tal como puede hacerse en el administrativo.
Otro factor a tomar en cuienta es que en el caso del Recibo de Pago la data esta agrupada por "cod_trab", en el formato de factura doble no hay ninguna agrupación de datos; no se si esto marque alguna diferencia en como se debe organizar lo de las bandas.
Seguiré haciendo pruebas y postearé por esta vía los resultados.
Saludos y nuevamente gracias.
Hice la prueba con el reporte de Recibos de Pago, pero el Detail2 lo toma como un subdetalle de Detail1 y no es lo que se necesita.
El problema es que, en el caso de la nómina, no he visto la opción de "Editar DataEnviroment" tal como puede hacerse en el administrativo.
Otro factor a tomar en cuienta es que en el caso del Recibo de Pago la data esta agrupada por "cod_trab", en el formato de factura doble no hay ninguna agrupación de datos; no se si esto marque alguna diferencia en como se debe organizar lo de las bandas.
Seguiré haciendo pruebas y postearé por esta vía los resultados.
Saludos y nuevamente gracias.
Re: Recibo de Pago en Duplicado
Jue Feb 09, 2012 10:50 am
Para los mas duchos en programación con Visual Fox Pro...
En el archivo factur2b.frt, editandolo con Notepad++ puede distinguirse el DataEnvironment, que es el siguiente:
El archivo recibodepagodet.frt de la nomina, al parecer, tiene como DataEnvironment lo siguiente:
Me da la impresión de que va a pasar por una solución de programación el poder hacer el reporte como el cliente lo ha solicitado.
Si hay alguna sugerencia al respecto, se agradece.
Saludos.
En el archivo factur2b.frt, editandolo con Notepad++ puede distinguirse el DataEnvironment, que es el siguiente:
- Código:
* DESTROYBLOCK
*-
*!* _DestroyBlockDocVen()
ENDPROC
PROCEDURE Init
*INITBLOCK
*-------------------
* Parametros de seteo de entorno
initset()
cAlias=ALIAS()
IF !EMPTY(cAlias)
SELECT * FROM (cAlias) WHERE .t. INTO CURSOR myalias2
SELECT (cAlias)
GO top
ENDIF
ENDPROC
El archivo recibodepagodet.frt de la nomina, al parecer, tiene como DataEnvironment lo siguiente:
- Código:
borra_cursor("consasig")
*!* Estas son las líneas que tienes que incluir./
*!* CargarDatosEnCursor(OdbcMasterConector, "*", "constant", "cod_const = 'DIAS'", "", "curConstant")
*!* SELECT curConstant
*!* lnConstanteDias = curConstant.valor
*!* Estas son las líneas que tienes que incluir.
lcWhere = "id_nomina = '" + xId_Nomina + "' AND cod_const = 'SUEL'"
CargarDatosEnCursor(OdbcMasterConector, "*", "consasig", lcWhere , "", "consasig")
SELECT consasig
GO TOP
SCAN
lcCodigoTrabajador = cod_trab
lnSalario = valor
SELECT acumulados
LOCATE FOR cod_trab = lcCodigoTrabajador
IF FOUND()
REPLACE salario WITH lnSalario
ENDIF
SELECT consasig
ENDSCAN
lcWhere = "id_nomina = '" + xId_Nomina + "'"
CargarDatosEnCursor(OdbcMasterConector, "*", "unidades", lcWhere, "", "unidades")
SELECT unidades
INDEX ON codigo TAG codigo
GO TOP
SELECT acumulados
GO TOP
SCAN
lcCodigoUnidad = cod_unidad
lcNombreUnidad = ''
SELECT unidades
IF SEEK(lcCodigoUnidad)
lcNombreUnidad = ALLTRIM(nombre)
ENDIF
SELECT acumulados
REPLACE nom_unidad WITH lcNombreUnidad
ENDSCAN
*!* *
*!* ESTO SE ADICIONÓ PARA LA BUSQUEDA DE PRESTAMOS POR TRABAJADOR
*!* VMBA - GRVO 08/10/2011
*!* *
*!* SELECT *, "N" as ConPrest FROM acumulados INTO CURSOR acumulados READWRITE
*!* SELECT Cod_trab FROM acumulados INTO CURSOR ListTrab WHERE !EMPTY(nncuotas) GROUP BY Cod_trab
*!* SELECT ListTrab
*!* GO TOP
*!* BROWSE
*!* DO WHILE !EOF()
*!* SELECT acumulados
*!* GO TOP
*!* REPLACE ALL acumulados.ConPrest WITH "S" FOR ListTrab.Cod_Trab=acumulados.Cod_trab
*!* SELECT ListTrab
*!* SKIP
*!* ENDDO
*!* *
*!* SELECT acumulados
*!* GO TOP
*!* BROWSE
*!* Estas son las líneas que tienes que incluir.
*!* SCAN FOR cod_concep = '1000' <---- Aquí colocas el codigo del concepto que deseas alterar.
*!* REPLACE nnum_cant WITH nnum_cant * lnConstanteDias
*!* ENDSCAN
*!* SELECT acumulados
*!* GO TOP
*!* Estas son las líneas que tienes que incluir.
ENDPROC
Me da la impresión de que va a pasar por una solución de programación el poder hacer el reporte como el cliente lo ha solicitado.
Si hay alguna sugerencia al respecto, se agradece.
Saludos.
- syhcomputacion
- Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008
Re: Recibo de Pago en Duplicado
Jue Feb 09, 2012 11:39 am
amigo, yo tengo instalado el visual foxpro y por allli entre al DataEnvironment, y le realice el ajuste segun el ejemplo del formato de factura, realice las copias de los campos, etc etc etc, y pude lograr ver el recibo doble, anexo imagen del ejemplo:
si quieres escribeme para mandarte los archivos de los reportes
saludos
si quieres escribeme para mandarte los archivos de los reportes
saludos
Permisos de este foro:
No puedes responder a temas en este foro.