cobol2visual basic

[Guest]

Can some one help me to translate this cobol code to visual basic code.

01 PCHR.
03 PC PIC 99 COMP OCCURS 8.
01 PCHC REDEFINES PCHR PIC9(18) COMP.
01 PCH PIC 9(18) COMP VALUE 0.

Thanks
regards,
Fet

 

[Cor Ligthert]

Fet,

You cannot, VBNet gives you no change to reuse memory as another type.
Altough this is a way of using it from the time when processors where slow
comparing to today and memory was very expensive. Now it is just converted
in another type in anohter place.

I hope this helps?

Cor
"FET" <[email protected]>

...

 

[Cor Ligthert]

Dohh

When this is in record you can of course use that anyway, because it is a
string, which can be processed as well with the classic
microsoft.visualbasic functions as by instance MID or the base String
instrucions, as by instance substring.

I hope this helps?

Cor

 

[Guest]

Cor thanks
I will try it.

Fet