Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding views to a installed application.
Message
From
24/08/2001 02:36:16
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
23/08/2001 18:16:57
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Miscellaneous
Thread ID:
00548348
Message ID:
00548500
Views:
10
This message has been marked as the solution to the initial question of the thread.
>Hi Cetin. Thanks!... and Sorry.
>I'm a newbie. Could you be more specific?
>Thanks.
>Ulises

OK. In command window :

close all
do home() + 'tools\gendbc\gendbc'

When it asks point your DBC. It'll generate a .prg (possibly with a .krt file if there are stored procs or RI info). Open the prg, at the top you'd see lines similar to MakeTable_Tablename, MakeView_Viewname. Delete lines between 'create database ...' and first function that doesn't start with 'MakeView_'. Add 'set exclusive on', change 'create database ..' to 'open database ...'. Your edited file would look like :

...
DisplayStatus([Creating database...])
CLOSE DATA ALL
set exclusive on
open data testdata.dbc
DisplayStatus([Creating view INVOICE...])
MakeView_INVOICE()
DisplayStatus([Creating view CUSTOMERS IN SPECIFIC COUNTRY...])
MakeView_CUSTOMERS_IN_SPECIFIC_COUNTRY()
DisplayStatus([Creating view MYVIEW...])
MakeView_MYVIEW()

FUNCTION MakeTable_CUSTOMER
...

Create a project with only this prg in it and build exe. Run this exe at your friend's computer.

Note : I assume no table differences exist between your version and friend's. This operation is just creating the views programmatically.
No extra coding thinking exclusivity precautions would be taken by your friend (no error checking for that).
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform