Skip to main content

The picture show all:
How I can call that ENUM ?
In comments have the C# code.... and, I just want to re-create the code in cobol...

The picture show all:
How I can call that ENUM ?
In comments have the C# code.... and, I just want to re-create the code in cobol...

Hi Bencz,

The following code should work:-

   $set sourceformat"variable"

     $set ilusing"SocialExplorer.IO.FastDBF"

      program-id. Program1 as "ConsoleApplication2.Program1".

      data division.

      working-storage section.

      01  odbf        type DbfFile.

      procedure division.

          set odbf to new DbfFile()

          invoke odbf::Open("test.dbf" , type System.IO.FileMode::Create)

          invoke odbf::Header::AddColumn("test1", type DbfColumn DbfColumnType::Character , 10 , 0)

          goback.

      end program Program1.

The enum is defined within the DbfColumn class.

Regards

David