Code: Select all
FUNCTION IsPar(num);RETURN IIF(num%2=0,.T.,.F.)
Code: Select all
FUNCTION IsPar(num);RETURN IIF(num%2=0,.T.,.F.)
Code: Select all
#include "fivewin.ch"
memvar cDate
Function Main()
public cDate
cDate:= dtoc(date())
doSomething()
Return nil
Function doSomething()
msgInfo( cDate ) // warning generated here
return nil
James,James Bott wrote: I am guessing that sets the next number to be 10?
James
Code: Select all
DbFieldInfo( DBS_COUNTER, 1, 10) //Set autoincremt to 10
DbFieldInfo( DBS_STEP, 1, 4) //Set Step to 4
Code: Select all
D_LogicalValue(.F.)
Code: Select all
hb_regex(hb_regexComp(cRegExpression,cEmail) )
Code: Select all
StrTran("Kellogg's","'","''")