Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Way back when....
Message
From
12/02/1997 23:23:34
 
 
To
12/02/1997 17:47:45
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00019630
Message ID:
00020313
Views:
54
>>
>>btw, manual weighs in at 37.95 lbs.... ;~)
>
>
>Bad news....VFP no longer supports the LOAD command. Here's the situation:
>
>We have an area here which is working on a VFP/Sybase system that has to create a (delimited by stars [EDI format]) text file. Rather than do the manipulation within Fox, a new hire here decided to do it in C. Unfortunately, this person THOUGHT they knew more C than they do, but rather than re-write the code in Fox (approximately 2 hours worth of work), they are trying to make this bleedin' piece of C work.
>
>Major stumbling block is they need to pass parameters back and forth to the C program.
>
>Sadly, *MY* original Foxpro manuals were misappropriated by an old roommate (why, I don't know - she wasn't a programmer), and from the sounds of it, I hallucinated that portion of it. Perhaps in the Library builder??

maybe she needed a weight for pressing flowers!!??

two hours to change * to , ..... you must be kidding?
open text file
create output text file
read input text file into string_variable

do while not eof(text file)
   output_string = ""
   for i = 1 to len(string_variable)
      if substr( string_variable, i, 1 )="*"
         output_string = output_string + ","
      else
         output_string = output_string + substr( string_variable, i, 1)
      endif
   next i
   write output_string to output file
   read next string_variable
enddo
close all
end
send check payable to Warwick Information Technology! Thanks for your business.... ;~) low level file i/o routines are great!
Lucien T. Elliott Programmer/Analyst
Staple Cotton CoOperative Association
416 West Market St | Greenwood | MS | 38930 | (662) 453 6231
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform