May be it would be usefull to have MAX and MIN function to return the max or min value between 2 variables :

eg. $var=MAX(value1,value2)

and why not for more parameters

eg. $var=MAX(value1,value2,value3,...)

Regards

Laurent BONNIN (http://www.autourdupc.com)

code:

---

Function udfIntMax($vArray)
	Dim $iSubscript
	$udfIntMax=Val($vArray[0])
	For $iSubscript=1 To UBound($vArray)
		If Val($vArray[$iSubscript]) > $udfIntMax $udfIntMax=Val($vArray[$iSubscript]) EndIf
	Next
	Return
EndFunction

---

Just call it like this:

code:

---

$iNumber=99
$iMaxNo=udfIntMax(split("9 6 $iNumber 23")) ?
"Largest number is " $iMaxNo ?

---

You can do the min() thing by reversing the ">" test.

code:

---

Function udfIntMax($vString)
	Dim $iSubscript
	Dim $vArray $vArray=Split($vString,",")
	$udfIntMax=Val($vArray[0])
	For $iSubscript=1 To UBound($vArray)
		If Val($vArray[$iSubscript]) > $udfIntMax $udfIntMax=Val($vArray[$iSubscript]) EndIf
	Next
	Return
EndFunction

---

code:

---

$iNumber=99
$iMaxNo=udfIntMax("1,2,3,4,$iNumber,4,3,2,1")
"Largest number is " $iMaxNo ?

---

[ 23 January 2002: Message edited by: Richard Howarth ]

I have created my own UDF for that but I though it would be usefull to include the function in the language itself (sorry for my poor english) !

Regards to all

Laurent

Such suggestions are very interesting. Mostly it starts as UDF and sometimes
it will be implementated in KiXtart.
Nice examples are
- the introduction of function TRIM which can replace the calls RTRIM and LTRIM.
- the new macro @crlf which replaces the CHR(13)+CHR(11) calls.

We think Ruud are looking for ideas which aren't doing one task
for one window version and which aligned with other kixtart command, func-
tion and macro structures.

Publishing UDF's can also give Ruud inspiration.
greetings.