[Openroad-users] External Class Issue

[Doug White]

Hi Darren, 

Without actually having the external object in front of me i can't be sure, but you can try a few of these solutions.

1) SetAttribute

Lv_CardNumber = 'CardNumber(0)'
OBJECT(mwp_clock).SetAttribute(:Lv_CardNumber = Li_RFCardNew);

2) DynExpressions

DECLARE
DExpr = DYNEXPR;
ENDDECLARE
{
Dexpr = CurFrame.CreateDynExpr(string = 'mwp_clock.CardNumber(0)');

Dexpr.SetValue(value = Li_RFCardNew);
}

3) Rewrite the .NET class to include a SetCardNumber method

4)Use OpenROAD style array syntax

mwp_clock.CardNumber[0] = Li_RfCardNew;

Let me know if you get it working, if i could get at the actual class i may be able to give you a bit more help, depending on what policies you have in this regard

__ÐöUgWa__

From: darren.harvey at myworkplace.com.au
To: openroad-users at peerlessit.com
Date: Mon, 2 Jun 2008 16:49:55 +1000
Subject: [Openroad-users] External Class Issue


























Hi

 

I am using an external class and have the following problem:

 

The external class has an array attribute that I can use to get
values from, and it compiles successfully, and gives me the correct information
at run-time.  However when I try to set values in this attribute, I get a
compile-time error.  This same structure of code works in .NET, but is a
problem in OpenRoad.

 

Li_rfCardNew = mwp_clock.CardNumber(0);         // Compiles
and works at run-time

 

mwp_clock.CardNumber(0) = Li_RFCardNew;      // Failing
compilation

                                        ^

%% Error at line 281

E_W40271 Invalid target of assignment or BYREF.

 

 

Is there something basic I am doing wrong, or does this type
of assignment just not work in OpenRoad? Or is there some other cause that I
need to look at?

 

Thanks

 

Darren

 

 

Regards

 

Darren Harvey

 



 

MyWorkplace Solutions
Pty Limited

Level 5, 11 Queens Road

Melbourne Victoria 3004

 

Ph.       1300 733 731

Mob.     0400 398 188

Fax.      03 9710 1112

 

Making
Service our Priority

 

www.MyWorkplace.com.au

 

If you receive this email
by mistake, please notify us and do not make any use of the email. We do not
waive any privilege, confidentiality or copyright associated with it.

 







_________________________________________________________________
Are you paid what you're worth? Find out: SEEK Salary Centre
http://a.ninemsn.com.au/b.aspx?URL=http%3A%2F%2Fninemsn%2Eseek%2Ecom%2Eau%2Fcareer%2Dresources%2Fsalary%2Dcentre%2F%3Ftracking%3Dsk%3Ahet%3Asc%3Anine%3A0%3Ahot%3Atext&_t=764565661&_r=OCT07_endtext_salary&_m=EXT
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.peerlessit.com/pipermail/openroad-users/attachments/20080602/ed865066/attachment.html 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image001.jpg
Type: image/jpeg
Size: 1436 bytes
Desc: not available
Url : http://www.peerlessit.com/pipermail/openroad-users/attachments/20080602/ed865066/attachment.jpg