RE: Merging forms into one database - Razzak's Reply

[Farnsworth Midge D Contr 388 RANS]

Thank you for your help.  Here's another one that came up that is
intermittent:
in the application that we are developing we have utilized many push buttons
to take us to different forms and screens, as the program returns to the
originating point (after the push button eep has executed) we are getting an
application error (fatal) "DR WATSON type" which shuts down the program and
returns us to the desktop. Any ideas?

-----Original Message-----
From: A. Razzak Memon [mailto:[EMAIL PROTECTED]]
Sent: July 17, 2001 4:51 PM
To: [EMAIL PROTECTED]
Subject: Re: Merging forms into one database - Razzak's Reply



At 04:12 PM 7/17/2001 -0600, Farnsworth Midge D Contr wrote:

>Using R:base 6.1a is it possible to merge forms from 
>two different databases into one database? Both databases 
>contain the same tables that the forms are based on.

Follow these steps to accomplish your task:

I'm assuming you're using R:BASE 6.1a for Windows!

To Copy/Replace ALL Forms:

01. CONNECT RBDBMS1 

02. SET NULL -0-

03. OUTP Forms.FRM
    UNLOAD DATA FOR SYS_FORMS2
    OUTP SCREEN

    This step will create two files:

    . Forms.FRM
    . Forms.LOB

04. Copy both files to the other directory where
    RBDBMS2 resides

05. Change directory where other RBDBMS2 resides

06. CONNECT RBDBMS2

07. SET NULL -0-

08. DELETE ROWS FROM SYS_FORMS2

09. INPUT Forms.FRM

There you have it ...

To Copy/Replace Any Given Form(s):

01. CONNECT RBDBMS1 

02. SET NULL -0-

03. OUTP Forms.FRM
    UNLOAD DATA FOR SYS_FORMS2 WHERE +
    SYS_FORM_NAME = 'FormName'
    OUTP SCREEN

    OR 

    OUTP Forms.FRM
    UNLOAD DATA FOR SYS_FORMS2 WHERE +
    SYS_FORM_NAME IN (FormName1, FormName2, ...)
    OUTP SCREEN

    This step will create two files:

    . Forms.FRM
    . Forms.LOB

04. Copy both files to the other directory where
    RBDBMS2 resides

05. Change directory where other RBDBMS2 resides

06. CONNECT RBDBMS2

07. SET NULL -0-

08. DELETE ROWS FROM SYS_FORMS2 WHERE +
    SYS_FORM_NAME = 'FormName'

    OR

    DELETE ROWS FROM SYS_FORMS2 WHERE +
    SYS_FORM_NAME IN 'FormName1, FormName2, ...'

09. INPUT Forms.FRM

Last but not least, you could ALSO use R:BASE ODBC 
method to achieve the same goal!

Enjoy and make sure to have fun!

Very Best Regards,

Razzak.


===================================-============================
R:BASE Developers's Conference: http://www.rbase.com/conference 
Official R:BASE List Server:    mailto:[EMAIL PROTECTED]
RBTI Events/Training:        http://www.rbase2000.com/events
R:DCC Members:               http://www.rbase2000.com/rdcc
================================================================
R:BASE, Oterro & R:Tango are registered trademarks of RBTI.
==================================-=============================