Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Variable not storing all information for Body of Email
Message
De
11/05/2006 13:34:35
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
 
 
À
11/05/2006 13:27:16
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8
OS:
Windows XP SP1
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01120917
Message ID:
01121047
Vues:
12
>>>>>Hi Borislav
>>>>>
>>>>
>>>>>'Compiled code for this line is too long'
>>>>>
>>>>>When I suspend the problem lies in this block of code:
>>>>
>>>>You don't need the macro here at all. Just use lcBodyText as is.
>>>>
>>>>>
>>>>>* Convert body text field to data (if it is a field)
>>>>>IF TYPE(lcBodyText)='M'
>>>>>	lcTemp=""
>>>>>*!*	FOR lnLoop=1 TO MEMLINES(&lcBodyText.)
>>>>>*!*		lcTemp=lcTemp+MLINE(&lcBodyText.,lnLoop)
>>>>>	FOR lnLoop=1 TO MEMLINES(lcBodyText)
>>>>>		lcTemp=lcTemp+MLINE(lcBodyText,lnLoop)
>>>>>		lcTemp=lcTemp+CHR(13)
>>>>>	ENDFOR
>>>>>	lcBodyText=lcTemp
>>>>>ENDIF
>>>>>
>>>>
>>>>And that's it.
>>>
>>>Maybe this code is designed to pass Memo field as parameter, not value of Memo field but its name as 'MemoField'.
>>>If Memo is passed as Value then TYPE(lcBodyText) must raise an error.
>>
>>Right, didn't notice that. If he's passing a value, he should check for type(lcBodyText)='C' instead. At least that's what I'd do - pass it as value. But if the parameter did contain the memo field's name, he wouldn't be getting the "too long" error, would he?
>
>No, he wouldn't. Just tested and he must not receive error anyway:
>lcStr = [teststr]
>? TYPE(lcStr) -> U (not error)

Now I'm getting curious... how did he get this error anyway? The type(lcBodyText)="M" or he wouldn't run into this at all... but then what was too long there?

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform