Кобол 85, возврат каретки и перевод строки

Я кодирую в cobol85, у меня есть входной файл, имеющий 2 записи на данный момент

""1";"S";"20140211095016";;;;;"KANATA";"ON";"K2V 1A5";"ZR1
;;;;;;;;;;"-503.15";;"1715.27";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;"26696.33
";"78.22";"3275.95";;;;;"30050.50";;" 
""1";"S";"20140211088445";;;;;"MANATA";"ON";"K2V 1A5";"ZR1
;;;;;;;;;;"-503.15";;"1715.27";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;"26696.33
";"78.22";"3275.95";;;;;"30350.50";;" 

Я читаю эту входную запись, и я хочу поместить каждую запись в разные переменные, как нет, в две разные переменные путем проверки возврата каретки или / и перевода строки, но как я могу это сделать, я попытался использовать "X'ODOA", но я не мог Отделяйте его. Пожалуйста, помогите мне, как я должен проверять и отделять записи.

1 ответ

Я предполагаю, что первая запись заканчивается в "30050.50";;" а второй начинается в ""1";"S"

Если это две отдельные записи в последовательном файле, вам не нужно проверять CR или LF как каждый READ будет читать новую строку.

Можете ли вы опубликовать SELECT а также FD из этого файла?

Другие вопросы по тегам