Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Length of Function name causes bug
Message
De
21/06/2003 20:54:44
Dave Macfarlane
Condo Navigator Ltd.
Alberta, Canada
 
 
À
21/06/2003 20:22:33
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00802404
Message ID:
00802671
Vues:
14
Hi Jim,

> Out of curiousity, Dave, is the 'bad' function deep within a .PRG or does it call another function that is deep within a .PRG?

There are 34 lines of code prior to the following, the first code just opens the tables etc.
The GetMSubS() UDF has some code and also makes one call to SUBSTR()

*———————————————————————————————————————————————————————————————
FOR lnRowNo = 1 TO lnClaimedRaces

SELECT Race

lnHorsesClaimed = MEMLINES(Race.mClaimed)

*———————————————————————————————————————————————————————————————

FOR i = 1 TO lnHorsesClaimed

lcLine = MLINE(Race.mClaimed,i)

IF NOT EMPTY(lcLine)

lcHorse = GetMSubS(lcLine,1,'< TO >')
lcTrainer = GetMSubS(lcLine,'< TO >','< FOR >','End of Start')
lcPrice = GetMSubS(lcLine,'< FOR >','','End of Start')

ENDIF

etc...
*———————————————————————————————————————————————————————————————
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform