Putting Label Commons in $Insert (AREV Specific)
At 04 FEB 2001 02:43:37PM rayc@symmetryinfo.com wrote:
To all,
I was looking at the help for Common in OI and it recommended that one put the Common declaration in the Insert record. I was modifying an R/Basis (in AREV) and in the process breaking the program into multiple "called" modules to ready it for OI. That is, when I tried to bring the program in the OI System Editor nothing shows up since the source is 64K.
Anyway back to the problem, when I put one Common Statement in an Insert Record and modified relevant programs, ran a test, it worked. However, when I put multiple Labeled Commons into the Insert record, when I run test under AREV, I get "undefined" messages at debugger.
My question is this: Is one limited to only one Common Declaration in an Insert record? I'm asking this question, because it would be easier for me if I could put multiple Common statements into an Insert record. Therefore, if it's possible, but I'm doing something wrong, I will continue to look. However, if it's not possible, then I'll know what I need to do.
Thanks for any comments on this.
Ray Chan
P.S. I will post this on the otherside as well.
rayc@symmetryinfo.com onmouseover=window.status=imagine … ;return(true)"
Ray Chan ~ Symmetry Info
At 04 FEB 2001 05:21PM Donald Bakke wrote:
Ray,
If I understand you correctly this should be no problem. Here is a test I just did…
First I created the following insert:
Compile insert MyTest
common /Test1/ Test11@, Test12@, Test13@
common /Test2/ Test21@, Test22@, Test23@
common /Test3/ Test31@, Test32@, Test33@
Then I create the following routine:
Compile subroutine Test(Void)
$insert MyTest
Test11@=11
Test12@=12
Test13@=13
Test21@=21
Test22@=22
Test23@=23
Test31@=31
Test32@=32
Test33@=33
return
Compiling and running gave me no problems whatsoever. I even debugged the code and watched my labelled common variables get updated one at a time.
dbakke@srpcs.com
At 04 FEB 2001 05:24PM Paul Rule wrote:
Multiple labelled commons are ok.
the format should be something like..
common /test1/var1@
common /test2/var2@
common /test3/var3@,orwhatever@
Maybe you misspelt a variable name.
At 04 FEB 2001 05:27PM Donald Bakke wrote:
Ray,
Sorry, the above code example was performed in OpenInsight. I figured out you were trying to get this to work in AREV. Actually, it does work in AREV also. However, AREV does not accept the insert header.
dbakke@srpcs.com
At 05 FEB 2001 03:17AM rayc@symmetryinfo.com` wrote:
Don/Paul:
Thanks for the input. I went back, rechecked the programs, made some changes, and recompiled them. You're right. You can have mulitple common statements in an Insert record.
Ray
rayc@symmetryinfo.com onmouseover=window.status=imagine … ;return(true)"
Ray Chan ~ Symmetry Info