aboutsummaryrefslogtreecommitdiffstats
path: root/it/it-projects/plugins/project/ext/cobol/copybooks/Errparm.cpy
blob: 3324a1b78a6d69517fcfd6c6615d7d6b2c8c7501 (plain)
1
2
3
4
5
6
       01  ERROR-PARAMETERS.
      *
           05  ERR-RESP          PIC S9(8)   COMP.
           05  ERR-RESP2         PIC S9(8)   COMP.
           05  ERR-TRNID         PIC X(4) VALUE IS 99.
           05  ERR-RSRCE         PIC X(8).