なるおブログ– tag –
-
【COBOL 読み1-4】88は米寿でしょーに！条件ってなんなのよ？
今日のコード WORKING-STORAGE SECTION. *> --- 終端・汎用ワーク --- 01 EOF-FLAG PIC X VALUE "N". 88 EOF-YES VALUE "Y". 88 EOF-NO VALUE "N". 01 LINE-NO PIC 9(7) VALUE ZERO. 01 WS-MSG PIC X(80). なるお）あれ？いけそうな予感。 WORKING-STOR... -
【COBOL 読み1-2】わからないから才能ない？ ENVIRONMENT DIVISION.との遭遇
今日のコード ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT INFILE ASSIGN TO "orders.csv" ORGANIZATION IS LINE SEQUENTIAL. SELECT OUTREP ASSIGN TO "sales_report.txt" ORGANIZATION IS LINE SEQUENTIAL. SELECT ERRFILE ASSIG... -
【COBOL 読み1-1】読めと言われても…って英語？〜IDENTIFICATION DIVISIONとの遭遇〜
今日のコード IDENTIFICATION DIVISION. PROGRAM-ID. SALES-REPORT. なんで俺がCOBOLとかやんないといけないの？ となりのおじさんなにしてんの… これ読んどけって、コード渡されてただけで、、、 わからんてー！ 教本ちょうだいよ！ちょっとCOBOL覚えてく...
1