Calling Bacis2 Procedure

zcad005 · Post by **zcad005** » Thu May 12, 2005 9:19 pm

Can a Bacis2 Procedure be called from Bacis1 Mode / program?
If so how is it done?

DK · Post by DK » Tue May 17, 2005 10:55 pm

Hello Zcad005,

I think, it is not able to call.
Does anybody know?

Do you start the program by bacis1_button?
and do you need to run bacis2 procedure in bacis1 program?

If so, you should modify.
- Start action_button or tool_button...
- run a bacis2 procedure.
- call bacis1 program by m2d_bacis1()

The commans are just
- newl l5 at 100 100 at 200 200 box endl
- redra
- macro c:\aaa.mac
- run bbb.prg
.....etc

DK.

Post by **msimpson** » Tue May 24, 2005 7:33 am

Hi

Bacis2 can call Bacis1, but not the other way around...

If you call bacis1 from bacis2 then the bacis2 will carry on once the bacis1 is complete.

Reg Mark

zcad005 · Post by **zcad005** » Tue May 24, 2005 3:48 pm

Thank you for the feedback.

What I am doing is running Medusa and sending it a bacis1 program to run.
[font=courer]C:\>medusa -ws tty -macro junk.mac[/font]
At the end of the program Medusa quits.
In the bacis1 program I wanted to call a bacis2 procedure that uses m2d_buffer_save_m12. This saves the Medusa sheet in an older format.

If I can't call a bacis2 procedure from a bacis1 program.
Option1: What if any is the command to save a Medusa sheet in the old format in a bacis1 program?
Option2: I can convert the bacis1 program into a bacis2 procedure, but can I run Medusa and send it a bacis2 procedure to be executed like can be done with a bacis1 program?

zcad005 · Post by **zcad005** » Fri May 27, 2005 10:42 am

Thank you all for your help.

This is what I found out from CAD Schroer support:

IN Medusa NG there are only three routes to saving in pre 2001i1 format:-
1) Using the DARS "SAVQMEOLD()" FORTRAN procedure
2) Using the sheet converter program in medutil or
3) Using the bacis2 API procedure "m2d_buffer_save_m12()".

I have to convert to bacis2.

-Joe

DK · Post by DK » Sun May 29, 2005 6:28 am

Hello Joe,

>1) Using the DARS "SAVQMEOLD()" FORTRAN procedure
is good information. I will try it later!

By the way, how about medstart.bac?
instead of C:\>medusa -ws tty -macro junk.mac

Make a medstart.bac at project\user\common
that includes any bacis2 procedure.
m2d_buffer_save_m12() or mui_quit_complete() ....

If you know this, sorry.

DK