FiveTech Software tech support forums

... to Client Rect. Coordinates: nil --> default to the border >= 1 --> Pixels from Top or Left as the case may be >0 & < 1 --> Percentage of width or height < 0 : Pixels from right or bottom 3. cAlign : Default Vertical and Horizontal Center Meaningful Combination of L,R,T,B ...

hi Silvio, my Progressbar ist alway 100% LOCAL i,nMax := len(aData)LOCAL nEvery := INT(nMax/100)   oProgress:SetRange( 0, 100 )   oProgress:SetPos( 0 )   FOR i := 1 TO nMax      ...      IF ( i % nEvery ) == 0         nPos := oProgress:Value         oProgress:...

... that is, it immediately reaches the end but in reality the procedure is still working and still for a long time how can I give to give the right percentage to the progress control? I tried with oProgress:SetRange( 0, (len(aData)/2) ) it can run but the bar ends at the record 49000 approximately

Ask your friend also if the discount will be a percentage or a value.

I think it will always be a percentage and than you have to rewrite your code accourdingly.

... bcodi, 1, 2 ) = '12'" "WHERE bcode LIKE '___12%'" is same as "SUBSTR( bcodi, 4, 2 ) = '12'" LIKE is case insensitive The percentage ( % ) wildcard matches any string of zero or more characters. The underscore ( _ ) wildcard matches any single character.

... That way we forgo some benefits of having indexes. As I suggested please use FILTER TO !DELETED(). There is not much performance impact if the percentage of deleted records is less. Create an additional index tag on every large dbf as INDEX ON DELETED() TAG DELETED  Then the filter ...

... definitely see the merits in this for selecting from a short range of numbers but I have one range between 0-99999 a couple in four figures and a percentage range with decimal places. In most cases the intial numbers will be entered via the keyboard and the spinner option is to provide "fine ...

thanks run ok I change with FUNCTION FinalCost( nQtdUnits, nUnitValue,nPercentual )   LOCAL nFinalCost    Local nMidPercentual :=  Int(nPercentual/2)     IF nQtdUnits = 1       nFinalCost := nUnitValue - nMidPercentual ...

You discount isn't based on fixed %. Look: 1 -> 13/15 = 0,866% 2 -> 25/30 = 0,833% 3 -> 40/45 = 0,888% 4 -> 50/60 = 0,833% 5 -> 60/75 = 0,800% if you want to calculate the final amount based on the quantity of products according to the picture you sent, you should do something like th...

Not run ok Please Local nCostoUnitario:= 15 Local nSconto:= 0 Local adata:={} Local lIncremental: =.t. Local nConsto:= 0 Local nPercentuale:= 12.50 //test For n= 1 to 30 nCosto:= nCostounitario*n nTotale:= nCosto-nSconto aadd(adata,{n,; nCosto ,; nSconto ,; nTotale }) If lIncremental nsconto:= (ncos...

See if it helps. I did not quite understand your writing. #include "FiveWin.ch"static oWnd//----------------------------------------------------------------//function Main()   LOCAL nPrice    := 0.00   LOCAL nCost     := 0.00   LOCA...

Hola Silvio:

Creo que se soluciona asi:

Descuento = ( 1 - ( Precio Neto / Costo ) ) * 100 --> Porcentaje de descuento aplicado

Espero te sirva

Saludos!

Eduardo Borondón Muñiz

I have a nprice to calculate unit cost 15 euros the discount is calculated on the basis of - (ncost * percentage/ 100) But I not Know the right percentage to insert I tried with 10,12 and 13 but it not run ok sample : if it costs 30 euros the percentage discount makes me 28.05 ...

... nTop and nLeft: If NIL, default to the top and left of image rect. Values >= 1 indicate absolute pixels Values > 0 and < 1 indicate percentage of height and width 0.25 means 25% of height/width as applicable. nBottom and nRight: NIL default to bottom and right of the image rect. ...

... to Client Rect. Coordinates: nil --> default to the border >= 1 --> Pixels from Top or Left as the case may be >0 & < 1 --> Percentage of width or height < 0 : Pixels from right or bottom 3. cAlign : Default Vertical and Horizontal Center Meaningful Combination of L,R,T,B ...