Skip to main content

ActiveX Visual Basic to Cobol

  • April 1, 2011
  • 10 replies
  • 0 views

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.

10 replies

Abdullah Yapıcı

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
try this code

working-storage section.
77 series handle of chartseries.
..
..
modify ChartControl,
@Content::@Series::@Add("1")
giving series


  • Author
  • Rocketeer
  • 19312 replies
  • April 15, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
hi there

In the same vein, is there also a way to do the "New" VB function, where ChartBarSeriesStyle is a separate class in the charcontrol def file ?

VB Statement: Set ChartControl.Content.Series(0).Style = New ChartBarSeriesStyle

Appreciate your help.

Thank-you

Julie

  • Author
  • Rocketeer
  • 19312 replies
  • April 15, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
hi there

In the same vein, is there also a way to do the "New" VB function, where ChartBarSeriesStyle is a separate class in the charcontrol def file ?

VB Statement: Set ChartControl.Content.Series(0).Style = New ChartBarSeriesStyle

Appreciate your help.

Thank-you

Julie

  • Author
  • Rocketeer
  • 19312 replies
  • April 15, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.

Please find the code here.


  • 0 replies
  • April 15, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
Someone on the old forum created a really handy tool called AxDefTool and it works really well to organize the .def file in a easy to read and navigate format and will even show you how to make the call to each of the methods, put's and get's etc. with sample code snippets. It's not always 100% accurate but it helps so much especially when you have a def with 1000's of entries in it.

here is the link to download the tool (it's a cobol program and I can verify that it runs fine under version 6.1.0 and 8.1.3).

  • Author
  • Rocketeer
  • 19312 replies
  • May 6, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
Thanks. Helped a lot.

  • Author
  • Rocketeer
  • 19312 replies
  • May 6, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
Thanks. Helped a lot.

  • Author
  • Rocketeer
  • 19312 replies
  • July 12, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
Mikalodeon
I am desperatly looking for help with active-x and saw your post during a search. Unforunately the link is no longer operable. Any chance you or anyone else has this program you could send me, brics@bricssoftware.com

sfi,
It looks like you're using the chart control from codejock. I am trying to figure it out so I can add charts to my acucobol code. Have you had any luck and if so would you be willing to share some code samples,

Thanks,

  • Author
  • Rocketeer
  • 19312 replies
  • July 12, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
Mikalodeon
I am desperatly looking for help with active-x and saw your post during a search. Unforunately the link is no longer operable. Any chance you or anyone else has this program you could send me, brics@bricssoftware.com

sfi,
It looks like you're using the chart control from codejock. I am trying to figure it out so I can add charts to my acucobol code. Have you had any luck and if so would you be willing to share some code samples,

Thanks,

  • Author
  • Rocketeer
  • 19312 replies
  • July 13, 2011

[Migrated content. Thread originally posted on 31 March 2011]

Hi there,

Does anyone have any detailed doco on how you translate visual basic objects/classes usage into cobol speak.

I have read through the interoperability section and it is good for basic controls but looking for a more detailed description/examples of activeXcontrol manipulation

e.g what is the cobol equivalent for these Visual Basic statements:
Dim Series As ChartSeries
Set Series = ChartControl.Content.Series.Add("1")

Thanks in advance.
You can download the axdeftool object here: http://www.themedepot.com/alt/axdeftool.zip