FoxPro/Visual FoxPro - sistema de nomina

hola, como estas lo que pasa es q tengo unos problemitas con el sistema de nomina q estoy elaborando, es la parte de programacion para sacar las deduciones asi como tambien las remuneraciones, entonces era para ver si me puedes ayudar ya sea cn un codigo o nose lo q puedas.
Disculpa la molestia, si me pudieras ayudar te lo agradeceria.

Bueno yo te podria ayudar por que ya hice uno, eso del calculo de las deducciones asi como las remuneraciones por periodo dependen mucho de la ley que rige en tu pais, siempre existe una Entidad Supervisora que norma sobre las diferentes formas de realizar una Nomina , si pudieses conseguirla yo te ayudaria.

Saludos

JMS

PD: si quieres corregir tu codigo manda el que tienes y asi lo veo

corrigeme esa madre we xD y si puedes hacerme lo ke me falta te lo agradeceria un zhingo
es en el visual

set talk off
clear
use empleados.dbf
clavex=space(10)
dias_trabax=space(6)
sueldo_diax=space (6)
sueldo=space (6)
despensa=100
guarderia=100
total_p=space (6)
total_d=space (6)
@3,3 say "dame la klave" get clavex
read

locate for clave=clavex
if found()
@4,3 say "diaz trabajadoz" get dias_trabax
read
@5,3 say "sueldo diario" get sueldo_diax
read



else
wait window "no xizte"
endif

if dias_traba<5
total_p=(sueldo_diax*dias_trabax)+despensa+guarderia
get total_p
total_d=descuentos-imss-ispt-afore
get total_d
sueldo = total_p - total_d
@8,3 say sueldo +str(sueldo)
read

endif

pra ti