Information générale
Catégorie:
Codage, syntaxe et commandes
Can anyone tell me what wrong on this code
------------------------------------------------------------------
Function Totalmf
tmm=0
tmf=0
tcm=0
tcf=0
tim=0
tif=0
tom=0
tof=0
Sele Emp
Set Filter To Resign = .f.
Go Top
Do While !Eof()
Do Case
Case Sex='M' .And. Race ='Malay'
Tmm=tmm+1
Case Sex='F' .And. Race = 'Malay'
tmf=tmf+1
Case Sex='M' .And. Race='Chinese'
tcm=tcm+1
Case Sex='F' .And. Race='Chinese'
tcf=tcf+1
Case Sex='M' .And. Race='India'
tim=tim+1
Case Sex='F' .And. Race='India'
tif=tif+1
Case Sex='M' .And. Race='Other'
tom=tom+1
Case Sex='F' .And. Race='Other'
tof=tof+1
EndCase
Skip
EndDo
Return (tmm,tmf,tcm,tcf,tim,tif,tom,tof)
EndFunc
------------------------------------------------------------------
The Error Message when compile is : -
Return (tmm,tmf,tcm,tcf,tim,tif,tom,tof)
Error in line 107: Function name is missing ).
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement