Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Appending data into a bizobj
Message
From
23/08/1999 08:55:10
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Title:
Appending data into a bizobj
Miscellaneous
Thread ID:
00256526
Message ID:
00256526
Views:
54
In our environment, we take data from a variety of sources and load it into tables. Normally I take a text file and load it into a cursor that matches the structure of my bizobj, scan the cursor and use scatter and gather memvar to bring the data in.
EXAMPLE

lcAlias = This.GetAlias()

=AFIELDS('aTemp', lcAlias)
CREATE CURSOR tmpCursor FROM ARRAY aTemp

APPEND FROM myfile TYPE SDF
SCAN
SCATTER MEMVAR
If !SEEK(m.Key, lcAlias, 'cid')
SELECT (lcAlias)
This.new()
GATHER MEMVAR
ENDIF
SELECT tmpCursor
ENDSCAN

USE IN tmpCursor

If anyone has any other approaches they can share using bizobjects, I'd like to hear. Thanks.

Jim
Reply
Map
View

Click here to load this message in the networking platform