Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Please HELP!!!
Message
De
09/10/1999 12:23:39
Coann Teng
Computer Infobase System S/B
Kuala Lumpur, Malaisie
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Please HELP!!!
Divers
Thread ID:
00274609
Message ID:
00274609
Vues:
63
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
Fil
Voir

Click here to load this message in the networking platform