- Evelio Teuffelest
- Cantidad de envíos : 77
Edad : 59
Localización : Maracay, Edo. Aragua
Fecha de inscripción : 01/02/2008
CALCULO DE ACUMULADO PARA UTILIDADES
Vie Mayo 15, 2009 10:06 pm
Saludos,
Quisiera alguien me indicara como mostrar el acumulado el los recibos de pagos para el calculo de utilidades, y una vez culminado el periodo como se calcula en base a este acumulado.
Quisiera alguien me indicara como mostrar el acumulado el los recibos de pagos para el calculo de utilidades, y una vez culminado el periodo como se calcula en base a este acumulado.
- syhcomputacion
- Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008
Re: CALCULO DE ACUMULADO PARA UTILIDADES
Sáb Mayo 16, 2009 11:57 pm
Buen dia,
Hay muchas formas de obtener esta informacion, por ejemplo, sabemos que hoy dia los recibos de pago se muestra el salario, y esto se hizo simplemente con un pequeño codigo:
SET CENTURY ON
SET DATE DMY
SELECT acumulados
laMiArray = AFIELDS(laArray)
IF LOWER(laArray(laMiArray, 1)) = "sueldo"
ALTER TABLE acumulados DROP COLUMN sueldo
ENDIF
borra_cursor("consasig")
CargarDatosEnCursor(OdbcMasterConector, "*", "consasig", "cod_const = 'SUEL'", "", "consasig")
SELECT consasig
SELECT acumulados
ALTER table acumulados ADD COLUMN sueldo N(19, 2)
SELECT consasig
GO TOP
SCAN
lcCodigoTrabajador = cod_trab
lnSueldo = valor
SELECT acumulados
LOCATE FOR cod_trab = lcCodigoTrabajador
IF FOUND()
REPLACE sueldo WITH lnSueldo
ENDIF
SELECT consasig
ENDSCAN
SELECT acumulados
GO TOP
Puedes hacer un codigo similar para obtener la informacion que estas buscando, por ejemplo, hasta donde yo se no hay un archivo donde se guarde esta informacion acumulada, pero puedes leer la tabla NOMINAS2, combinada con la tabla de CONCEPTOS, para determinar cual concepto aplica para utilidades, y simplemente hacer un SUM de la tabla NOMINAS2, con el codigo y el rango de fecha, que puedes usar tambien una funciona que esta en el sistema como lo es UTILFRAC(fecha_fin) y combinar este resultado con el acumulado hasta la fecha.
Como te digo, hay muchas vias, simplemente un poco de imaginacion.
Saludos
Hay muchas formas de obtener esta informacion, por ejemplo, sabemos que hoy dia los recibos de pago se muestra el salario, y esto se hizo simplemente con un pequeño codigo:
SET CENTURY ON
SET DATE DMY
SELECT acumulados
laMiArray = AFIELDS(laArray)
IF LOWER(laArray(laMiArray, 1)) = "sueldo"
ALTER TABLE acumulados DROP COLUMN sueldo
ENDIF
borra_cursor("consasig")
CargarDatosEnCursor(OdbcMasterConector, "*", "consasig", "cod_const = 'SUEL'", "", "consasig")
SELECT consasig
SELECT acumulados
ALTER table acumulados ADD COLUMN sueldo N(19, 2)
SELECT consasig
GO TOP
SCAN
lcCodigoTrabajador = cod_trab
lnSueldo = valor
SELECT acumulados
LOCATE FOR cod_trab = lcCodigoTrabajador
IF FOUND()
REPLACE sueldo WITH lnSueldo
ENDIF
SELECT consasig
ENDSCAN
SELECT acumulados
GO TOP
Puedes hacer un codigo similar para obtener la informacion que estas buscando, por ejemplo, hasta donde yo se no hay un archivo donde se guarde esta informacion acumulada, pero puedes leer la tabla NOMINAS2, combinada con la tabla de CONCEPTOS, para determinar cual concepto aplica para utilidades, y simplemente hacer un SUM de la tabla NOMINAS2, con el codigo y el rango de fecha, que puedes usar tambien una funciona que esta en el sistema como lo es UTILFRAC(fecha_fin) y combinar este resultado con el acumulado hasta la fecha.
Como te digo, hay muchas vias, simplemente un poco de imaginacion.
Saludos
- syhcomputacion
- Cantidad de envíos : 393
Edad : 50
Fecha de inscripción : 18/02/2008
Re: CALCULO DE ACUMULADO PARA UTILIDADES
Jue Nov 07, 2013 8:31 am
Se acerca el pago de las utilidades... estan preparados..?
Permisos de este foro:
No puedes responder a temas en este foro.