Настройте заголовок столбца CSV

Question

Я пишу программу на языке COBOL, которая считывает данные из таблицы и выгружает их в файл CSV. Мои столбцы с определениями работы определены как (например) FACILITYCODE. Ниже приведена деталь столбца:

Рабочее хранение: WS-FACILITYCODE PIC X(04) VALUE "XYZ".

Определение программы: MOVE WS-FACILITYCODE TO ABI-FACILITYCODE.

Когда моя программа написана, заголовок CSV выходит как "Facilitycode". Я хочу изменить это на "FACILITY_CODE"

Код, использованный для создания CSV PERFORM 800-WRITECSV-XYZINV.

Сравнимый пример в мире SQL будет "КАК".

Любые предложения, пожалуйста.

Спасибо!

Answer 1

Как все говорят, нам нужно знать, что PERFORM 800-WRITECSV-XYZINV. делает...

но я работал в аналогичном решении для записи файлов CSV

  *...
  *acces to you table and it fills the variables WS-A WS-B and WS-C

  *build heather
   STRING "A"  ","
          "B"  "," 
          "C"         DELIMITED BY SIZE
      INTO WS-LINE
   END-STRING

  * write header
   WRITE FILE  FROM WS-LINE
   ...

Тогда для каждого файла из таблицы вы можете:

   INITIALIZE WS-LINE

  *build line whit the values
   STRING WS-A  ","
          WS-B  "," 
          WS-C         DELIMITED BY "SIZE" <-- it will print all spaces that each variable have 
      INTO WS-LINE
   END-STRING

  * write line
   WRITE FILE  FROM WS-LINE
   ...