Information générale
Catégorie:
Codage, syntaxe et commandes
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
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