Passing values to PowerCOBOL DLL



There's probably something simple that I've overlooked, but it's not obvious to me how to pass a value to a PowerCOBOL DLL called from VB. I'm using VB6 and Fujitsu 6.1

Here's what I've accomplished so far ... a working COBOL program that accesses a data file and displays the records in a listbox on a relatively simple PowerCOBOL form. That part is easy.

The form is compiled into a DLL which I have registered and referenced in a VB project. The form is inserted as a control on the VB form and appears to function as intended when the VB program is executed.

All that is pretty amazing for an old timer such as myself. Frankly I'm amazed it actually works, considering if all this were written in COBOL alone it could be easily accomplished with a simple CALL statement.

But to be of any value, the VB program must pass a customer ID to the COBOL code to specify which records to display. I'm guessing it's not as simple as adding a LINKAGE section and PROCEDURE DIVISION USING clause to the PowerCOBOL DLL (I'm guessing that such syntax is not supported).

COBOL-85 syntax is specified in the PowerCOBOL project properties as I'd like to keep this simple and not delve into OOCOBOL if possible. I'm just using the COBOL component to prototype some data access which will later be done in SQL.

Again, passing this value is probably simple to do but I don't know where to look. The ADTOOLS website appears to be down... anybody know what's up with that?
Thanks for any pointers.

.