FiveTech Support Forums

THAKSSSS

Silvio.Falconi wrote:Having a total example € 3.50 I have to break it so you can turn on a series of buttons that have a different price

I Explain You

I have an array aImports:={200,100,50,20,10,5,3,2,1,0.50,0.20,0.10,0.05}

every record relates to a button



if I have a total = 3.50 I have to wiper to turn on the buttons that 3.50 do

in this case aImports[7] and aImports[10]

How I can do to calculate it ?

Unfortunately, someone died during the pandemic.

Now it happens that this someone had created a software for the bookstores and therefore it is not possible to update it.

I'm just trying to see if I can redo the program.

For many years I have been doing something but only classic statistics those you find on all websites, forecasts and combinatorial calculations and for about a month I have been implementing some systems of my own creation for the drafting of lottery games.

What you see (the prices) is a small part of the whole I'm putting up, unfortunately I don't have much time, I have a job at school, and serious problems with my 90-year-old mother who causes me several problems so the creation of the software goes very slowly.

Otto it is not true that I don't like it, it just annoys me that you always take my ideas to create tests with this mod_harbour that I am convinced that it will end with all the projects that have done and have not finished.

But you dear Otto you do not know this, you are young in fwh and you think you are all "roses and flowers"

Jimmy wrote:hi Silvio,

try this

Code (fw): Select all Collapse

PROCEDURE BinCalc(nValue)
LOCAL aImports:={200,100,50,20,10,5,3,2,1,0.50,0.20,0.10,0.05}
LOCAL nPosi := 0
LOCAL nRest := nValue
LOCAL aRet   := {}

   DO WHILE .T.
?     nPosi := ASCAN(aImports,{|e| e <= nRest})
      IF nPosi > 0
         AADD(aRet,nPosi)
         nRest -= aImports[nPosi]
      ELSE
         EXIT
      ENDIF
   ENDDO
RETURN aRet