Convert a data file from Record Sequential to Line Sequential programmatically

Problem:

You want to convert a string (e.g. "12.3") to decimal data type in .NET.

Resolution:

       program-id. DecStrConv as "DecStrConv".

       environment division.

       configuration section.

       repository.

            class stringClass as "System.String"

            class decimalClass as "System.Decimal"

            class convertClass as "System.Convert"

            .

       data division.

       working-storage section.

1 myString object reference stringClass.

1 myDecimal object reference decimalClass.

       procedure division.

display "Let's set myString to string 12.3"

set myString to "12.3"

display "myString:  " myString

move convertClass::"ToDecimal"(myString) to myDecimal

*> same as

*> invoke convertClass "ToDecimal"

*>

using myString

*>

returning myDecimal

*> same as

*> set myDecimal to convertClass::"ToDecimal"(myString)

display "myString -> myDecimal: " myString " -> " myDecimal

display space

display "----------------"

display space

display "Let's set myDecimal to decimal 9.9"

set myDecimal to 9.99

display "myDecimal:  " myDecimal

invoke convertClass "ToString"

using myDecimal

returning myString

*> same as

*> move convertClass::"ToString"(myDecimal) to myString

*> same as

*> set myString to convertClass::"ToString"(myDecimal)

display "myDecimal -> myString: " myDecimal " -> " myString

           goback

           .           

       end program DecStrConv.