FoxPro/Visual FoxPro - Distribucion de moneda

Hola amigos del forom.

estoy trabajando en programa de nomina y necesito distribuir las monedas de la nomina.
si alguien puede ayudarme con esto se lo agradecere.

Ejemplo si la nomina es 150,000.00

debe decirme que cantidad de billetes de cada nominacion debo tener.


Gracias

es muy sencillo, debes hacer un barrido de todos los dineros de cada empleado, por ejemplo:

empleados:
juan 1,240.50
pedro 825.30
santiago 2,542.00
------------
nomina 4,607.80

monedas: (de mayor a menor)
juan pedro santiago
billetes 1000 1 0 2
billetes 500 0 1 1
billetes 100 etc etc etc
billetes 20
billetes 10
monedas 5
monedas 2
monedas 1
monedas 0.5
monedas 0.1

siempre comienza descontando de cada empleado el billete mayor y acumulando un totalizador de estos billetes, cuando el saldo es negativo, pasas al siguiente billete, etc.

ejemplo:

1240.50 - 1000 = 240.50 (cuento un billete de 1000)
240.50 - 1000 = -759.50 (negativo, ya no cuento y paso al siguiente)
240.50 - 500 = -759.50 (negativo, ya no cuento y paso al siguiente)
240.50 - 100 = 140.50 (cuento un billete de 100)
140.50 - 100 = 40.50 (cuento otro billete de 100)
40.50 - 100 = -59.50 (negativo, ya no cuento y paso al siguiente)

Santiago

Podría pasar el código de como realizar el desglose