Troubleshooting
Problem
Enterprise COBOL for z/OS inserts a character into column 1 of each record. 1 = page eject 0 = double space - = triple space + = overstrike How is this done using COBOL for AIX?
Symptom
Lack of ASA bytes in column 1 of each record. Instead, multiple blank lines are inserted to achieve vertical spacing. Each record of an ORGANIZATION IS LINE SEQUENTIAL file ends with hex 0A.
Environment
AIX
Diagnosing The Problem
This feature does not exist with COBOL for AIX. COBOL guarantees a result but does not guarantee an implementation.
Resolving The Problem
You'll have to program it yourself. For example instead of
MOVE "Double space this" TO OUT-REC.
WRITE OUT-REC AFTER ADVANCING 2 LINES.
Change it to this
MOVE "0 Double space this" TO OUT-REC.
WRITE OUT-REC.
Related Information
Was this topic helpful?
Document Information
Modified date:
08 August 2018
UID
swg21419848