DW                              4015PIC S9(8) COMP
DDW                             4016PIC S9(17) COMP
PACCEPT                        V12
PADD                           V12
PAND                           R12
PAT                            V12
DBLOCK                         R20
PBY                            R16
PCALL                          V12
PCLOSE                         V12
DCOMP                          R40
PCOMPUTE                       V12
 COPY                          R12
PDELIMITED                     R20
PDEPENDING                     R20
DDEPENDING                     R40
PDISPLAY                       V12
PDIVIDE                        V12
 DIVISION                      R
PELSE                          V12
PEVALUATE                      V12
PEXIT                          V12
DFD                            R0804FD
PFROM                          R
PGIVING                        R40
PGO                            V12
PIF                            V1204IF
PINITIALISE                    V20  INITIALIZE
PINITIALIZE                    V20
DLABEL                         R20
PMOVE                          V12
PMULTIPLY                      V12
PNEXT                          V12
DOCCURS                        R40
POPEN                          V12
POR                            R12
PPERFORM                       V12
DPIC                           R40
DPICTURE                       R40
PREAD                          V12
DREDEFINES                     R36
PSEARCH                        V12
 SECTION                       R
ESELECT                        R12
PSET                           V12
PSORT                          V12
ESPECIAL-NAMES                 R08
PSTRING                        V12
PSTOP                          V12
PSUBTRACT                      V12
PTHEN                          R12
PTO                            R
PUNSTRING                      V12
PUNTIL                         R16
DUSAGE                         R
DVALUE                         R54
DVALUES                        R54
PWHEN                          R16
PWITH                          R20
PWRITE                         V12
D01                            L080401
D02                            L100402
D03                            L120403
D04                            L140404
D05                            L160405
D06                            L160406
D07                            L200407
D08                            L200408
D09                            L240409
D10                            L250410
D11                            L260411
D12                            L270412
D77                            L120377
D78                            L120378
D88                            L160388
DCOMPUTATIONAL                 R40  COMP
PFI                            J12
PSEQ                           J1208SEQUENCE
PSEQUENCE                      J12
PREP                           J1202FI
PREPEAT                        J1202FI
PSELECTCASE                    J12
PSELECT                        J12
PPOSIT                         J12
PASSUME                        J1205POSIT
PADMIT                         J12
PITERWHILE                     J1205WHILE
PITERUNTIL                     J1205UNTIL
PQUIT                          J12
PSREAD                         J12
PSWRITE                        J12
PRESET                         J12
PBEGIN                         J12
 PROC                          J12
 IPROC                         J12
 RPROC                         J12
PPROCBEGIN                     J12
PPROCEND                       J12  EPROC
PEPROC                         J12
PRCALL                         J12
PCASE                          J12
PUNLESS                        J12
POTHERWISE                     J12
PPSVNAME                       J12
PPSVTHREAD                     J12