FORO SOPORTE TÉCNICO PSKLOUD
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.
BIENVENIDO Explícanos detalladamente tu caso. Con mucho gusto te ayudaremos a resolverlo.
Sabias que un ALIADO DE NEGOCIOS puede tener su propia red de distribuidores PSKloud y ganar mucho dinero?. Solicita información en nuestra pagina www.premium-soft.com
¿Necesitas alcanzar a mas clientes? ¿Aumentar tus ventas? Crea tu tienda virtual con eShop de PSKloud y comienza a expandir tu empresa. PSKShop
Consulta las operaciones de tu empresa con nuestra aplicación móvil Manager y comienza a controlar tu empresa desde cualquier lugar. PSKManager
Los posteadores más activos del mes
No hay usuarios

Ir abajo
b1nar10
b1nar10
Cantidad de envíos : 69
Edad : 44
Localización : Barinas
Fecha de inscripción : 11/04/2009
http://www.binario.net.ve

Recibo de Pago en Duplicado Empty 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.Cool 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.
syhcomputacion
syhcomputacion
Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008

Recibo de Pago en Duplicado Empty 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
b1nar10
b1nar10
Cantidad de envíos : 69
Edad : 44
Localización : Barinas
Fecha de inscripción : 11/04/2009
http://www.binario.net.ve

Recibo de Pago en Duplicado Empty 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.
b1nar10
b1nar10
Cantidad de envíos : 69
Edad : 44
Localización : Barinas
Fecha de inscripción : 11/04/2009
http://www.binario.net.ve

Recibo de Pago en Duplicado Empty 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:

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
syhcomputacion
Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008

Recibo de Pago en Duplicado Empty 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:

Recibo de Pago en Duplicado Reciboy



si quieres escribeme para mandarte los archivos de los reportes

saludos
Contenido patrocinado

Recibo de Pago en Duplicado Empty Re: Recibo de Pago en Duplicado

Volver arriba
Permisos de este foro:
No puedes responder a temas en este foro.