Escaping for XML output
| Run Settings | |
|---|---|
| Language | COBOL |
| Language Version | |
| Run Command |
| Snippet Metadata | |
|---|---|
| Owner | rightfold |
| Created | 7 years ago |
| Modified | 7 years ago |
| Visibility | Public |
IDENTIFICATION DIVISION.
PROGRAM-ID. escape-xml.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 ws-e-amp PIC X(5) VALUE '&'.
01 ws-e-lt PIC X(4) VALUE '<'.
01 ws-e-quot PIC X(6) VALUE '"'.
01 ws-in PIC X(100) VALUE 'This <is> a &"string"!'.
01 ws-out PIC X(600).
| Editor Settings | |
|---|---|
| Theme | |
| Key bindings | |
| Full width | |
| Lines |