[archive] translation .NET

Dominique Sacre
Author
Rocketeer
Forum|Forum|16 years ago
July 30, 2009

[Migrated content. Thread originally posted on 30 July 2009]

Hello,

Can someone help me translate this:
METHOD, 0, "@reactAddressReeksFullParameterSearch"
"BSTR" @auth_reactid, TYPE 8
"BSTR" @province, TYPE 8
"BSTR" @district, TYPE 8
"BSTR" @city, TYPE 8
"BSTR" @street, TYPE 8
"int" @houseNo, TYPE 3
"BSTR" @houseNoAddition, TYPE 8
"BSTR" @nbcode, TYPE 8
"BSTR" @lettercombination, TYPE 8
"BSTR" @addresstype, TYPE 8
"int" @page, TYPE 3
RETURNING "STORED_OBJECT", TYPE 69

Thanks,
Andre.

This looks like a method that takes in 11 parameters and returns an object. The BSTR parameters are strings and the int are integers. I'm assuming this is in a "def" file created by an Acu utility?

Like

D

Dominique Sacre
Author
Rocketeer
Forum|Forum|16 years ago
July 30, 2009

[Migrated content. Thread originally posted on 30 July 2009]

Hello,

Can someone help me translate this:
METHOD, 0, "@reactAddressReeksFullParameterSearch"
"BSTR" @auth_reactid, TYPE 8
"BSTR" @province, TYPE 8
"BSTR" @district, TYPE 8
"BSTR" @city, TYPE 8
"BSTR" @street, TYPE 8
"int" @houseNo, TYPE 3
"BSTR" @houseNoAddition, TYPE 8
"BSTR" @nbcode, TYPE 8
"BSTR" @lettercombination, TYPE 8
"BSTR" @addresstype, TYPE 8
"int" @page, TYPE 3
RETURNING "STORED_OBJECT", TYPE 69

Thanks,
Andre.

Yes I created de .def file with netdefgen from a webservice which returns zip-codes and other things.
I am not very familliar with translating to cobol.
So if anyone has examples on how to do this it would be very welcome.

Like

D

Dominique Sacre
Author
Rocketeer
Forum|Forum|16 years ago
July 31, 2009

[Migrated content. Thread originally posted on 30 July 2009]

Hello,

Can someone help me translate this:
METHOD, 0, "@reactAddressReeksFullParameterSearch"
"BSTR" @auth_reactid, TYPE 8
"BSTR" @province, TYPE 8
"BSTR" @district, TYPE 8
"BSTR" @city, TYPE 8
"BSTR" @street, TYPE 8
"int" @houseNo, TYPE 3
"BSTR" @houseNoAddition, TYPE 8
"BSTR" @nbcode, TYPE 8
"BSTR" @lettercombination, TYPE 8
"BSTR" @addresstype, TYPE 8
"int" @page, TYPE 3
RETURNING "STORED_OBJECT", TYPE 69

Thanks,
Andre.

Here is my program. Want to get an address returned from the webservice. Can someone help me translate this. Included is also de C-program.

Thanks,
Andre.

1 Attachments

943363_program.zip

Like

D

Dominique Sacre
Author
Rocketeer
Forum|Forum|16 years ago
July 31, 2009

[Migrated content. Thread originally posted on 30 July 2009]

Hello,

Can someone help me translate this:
METHOD, 0, "@reactAddressReeksFullParameterSearch"
"BSTR" @auth_reactid, TYPE 8
"BSTR" @province, TYPE 8
"BSTR" @district, TYPE 8
"BSTR" @city, TYPE 8
"BSTR" @street, TYPE 8
"int" @houseNo, TYPE 3
"BSTR" @houseNoAddition, TYPE 8
"BSTR" @nbcode, TYPE 8
"BSTR" @lettercombination, TYPE 8
"BSTR" @addresstype, TYPE 8
"int" @page, TYPE 3
RETURNING "STORED_OBJECT", TYPE 69

Thanks,
Andre.

Here is my program. Want to get an address returned from the webservice. Can someone help me translate this. Included is also de C-program.

Thanks,
Andre.

1 Attachments

943662_program.zip

Like

D

Dominique Sacre
Author
Rocketeer
Forum|Forum|16 years ago
August 3, 2009

[Migrated content. Thread originally posted on 30 July 2009]

Hello,

Can someone help me translate this:
METHOD, 0, "@reactAddressReeksFullParameterSearch"
"BSTR" @auth_reactid, TYPE 8
"BSTR" @province, TYPE 8
"BSTR" @district, TYPE 8
"BSTR" @city, TYPE 8
"BSTR" @street, TYPE 8
"int" @houseNo, TYPE 3
"BSTR" @houseNoAddition, TYPE 8
"BSTR" @nbcode, TYPE 8
"BSTR" @lettercombination, TYPE 8
"BSTR" @addresstype, TYPE 8
"int" @page, TYPE 3
RETURNING "STORED_OBJECT", TYPE 69

Thanks,
Andre.

I don't know whether you have tested this or not, but I suspect it will not work because of the function returning a STORED_OBJECT. ACUCOBOL-GT does not support this.